`eval', `deval'
---------------

eval(OBJ[,PREC])

deval(OBJ)
     :: OBJ $B$NCM$NI>2A(B.

RETURN
     $B?t$"$k$$$O<0(B

OBJ
     $B0lHL$N<0(B

PREC
     $B@0?t(B

   * OBJ $B$K4^$^$l$kH!?t$NCM$r2DG=$J8B$jI>2A$9$k(B.

   * `deval' $B$OG\@:EYIbF0>.?t$r7k2L$H$7$F(B `eval' $B$N>l9g(B,
     $BM-M}?t$O$=$N$^$^;D$k(B.

   * `eval' $B$K$*$$$F$O(B, $B7W;;$O(B PARI (*Note pari::) $B$,9T$&(B.  `deval'
     $B$K$*$$$F$O(B, $B7W;;$O(B C $B?t3X%i%$%V%i%j$N4X?t$rMQ$$$F9T$&(B.

   * `deval' $B$OJ#AG?t$O07$($J$$(B.

   * `eval' $B$K$*$$$F$O(B, PREC $B$r;XDj$7$?>l9g(B, $B7W;;$O(B, 10 $B?J(B PREC
     $B7eDxEY$G9T$o$l$k(B.  PREC $B$N;XDj$,$J$$>l9g(B,
     $B8=:_@_Dj$5$l$F$$$k@:EY$G9T$o$l$k(B.  (*Note setprec::)

   *
    $B07$($kH!?t$O(B, $B<!$NDL$j(B.
          `sin', `cos', `tan',

          `asin', `acos', `atan',

          `sinh', `cosh', `tanh',

          `asinh', `acosh', `atanh',

          `exp', `log', `pow(a,b) (a^b)'

   * $B0J2<$N5-9f$r?t$H$7$FI>2A$G$-$k(B. $B$?$@$7(B `@i' $B$r07$($k$N$O(B `eval',
     `deval' $B$N$_$G$"$k(B.
    @i
          $B5u?tC10L(B

    @pi
          $B1_<~N((B

    @e
          $B<+A3BP?t$NDl(B

     [118] eval(exp(@pi*@i));
     -1.0000000000000000000000000000
     [119] eval(2^(1/2));
     1.414213562373095048763788073031
     [120] eval(sin(@pi/3));
     0.86602540378443864674620506632
     [121] eval(sin(@pi/3)-3^(1/2)/2,50);
     -2.78791084448179148471 E-58
     [122] eval(1/2);
     1/2
     [123] deval(sin(1)^2+cos(1)^2);
     1

$B;2>H(B
     *Note `ctrl': ctrl, *Note `setprec': setprec, *Note `pari': pari.

