|
gap> r := PolynomialRing( GF(8), 3 );
GF(2^3)[x_1,x_2,x_3]
gap> poly := r.1^2 + r.2 * r.3;
x_1^2+x_2*x_3
gap> form := QuadraticFormByPolynomial( poly, r );
< quadratic form >
gap> r := RadicalOfForm( form );
<vector space of dimension 0 over GF(2^3)>
gap> Dimension(r);
0
[ Dauer der Verarbeitung: 0.14 Sekunden
(vorverarbeitet)
]
|
