`setprec'
---------

setprec([N])
     :: bigfloat $@$N7e?t$r(J N $@7e$K@_Dj$9$k(J.

RETURN
     $@@0?t(J
N
     $@@0?t(J

   * $@0z?t$,$"$k>l9g(J, bigfloat $@$N7e?t$r(J N $@7e$K@_Dj$9$k(J. $@0z?t$N$"$k$J$7(J
     $@$K$+$+$o$i$:(J, $@0JA0$K@_Dj$5$l$F$$$?CM$rJV$9(J.
   * bigfloat $@$N7W;;$O(J PARI (*Note pari::) $@$K$h$C$F9T$o$l$k(J.
   * bigfloat $@$G$N7W;;$KBP$7M-8z$G$"$k(J. bigfloat $@$N(J flag $@$r(J on $@$K$9$k(J
     $@J}K!$O(J, `ctrl' $@$r;2>H(J.
   * $@@_Dj$G$-$k7e?t$K>e8B$O$J$$$,(J, $@;XDj$7$?7e?t$K@_Dj$5$l$k$H$O8B$i$J(J
     $@$$(J. $@Bg$-$a$NCM$r@_Dj$9$k$N$,0BA4$G$"$k(J.

     [1] setprec();
     9
     [2] setprec(100);
     9
     [3] setprec(100);
     96

$@;2>H(J
     `ctrl', `eval', `pari'

