File: 7.1a12.txt

package info (click to toggle)
gap-hap 1.70%2Bds-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 56,612 kB
  • sloc: xml: 16,139; sh: 216; javascript: 155; makefile: 126; ansic: 47; perl: 36
file content (20 lines) | stat: -rw-r--r-- 966 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
gap> G:=MathieuGroup(11);;
gap> h:=HomologicalGroupDecomposition(G,2);;

gap> ModPCohomologyPresentationBounds(h[1][1]);
rec( generators_degree_bound := 4, relators_degree_bound := 8 )
gap> A:=ModPCohomologyRing(h[1][1],2,9);;F:=PresentationOfGradedStructureConstantAlgebra(A);;f11:=HilbertPoincareSeries(F);
(x_1^2-x_1+1)/(x_1^4-2*x_1^3+2*x_1^2-2*x_1+1)

gap> ModPCohomologyPresentationBounds(h[1][2]);
rec( generators_degree_bound := 9, relators_degree_bound := 18 )
gap> A:=ModPCohomologyRing(h[1][2],2,19);;F:=PresentationOfGradedStructureConstantAlgebra(A);;f12:=HilbertPoincareSeries(F);
(x_1^2+1)/(x_1^4-x_1^3-x_1+1)

gap> ModPCohomologyPresentationBounds(h[2][1]);
rec( generators_degree_bound := 4, relators_degree_bound := 8 )
gap> A:=ModPCohomologyRing(h[2][1],2,9);;F:=PresentationOfGradedStructureConstantAlgebra(A);;f21:=HilbertPoincareSeries(F);
(1)/(x_1^2-2*x_1+1)

gap> f11+f12-f21;
(x_1^4-x_1^3+x_1^2-x_1+1)/(x_1^6-x_1^5+x_1^4-2*x_1^3+x_1^2-x_1+1)