alias _seekdemo_3_1 "_seekdemo_7"
alias _seekdemo_4 "set _demo_good 0; cl_cmd rpn /_demo_good 1 def; _seekdemo_5"
alias _seekdemo_5 "_seekdemo_6_$_demo_good"
-alias _seekdemo_6_0 "defer 0.001 _seekdemo_4"
+alias _seekdemo_6_0 "defer 0.02 _seekdemo_4"
alias _seekdemo_6_1 "defer clear; _seekdemo_7"
alias _seekdemo_7 "set _demo_time_step 2; cl_cmd rpn _demo_time time gt /_demo_time_step exch def; _seekdemo_8"
alias _seekdemo_8 "_seekdemo_9_$_demo_time_step"