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

Author:
aram148 <a.rampadarath@auckland.ac.nz>
Date:
2021-09-03 09:16:17+12:00
Desc:
renamed VSM
Permanent Source URI:
https://staging.physiomeproject.org/workspace/6b0/rawfile/ad134c275417b15f67caabb85d67fd244645312b/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