|
ZZ:=AbelianPcpGroup(1,[0]);; #ZZ is the infinite cyclic group
G:=EilenbergMacLaneSimplicialGroup(ZZ,2,10);;
R:=ChainComplexOfSimplicialGroup(G);;
Print(List([0..10],R!.dimension),"\n");
D:=SimplifiedComplex(R);;
Print(List([0..9],R!.dimension),"\n");
[ Dauer der Verarbeitung: 0.18 Sekunden
(vorverarbeitet)
]
|