Quellcodebibliothek Statistik Leitseite products/sources/formale Sprachen/GAP/tst/testinstall/   (Algebra von RWTH Aachen Version 4.15.1©)  Datei vom 18.9.2025 mit Größe 2 kB image not shown  

Quelle  meatauto.tst   Sprache: unbekannt

 
#@local F, e, M, v, N, G, p, hc, A
gap> START_TEST("meatauto.tst");

#
# SMTX_NewEqns, SMTX_NullspaceEqns
#
gap> e := SMTX_NewEqns(3, GF(5));
rec( dim := 3, failed := false, field := GF(5), index := [  ], mat := [  ], 
  vec := [  ], weights := [  ] )
gap> SMTX_NullspaceEqns(e);
[ [ Z(5)^0, 0*Z(5), 0*Z(5) ], [ 0*Z(5), Z(5)^0, 0*Z(5) ], 
  [ 0*Z(5), 0*Z(5), Z(5)^0 ] ]

#
# MTX.BasisModuleEndomorphisms
#
gap> G:=SmallGroup(24, 3);;
gap> p:=NextPrimeInt(100);;
gap> M:=RegularModule(G, GF(p))[2];;
gap> MTX.BasisModuleEndomorphisms(M);
[ < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) >, 
  < immutable compressed matrix 24x24 over GF(101) > ]

#
# MTX.HomogeneousComponents
#
gap> G:=SmallGroup(24, 3);;
gap> p:=NextPrimeInt(100);;
gap> M:=RegularModule(G, GF(p))[2];;
gap> hc := MTX.HomogeneousComponents(M);;
gap> SortedList(List(hc, x -> Length(x.indices)));
[ 1, 1, 2, 2, 3 ]
gap> Union(List(hc, x -> x.indices));
[ 1 .. 9 ]

#
gap> STOP_TEST("meatauto.tst");

[ Dauer der Verarbeitung: 0.4 Sekunden  (vorverarbeitet)  ]