# mlI.ode

param i=0,vk=-84,vl=-60,vca=120
param gk=8,gl=2,c=20
param v1=-1.2,v2=18
param v3=12,v4=17.4,phi=.06666667,gca=4

v(0)=-60.855
w(0)=0.014915

minf(v)=.5*(1+tanh((v-v1)/v2))
winf(v)=.5*(1+tanh((v-v3)/v4))
tauw(v)=1/cosh((v-v3)/(2*v4))


dv/dt = ( I - gca*minf(V)*(V-Vca)-gk*w*(V-VK)-gl*(V-Vl))/c
dw/dt = phi*(winf(V)-w)/tauw(V)


# plot parameters: 
@ total=150,dt=.25,ylo=-0.5,yhi=1.5,xlo=-70,xhi=70,xp=v,yp=w

done