read `GeometryMiracles.txt`:


K:=100:

r:=9:

P:=RanLiPrat(4,40): 
print(`If the four points are`):
lprint(P):
print(`Here are`, K, `creatures of generation`, r):

lprint(RanObjsF4(P,r,100,K));

quit: