Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/GAP/pkg/forms/examples/gap/   (GAP Algebra Version 4.15.1©)  Datei vom 5.4.2025 mit Größe 306 B image not shown  

Quelle  quadformbypoly.g  Sprache: unbekannt

  
Spracherkennung für: .g vermutete Sprache: Lisp {Lisp[90] Masm[90] ABAP[30]} [Methode: maximale Elemente, drei Dimensionen]

#Constructing form: QuadraticFormByPolynomial
r := PolynomialRing( GF(8), 3);
poly := r.1^2 + r.2^2 + r.3^2;
form := QuadraticFormByPolynomial(poly, r);
RadicalOfForm(form);
r := PolynomialRing(GF(9),4);
poly := Z(3)^2*r.1^2+r.2^2+r.3*r.4;
qform := QuadraticFormByPolynomial(poly,r);
Display(qform);
quit;

[Dauer der Verarbeitung: 0.4 Sekunden, vorverarbeitet 2026-10-24]