Quelle  1.3.2   Sprache: unbekannt

#Be patient! This example takes some time.
file:=HapFile("image1.3.2.png");
M:=ReadImageAsPureCubicalComplex(file,300);
Print(BettiNumber(M,0));