read `PRIMESk.txt`: Story4a(isprime,0,1200,4,6,100); quit: