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

Quelle  issingularvector.g   Sprache: unbekannt

 
#testing singularity for vectors.
mat := [[1,0,0,0,0],[0,0,0,0,1],[0,0,0,0,0],[0,0,1,0,0],[0,0,0,0,0]]*Z(8)^0;
form := QuadraticFormByMatrix(mat);
v1 := [1,0,0,0,0]*Z(8)^0;
v2 := [0,1,0,0,0]*Z(8)^0;
IsSingularVector(form,v1);
IsSingularVector(form,v2);
IsIsotropicVector(form,v1);
IsIsotropicVector(form,v2);
quit;

[ Dauer der Verarbeitung: 0.5 Sekunden  (vorverarbeitet)  ]