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

Quelle  examples_morphism2.g   Sprache: unbekannt

 
# intertwiner
mat1 := IdentityMat(4,GF(16));
form1 := HermitianFormByMatrix(mat1,GF(16));
ps1 := PolarSpace(form1);
mat2 := [[0,1,0,0],[1,0,0,0],[0,0,0,1],[0,0,1,0]]*Z(16)^0;
form2 := HermitianFormByMatrix(mat2,GF(16));
ps2 := PolarSpace(form2);
CollineationGroup(ps1);
map := IsomorphismPolarSpaces(ps1,ps2);
phi := Intertwiner(map);
g := Random(CollineationGroup(ps1));
h := g^phi;
h in CollineationGroup(ps2);
h := Random(CollineationGroup(ps2));
g := PreImageElm(phi,h);
g in CollineationGroup(ps1);
quit;

[ Dauer der Verarbeitung: 0.15 Sekunden  (vorverarbeitet)  ]