Quelle  2.1.4   Sprache: unbekannt

file:=HapFile("image2.1.1.eps");
M:=ReadImageAsPureCubicalComplex(file,600);;
Print(M,"\n");
C:=ChainComplex(M);;
Print(C,"\n");
Print(EulerCharacteristic(C),"\n");

[ Dauer der Verarbeitung: 0.5 Sekunden  (vorverarbeitet)  ]