You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
56 lines
652 B
56 lines
652 B
2 years ago
|
: Ih current
|
||
|
: Created 8/6/02 - nwg
|
||
|
|
||
|
NEURON {
|
||
|
THREADSAFE
|
||
|
SUFFIX hpkj
|
||
|
NONSPECIFIC_CURRENT i
|
||
|
RANGE gbar, gh, eh
|
||
|
GLOBAL ninf, ntau
|
||
|
}
|
||
|
|
||
|
UNITS {
|
||
|
(mA) = (milliamp)
|
||
|
(mV) = (millivolt)
|
||
|
(S) = (siemens)
|
||
|
}
|
||
|
|
||
|
PARAMETER {
|
||
|
v (mV)
|
||
|
|
||
|
gbar = .0001 (S/cm2)
|
||
|
|
||
|
eh = -30 (mV)
|
||
|
}
|
||
|
|
||
|
ASSIGNED {
|
||
|
gh (mho/cm2)
|
||
|
i (mA/cm2)
|
||
|
ninf
|
||
|
ntau (ms)
|
||
|
}
|
||
|
|
||
|
STATE {
|
||
|
n
|
||
|
}
|
||
|
|
||
|
INITIAL {
|
||
|
rates(v)
|
||
|
n = ninf
|
||
|
}
|
||
|
|
||
|
BREAKPOINT {
|
||
|
SOLVE states METHOD cnexp
|
||
|
gh = gbar * n
|
||
|
i = gh*(v - eh)
|
||
|
}
|
||
|
|
||
|
DERIVATIVE states {
|
||
|
rates(v)
|
||
|
n' = (ninf - n)/ntau
|
||
|
}
|
||
|
|
||
|
PROCEDURE rates(v (mV)) {
|
||
|
ninf = 1/(1+exp((v+90.1(mV))/9.9(mV)))
|
||
|
ntau = (1000) * (0.19 (s) + 0.72 (s)*exp(-((v-(-81.5(mV)))/11.9(mV))^2))
|
||
|
}
|