Read("symmetricMatrix.txt");
e:=0;;Display(SymmetricMatrixToGraph(D,e));
e:=5;;Display(SymmetricMatrixToGraph(D,e));
e:=10;;Display(SymmetricMatrixToGraph(D,e));
e:=15;;Display(SymmetricMatrixToGraph(D,e));
e:=20;;Display(SymmetricMatrixToGraph(D,e));
e:=25;;Display(SymmetricMatrixToGraph(D,e));
e:=30;;Display(SymmetricMatrixToGraph(D,e));
e:=35;;Display(SymmetricMatrixToGraph(D,e));
e:=40;;Display(SymmetricMatrixToGraph(D,e));
e:=45;;Display(SymmetricMatrixToGraph(D,e));
e:=50;;Display(SymmetricMatrixToGraph(D,e));
e:=55;;Display(SymmetricMatrixToGraph(D,e));


G:=SymmetricMatrixToFilteredGraph(D,30,60);;
K:=FilteredRegularCWComplex(CliqueComplex(G,1));;
BarCodeCompactDisplay(PersistentBettiNumbers(K,0));;






