//genesis
/* Setup the hines solver */
function make_hsolve (pathname)
str pathname
ce {pathname}
echo preparing hines solver...
create hsolve solve
ce solve
// if this is set then reset will NOT change Vm in Hines
setfield . path "../##[][TYPE=compartment]" comptmode 1 chanmode 5
call . SETUP
setmethod 11
//setmethod 0
// this is added because program crash when msgs are laid outside hines solver
/*
if ({exists {pathname}/soma})
name = {findsolvefield . {pathname}/soma Vm}
addmsg . {pathname}-form{pathname} PLOT {name} *Soma_Vm *red
end
if ({exists {pathname}/axon[19]})
name = {findsolvefield . {pathname}/axon[19] Vm}
addmsg . {pathname}-form{pathname} PLOT {name} *Axon_Vm *blue
end
if ({exists {pathname}/p0b1b2b1b1b1b2b1b2b1b2b1b2b1b1b1b2b1b2b1b2b1b2b1b2b1b2b1b1[8]})
name = {findsolvefield . {pathname}/p0b1b2b1b1b1b2b1b2b1b2b1b2b1b1b1b2b1b2b1b2b1b2b1b2b1b2b1b1[8] Vm}
addmsg . {pathname}-form{pathname} PLOT {name} *Dend_Vm *black
end
*/
end
|