read `HIT2.txt`:

Story1(n->type(simplify(n^(1/2)),integer),2,10^(-6),1000,4,10);

quit: