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.
80 lines
1.4 KiB
80 lines
1.4 KiB
2 years ago
|
TITLE jsr.mod VCN conductances
|
||
|
|
|
||
|
|
COMMENT
|
||
|
|
Ih for VCN neurons - average from several studies in auditory neurons
|
||
|
|
|
||
|
|
Implementation by Paul B. Manis, April (JHU) and Sept, (UNC)1999.
|
||
|
|
revised 2/28/04 pbm
|
||
|
|
|
||
|
|
pmanis@med.unc.edu
|
||
|
|
|
||
|
|
Modifed implementation; includes all temperature scaling, passes modlunit
|
||
|
|
7/10/2014 pbm
|
||
|
|
|
||
|
|
ENDCOMMENT
|
||
|
|
|
||
|
|
UNITS {
|
||
|
|
(mA) = (milliamp)
|
||
|
|
(mV) = (millivolt)
|
||
|
|
(nA) = (nanoamp)
|
||
|
|
}
|
||
|
|
|
||
|
|
NEURON {
|
||
|
|
THREADSAFE
|
||
|
|
SUFFIX ihvcn
|
||
|
|
NONSPECIFIC_CURRENT i
|
||
|
|
RANGE gbar, gh, i, eh
|
||
|
|
GLOBAL rinf, rtau
|
||
|
|
}
|
||
|
|
|
||
|
|
INDEPENDENT {t FROM 0 TO 1 WITH 1 (ms)}
|
||
|
|
|
||
|
|
PARAMETER {
|
||
|
|
v (mV)
|
||
|
|
dt (ms)
|
||
|
|
gbar = 0.00318 (mho/cm2) <0,1e9>
|
||
|
|
q10tau = 3.0
|
||
|
|
}
|
||
|
|
|
||
|
|
STATE {
|
||
|
|
r
|
||
|
|
}
|
||
|
|
|
||
|
|
ASSIGNED {
|
||
|
|
celsius (degC)
|
||
|
|
gh (mho/cm2)
|
||
|
|
eh (mV)
|
||
|
|
i (mA/cm2)
|
||
|
|
rinf
|
||
|
|
rtau (ms)
|
||
|
|
q10 ()
|
||
|
|
}
|
||
|
|
|
||
|
|
BREAKPOINT {
|
||
|
|
SOLVE states METHOD cnexp
|
||
|
|
|
||
|
|
gh = gbar*r
|
||
|
|
i = gh*(v - eh)
|
||
|
|
}
|
||
|
|
|
||
|
|
INITIAL {
|
||
|
|
q10 = q10tau^((celsius - 22)/10 (degC)) : if you don't like room temp, it can be changed!
|
||
|
|
rates(v)
|
||
|
|
r = rinf
|
||
|
|
}
|
||
|
|
|
||
|
|
DERIVATIVE states { :Computes state variables m, h, and n
|
||
|
|
rates(v) : at the current v and dt.
|
||
|
|
r' = (rinf - r)/rtau
|
||
|
|
}
|
||
|
|
|
||
|
|
PROCEDURE rates(v (mV)) { :Computes rate and other constants at current v.
|
||
|
|
:Call once from HOC to initialize inf at resting v.
|
||
|
|
|
||
|
|
rinf = 1 / (1+exp((v + 76) / 7 (mV)))
|
||
|
|
rtau = (100000 (ms)/ (237*exp((v+60) / 12 (mV)) + 17*exp(-(v+60) / 14 (mV)))) + 25
|
||
|
|
rtau = rtau/q10
|
||
|
|
|
||
|
|
}
|
||
|
|
|