Sincerely,
MH
Code: Select all
UNITS {
(mV) = (millivolt)
(nA) = (nanoamp)
(molar) = (mole/litre)
(mM) = (millimolar)
(uS) = (microsiemens)
}
NEURON {
SUFFIX if
USEION f READ ena, ek WRITE if
RANGE g_f
}
PARAMETER {
g_f = 0.00145 (uS) : Table 5: Membrane Current Parameters - maximum conductance for Hyperpolarization Activated Current
f_na = 0.2 : p. 3047 - a constant
y = 3.578708e-03 : Table 7: Initial conditions for State Variables - y is the inactivation gating variable for the Hyperpolarization Activated Current
}
ASSIGNED {
v (mV)
if (nA/cm2)
}
STATE { y_alpha }
BREAKPOINT {
SOLVE states METHOD cnexp
if = g_f * y * (f_na * (v - ena(mV)) + f_k( ) * (v - ek(mV)))
}
DERIVATIVE states {
y' = (y_alpha(v) - y) / tao_y(s)
}
FUNCTION tao_y (v(mV))(s) {
UNITSOFF
tao_y = 1 / (0.11885 * exp((v + 80.0) / 28.37) + 0.56236 * exp((v + 80.0) / -14.19))
UNITSON
}
PROCEDURE y_alpha (v(mV)) {
UNITSOFF
y_alpha = 1 / (1 + exp((v + 138.6) / 10.48))
UNITSON
}
PROCEDURE f_k (f_na()) {
UNITSOFF
f_k = 1 - f_na
UNITSON
}