read `GJpats.txt`:

R:=10:

for r from 3 to 10 do
 IncStory(r,m,R,t):
print(`-----------------------------------`):
od:

quit: