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

Author:
aram148 <a.rampadarath@auckland.ac.nz>
Date:
2021-09-10 12:27:53+12:00
Desc:
cleaned up units
Permanent Source URI:
https://staging.physiomeproject.org/workspace/6b0/rawfile/a785dbdc9165004974aa42bed7e475bb85408ac0/USMC/DM+Mijaailovich_huxley_copy/velvar.m
Compare... Download Source 

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