/* FILE INFORMATION
GENESIS script to make a "squid-like" K channel
squid giant axon voltage-dependent channels,
A.L.Hodgkin and A.F.Huxley, J.Physiol(Lond) 117, pp 500-544 (1952)
*/
// CONSTANTS
float EREST_ACT = -0.07 // resting potential (volts)
float EK = -0.082 // potassium equil potential
float SOMA_A = len*PI*dia // compartment area
function make_K_squid_hh
str chanpath = "K_squid_hh"
create tabchannel {chanpath}
setfield ^ Ek {EK} Gbar {360.0*SOMA_A} Ik 0 Gk 0 \
Xpower 4 Ypower 0 Zpower 0
setupalpha {chanpath} X {10e3*(0.01 + EREST_ACT)} \
-10.0e3 -1.0 {-1.0*(0.01 + EREST_ACT)} -0.01 \
125.0 0.0 0.0 {-1.0*EREST_ACT} 80.0e-3
end