diff --git a/tst/misc.tst b/tst/misc.tst new file mode 100644 index 0000000..40eda6f --- /dev/null +++ b/tst/misc.tst @@ -0,0 +1,17 @@ +# +gap> START_TEST("misc.tst"); + +# test NiceMonomorphism for subgeometries, which uses hash tables +gap> pg := PG(1,5^4); +ProjectiveSpace(1, 625) +gap> sub := CanonicalSubgeometryOfProjectiveSpace(pg, GF(5)); +Subgeometry PG(1, 5) of ProjectiveSpace(1, 625) +gap> g := CollineationGroup(sub); +The FinInG collineation group PGL(2,5) of Subgeometry PG(1, 5) of ProjectiveSpace(1, 625) +gap> Size(g); +480 +gap> Number([1..10], i -> PseudoRandom(g) in g); +10 + +# +gap> STOP_TEST("misc.tst", 10000 ); diff --git a/tst/testall.g b/tst/testall.g index 2ded7e2..d193429 100644 --- a/tst/testall.g +++ b/tst/testall.g @@ -6,6 +6,7 @@ pkgdir := DirectoriesPackageLibrary( pkgname, "tst" ); # Arrange chapters as required testfiles := [ "bugfix.tst", +"misc.tst", "tst_regular13system.tst", "tst_segrevariety.tst", "tst_hermitianspreads.tst",