S:=SylowSubgroup(SL(2,Integers mod 5^3),5);;
M:=MaximalSubgroups(S);;
G:=Image(IsomorphismPcGroup(M[1]));;
L:=CompositionSeries(G);;
R:=ResolutionSubnormalSeries(L,4);;
Print(Homology(TensorWithIntegers(R),3),"\n");
