file:=HapFile("data253.txt");
Read(file);
G:=SymmetricMatrixToFilteredGraph(D,30);;
K:=FilteredRegularCWComplex(CliqueComplex(G,2));;
Y:=FiltrationTerm(K,21);; #n=21 found from barcodes
Display(HomotopyGraph(Y));
