// genesis - xtools.g - Functions used in the control panel // This file was developed by // Akira Takashima. // Department of Biological Sciences // Faculry of Science // Hokkaido University // Sapporo Japan // // Last update on 22 Jan. 2007 //==================================================================== // advances the simulation by the amount of time given in the dialog //==================================================================== function stepbutton(widget) str widget echo step {getfield {widget} value} msec. step {getfield {widget} value} -time end function clockbutton(widget) str widget echo "dt = " {getfield {widget} value} msec. setclock 0 {getfield {widget} value} end //=========================== // make hsolve /cell/solve //=========================== function delete_hsolve pushe / delete /cell/solve reset echo "/cell/solve are deleted!" pope end //============================ // choose integration method //============================ /*function integ_method(widget) str widget echo "Integration Method is " {getfield {widget} value}. setmethod {getfield {widget} value} end*/ //EOF