--- loncom/homework/default_homework.lcpm 2001/05/31 20:47:50 1.24 +++ loncom/homework/default_homework.lcpm 2001/05/31 22:36:18 1.25 @@ -1,14 +1,12 @@ -# file name (temp): default_homework +# file name (temp): default_homework # used by lonxml::xmlparse() as input variable $safeinit to Apache::run::run() -# -# -#init some globals # # Guy Albertelli # # 05/25/2001 H. K. Ng # 05/31/2001 H. K. Ng # +#init some globals $RANDOMINIT=0; $pi=atan2(1,1)*4; $rad2deg=180.0/$pi; @@ -360,11 +358,4 @@ sub choose { return $_[$num]; } -#$external::randomseed=time; -#$a=2; -#$b=2; -#$c=2; -#&map(1,\$a,\$b,\$c,3,4,5); -#print $a."\n".$b."\n"; -