Quelle  2.4.8   Sprache: unbekannt

#The example uses GraphViz software.
file:=HapFile("data1V2X.pdb");
K:=ReadPDBfileAsPureCubicalComplex(file,4);;
F:=ThickeningFiltration(K,20);;
P:=PersistentBettiNumbers(F,1);;
BarCodeCompactDisplay(P);

[ Dauer der Verarbeitung: 0.13 Sekunden  (vorverarbeitet)  ]