-
Notifications
You must be signed in to change notification settings - Fork 0
/
k2.mod
executable file
·59 lines (50 loc) · 1.08 KB
/
k2.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
TITLE Potasium Type K2 current for RD Traub, J Neurophysiol 89:909-921, 2003
COMMENT
Implemented by Maciej Lazarewicz 2003 ([email protected])
ENDCOMMENT
INDEPENDENT { t FROM 0 TO 1 WITH 1 (ms) }
UNITS {
(mV) = (millivolt)
(mA) = (milliamp)
}
NEURON {
SUFFIX k2
USEION k READ ek WRITE ik
RANGE gbar, ik
}
PARAMETER {
gbar = 0.0 (mho/cm2)
v ek (mV)
}
ASSIGNED {
ik (mA/cm2)
minf hinf (1)
mtau htau (ms)
}
STATE {
m h
}
BREAKPOINT {
SOLVE states METHOD cnexp
ik = gbar * m * h * ( v - ek )
}
INITIAL {
settables(v)
m = minf
m = 0
h = hinf
}
DERIVATIVE states {
settables(v)
m' = ( minf - m ) / mtau
h' = ( hinf - h ) / htau
}
UNITSOFF
PROCEDURE settables(v) {
TABLE minf, hinf, mtau, htau FROM -120 TO 40 WITH 641
minf = 1 / ( 1 + exp( ( - v - 10 ) / 17 ) )
mtau = 4.95 + 0.5 / ( exp( ( v - 81 ) / 25.6 ) + exp( ( - v - 132 ) / 18 ) )
hinf = 1 / ( 1 + exp( ( v + 58 ) / 10.6 ) )
htau = 60 + 0.5 / ( exp( ( v - 1.33 ) / 200 ) + exp( ( - v - 130 ) / 7.1 ) )
}
UNITSON