Location: 12 L Platform 1 model codes @ 4c1ab73f48d7 / USMC / DM+Mijaailovich_huxley_copy / velvar.m

Author:
aram148 <a.rampadarath@auckland.ac.nz>
Date:
2021-11-04 16:02:42+13:00
Desc:
Updated USMC-Bursztyn model
Permanent Source URI:
http://models.cellml.org/workspace/6b0/rawfile/4c1ab73f48d7150c2094cf8017425482a1594ccf/USMC/DM+Mijaailovich_huxley_copy/velvar.m

function V =velvar(t,f)
if t<=50
    V=0;
elseif t>50 & t<=80
    %V=12*(0.01*2*pi*f*cos((2*pi*f.*t)));
    V=-0.125;
else
    V=25*(0.02*2*pi*f*cos((2*pi*f.*t)));
end