`ctrl'
------

ctrl("SWITCH",ONOFF)
     :: $@4D6-@_Dj(J

RETURN
     0 $@$^$?$O(J 1
SWITCH
     $@%9%$%C%AL>(J
ONOFF
     $@%U%i%0(J ($@G$0U(J)

   * Asir $@$N<B9T4D6-$N@_DjJQ99$r9T$&(J. $@%U%i%0$,(J 0 $@$J$i$P%9%$%C%A(J SWITCH 
     $@$r(J off $@$K$7(J, $@$=$l0J30$J$i$P(J on $@$K$9$k(J.
   * $@%9%$%C%A$OJ8;zNs$H$7$FF~NO$9$k(J. $@$9$J$o$A%@%V%k%/%)!<%H$G0O$`(J.
   * $@%9%$%C%A$O<!$NDL$j(J.
     `cputime'
          on $@$N;~(J CPU time $@$*$h$S(J GC time $@$rI=<((J, off $@$N;~(J $@I=<($7$J$$(J. 
          `cputime()'$@$r;2>H(J. `ctrl("cputime",ONOFF)' $@$O(J 
          `cputime(ONOFF)' $@$HF1$8$G$"$k(J.
     `nez'
          EZGCD $@$N%"%k%4%j%:%`$N@ZBX$((J. $@%G%U%)%k%H$G(J 1 $@$G$"$j(J, $@$H$/$K(J
          $@@ZBX$($kI,MW$O$J$$(J.
     `echo'
          on $@$N;~$OI8=`F~NO$r7+$jJV$7$F=PNO$7(J, off $@$N;~$OI8=`F~NO$r7+(J
          $@$jJV$5$J$$(J.  `output' $@%3%^%s%I$rMQ$$$k:]$KM-8z$G$"$k(J.
     `bigfloat'
          on $@$N;~(J, $@F~NO$5$l$?IbF0>.?t$O(J bigfloat $@$KJQ49$5$l(J, $@IbF0>.?t(J
          $@1i;;$O(JPARI (*Note pari::) $@$K$h$j9T$o$l$k(J. $@%G%U%)%k%H$NM-8z7e(J
          $@?t$O(J 9 $@7e$G$"$k(J. $@M-8z7e?t$rA}$d$7$?$$;~$K$O(J `setprec()' $@$rMQ(J
          $@$$$k(J. off $@$N;~(J, $@F~NO$5$l$?IbF0>.?t$O(J, $@G\@:EYIbF0>.?t$KJQ49$5(J
          $@$l$k(J.
   * $@@.8y$7$?>l9g$K$O(J 1 $@$r(J, $@<:GT$7$?$H$-Kt$O(J $@MQ0U$5$l$?%9%$%C%A0J30$N(J
     $@$b$N$r;XDj$7$?>l9g$K$O(J 0 $@$rJV$9(J.

$@;2>H(J
     `cputime', `output', `pari', `setprec', `eval'

