`alg'
-----

alg(I)
     :: $@%$%s%G%C%/%9$KBP1~$9$k(J `root' $@$rJV$9(J.

RETURN
     $@Be?tE*?t(J (`root')
I
     $@@0?t(J

   * `root' `#I' $@$rJV$9(J.
   * `#I' $@$O%f!<%6$,D>@\F~NO$G$-$J$$$?$a(J, `alg(I)' $@$H$$$&7A$GF~NO$9$k(J.

     [2] x+#0;
     syntax error
     0
     [3] alg(0);
     (#0)

$@;2>H(J
     `newalg', `algv'

