-
Notifications
You must be signed in to change notification settings - Fork 18
/
h.mod
86 lines (61 loc) · 1.51 KB
/
h.mod
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
COMMENT
Deterministic model of kinetics and voltage-dependence of Ih-currents
in layer 5 pyramidal neuron, see Kole et al., 2006. Implemented by
Stefan Hallermann.
Added possibility to shift voltage activiation (vshift) and allowed access to gating variables, Armin Bahl 2009
Predominantly HCN1 / HCN2
ENDCOMMENT
TITLE Ih-current
UNITS {
(mA) = (milliamp)
(mV) = (millivolt)
(mM) = (milli/liter)
}
INDEPENDENT {t FROM 0 TO 1 WITH 1 (ms)}
PARAMETER {
dt (ms)
v (mV)
ehd=-47 (mV)
gbar=0 (pS/um2)
gamma_ih :not used
seed :not used
vshift = 0
}
NEURON {
SUFFIX ih
NONSPECIFIC_CURRENT Iqq
RANGE Iqq,gbar,vshift,ehd, qtau, qinf, gq
}
STATE {
qq
}
ASSIGNED {
Iqq (mA/cm2)
qtau (ms)
qinf
gq (pS/um2)
}
INITIAL {
qq=alpha(v-vshift)/(beta(v-vshift)+alpha(v-vshift))
qtau = 1./(alpha(v-vshift) + beta(v-vshift))
qinf = alpha(v)/(alpha(v-vshift) + beta(v-vshift))
}
BREAKPOINT {
SOLVE state METHOD cnexp
qtau = 1./(alpha(v-vshift) + beta(v-vshift))
qinf = alpha(v-vshift)/(alpha(v-vshift) + beta(v-vshift))
gq = gbar*qq
Iqq = (1e-4)*gq*(v-ehd)
}
FUNCTION alpha(v(mV)) {
alpha = 0.001*6.43*(v+154.9)/(exp((v+154.9)/11.9)-1)
: parameters are estimated by direct fitting of HH model to
: activation time constants and voltage activation curve
: recorded at 34C
}
FUNCTION beta(v(mV)) {
beta = 0.001*193*exp(v/33.1)
}
DERIVATIVE state { : exact when v held constant; integrates over dt step
qq' = (1-qq)*alpha(v-vshift) - qq*beta(v-vshift)
}