`newalg'
--------

newalg(DEFPOLY)
     :: `root' を生成する.

RETURN
     代数的数 (`root')

DEFPOLY
     多項式

   * DEFPOLY を定義多項式とする代数的数 (`root') を生成する.

   * DEFPOLY に対する制限に関しては, *Note 代数的数の表現::.

     [0] A0=newalg(x^2-2);
     (#0)

参照
     *Note `defpoly': defpoly

