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
|
: SK-type calcium-activated potassium current
: Reference : Kohler et al. 1996
NEURON {
SUFFIX SK
USEION k READ ek WRITE ik
USEION ca READ cai
RANGE gbar, g, ik
}
UNITS {
(mV) = (millivolt)
(mA) = (milliamp)
(mM) = (milli/liter)
}
PARAMETER {
v (mV)
gbar = .000001 (mho/cm2)
zTau = 1 (ms)
ek (mV)
cai (mM)
}
ASSIGNED {
zInf
ik (mA/cm2)
g (S/cm2)
}
STATE {
z FROM 0 TO 1
}
BREAKPOINT {
SOLVE states METHOD cnexp
g = gbar * z
ik = g * (v - ek)
}
DERIVATIVE states {
rates(cai)
z' = (zInf - z) / zTau
}
PROCEDURE rates(ca(mM)) {
if(ca < 1e-7){
ca = ca + 1e-07
}
zInf = 1/(1 + (0.00043 / ca)^4.8)
}
INITIAL {
rates(cai)
z = zInf
}
|
