G:=SpaceGroup(4,1886);;
R:=ResolutionBieberbachGroup(G);
C:=TensorWithIntegers(R);
Print(Homology(C,0),"\n");;
Print(Homology(C,1),"\n");;
Print(Homology(C,2),"\n");;
Print(Homology(C,3),"\n");;
Print(Homology(C,4),"\n");;
