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

Quelle  stab_orbs_finingorbit1.include  Sprache: unbekannt

  
Spracherkennung für: .include vermutete Sprache: Lisp {Lisp[66] Masm[66] MT940[8]} [Methode: maximale Elemente, drei Dimensionen]

gap>; ps := ParabolicQuadric(6,3);
Q(6, 3)
gap>; g := CollineationGroup(ps);
PGammaO(7,3)
gap>; pg := PG(6,3);
ProjectiveSpace(6, 3)
gap>; s := First(Solids(pg),t -> TypeOfSubspace(ps,t) = "elliptic" );
<;a solid in ProjectiveSpace(6, 3)>
gap>; orbit := FiningOrbit(g,s,OnProjSubspaces);
<;closed orbit, 265356 points>
gap>; time;
33555

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