Ziele Untersuchung
mit Columbo Integrität von
Datenbanken Interaktion und
Portierbarkeit Ergonomie der
Schnittstellen

Angebot Produkte Projekt Beratung

Mittel Analytik Modellierung Sprachen Algebra Logik Hardware Denken Kreativität

Zusammenhänge Gesellschaft Wirtschaft Branche Firma

Benutzer


products/Sources/formale Sprachen/GAP/pkg/fining/tst/gap/extra/ (GAP Algebra Version 4.15.1^©) Datei vom 27.6.2023 mit Größe 948 B

Quelle tst_fining12.g Sprache: unbekannt

Spracherkennung für: .g vermutete Sprache: Unknown {[0] [0] [0]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]

#test FiningOrbits functions.
pg := PG(2,16);
group := CollineationGroup(ParabolicQuadric(2,16));
orbs := FiningOrbits(group,Points(pg));
orbs := FiningOrbits(group,List(Points(pg)),OnProjSubspaces);
orbs := FiningOrbits(group,Lines(pg));
orbs := FiningOrbits(group,List(Lines(pg)),OnProjSubspaces);
pg := PG(3,9);
group := CollineationGroup(EllipticQuadric(3,9));
orbs := FiningOrbits(group,Points(pg));
orbs := FiningOrbits(group,List(Points(pg)),OnProjSubspaces);
orbs := FiningOrbits(group,Lines(pg));
orbs := FiningOrbits(group,List(Lines(pg)),OnProjSubspaces);
orbs := FiningOrbits(group,Planes(pg));
orbs := FiningOrbits(group,List(Planes(pg)),OnProjSubspaces);
pg := PG(2,49);
group := CollineationGroup(HermitianPolarSpace(2,49));
orbs := FiningOrbits(group,Points(pg));
orbs := FiningOrbits(group,List(Points(pg)),OnProjSubspaces);
orbs := FiningOrbits(group,Lines(pg));
orbs := FiningOrbits(group,List(Lines(pg)),OnProjSubspaces);
quit;