/usr/share/nrn/demo/d3init.hoc is in neuron 7.5-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | objectvar vbox
{
xopen("$(NRNDEMO)dend3/dend3.nrn")
xopen("$(NRNDEMO)dend3/syn3.hoc")
xopen("$(NRNDEMO)dend3/control.hoc")
}
movie_frame_dur_ = .01
{variable_domain(&movie_frame_dur_, .001, 1e9) units(&movie_frame_dur_, "s")}
objref movie_timer
movie_timer = new Timer("moviestep()")
proc moviestep() {
steprun()
realtime = startsw() - rtstart
if (t >= tstop || stoprun) {
movie_timer.end
running_ = 0
}
}
proc movierun() {
realtime = 0 rtstart = startsw()
running_ = 1 // run button checkbox
stoprun = 0
stdinit()
movie_timer.seconds(movie_frame_dur_)
movie_timer.start
}
xpanel("Movie Run")
xbutton("Init & Run", "movierun()")
xpvalue("Seconds per step", &movie_frame_dur_, 1)
xpanel(400, 300)
proc destroy() {
objref vbox, syn[1], movie_timer
while (PWManager[0].count > 6) {
PWManager[0].close(PWManager[0].count-1)
}
}
|