read GeometryMiracles: P:=GenLiPf(6,t,t,t^2): print(`A set of generic 6 points on the parabola is`): lprint(P): print(`The Pascal configuation leads to diffent circuits`): C1:=TtoC({{{1,5},{2,4}},{{1,6},{3,4}}}): C2:=TtoC({{{1,5},{2,4}},{{2,6},{3,5}}}): lprint(C1,C2): print(`yet thanks to Pascal, they begat the same line!`): print(`Here the detailed (different) genealogies that lead to the same (Pascal) line`): Ge(P,C1): Ge(P,C2): quit: