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

Quelle  stab_orbs_finingorbit1.g  Sprache: unbekannt

  
Spracherkennung für: .g vermutete Sprache: Lisp {Lisp[87] Masm[87] Apollo[12]} [Methode: maximale Elemente, drei Dimensionen]

#fining orbit (1)
ps := ParabolicQuadric(6,3);
g := CollineationGroup(ps);
pg := PG(6,3);
s := First(Solids(pg),t -> TypeOfSubspace(ps,t) = "elliptic" );
orbit := FiningOrbit(g,s,OnProjSubspaces);
time;
quit;

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