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 395 B image not shown  

Quelle  examples_tits.g   Sprache: unbekannt

 
#Tits ovoid in PG(3,8)
q := 8;
pg := PG(3,q);
f := GF(q);
vecs := Union(List(f,x->List(f,y->[One(f),x*y+x^6+y^4,x,y])));;
Add(vecs,[0,1,0,0]*Z(q)^0);
ovoid := List(vecs,x->VectorSpaceToElement(pg,x));;
numbers := List(Planes(pg),x->Number(ovoid,y->y in x));
Collected(numbers);
group := HomographyGroup(pg);
stab := FiningSetwiseStabiliser(group,ovoid);
time;
IsSimple(stab);
Order(stab);
quit;

[ Dauer der Verarbeitung: 0.15 Sekunden  (vorverarbeitet)  ]