read `TFP.txt`:

TFPstoryGFbi(p,6);

quit: