gap> R:=ResolutionArtinGroup(D,9);;
gap> C:=TensorWithIntegers(R);;
gap> List([0..8],n->Homology(C,n));
[ [ 0 ], [ 0 ], [ 2 ], [ 2 ], [ 2, 6 ], [ 3, 6 ], [ 2, 6 ], [ 0 ], [ 0 ] ]
