   Next: CPU$B0MB8$N(B double Up: $B?t(B, $BB?9<0(B $B$N(B CMO Previous: $BJ,;6I=8=B?9<0(B Dpolynomial $B:F5"I=8=B?9<0$NDj5A(B #define CMO_RECURSIVE_POLYNOMIAL 27 #define CMO_POLYNOMIAL_IN_ONE_VARIABLE 33 Group CMObject/RecursivePolynomial requires CMObject/Primitive, CMObject/Basic. Polynomial in 1 variable, Coefficient, Name of the main variable, Recursive Polynomial, Ring definition for recursive polynomials CMObject/RecursivePolynomial Example: (CMO_RECURSIEVE_POLYNOMIAL, ("x","y"), (CMO_POLYNOMIAL_IN_ONE_VARIABLE, 2, 0, <--- "x" 3, (CMO_POLYNOMIAL_IN_ONE_VARIABLE, 2, 1, <--- "y" 5, 1234, 0, 17), 1, (CMO_POLYNOMIAL_IN_ONE_VARIABLE, 2, 1, <--- "y" 10, 1, 5, 31))) $B$3$l$O(B, x3 (1234 y5 + 17 ) + x1 (y10 + 31 y5) $B$r$"$i$o$9(B. $BHs2D49B?9<0$b$3$N7A<0$G$"$i$o$7$?$N$G(B, $B@Q$N=g=x$r>e$N$h$&$K(B $B$9$k$3$H(B. $B$D$^$j(B, $B
sm1
sm1>(x^2-h). [(class) (recursivePolynomial)] dc /ff set ;
sm1>ff ::
Class.recursivePolynomial h * ((-1)) + (x^2  * (1))

Nobuki Takayama $BJ?@.(B12$BG/(B1$B7n(B25$BF|(B