reserve a,b,i,k,m,n for Nat;
reserve s,z for non zero Nat;
reserve r for Real;
reserve c for Complex;
reserve e1,e2,e3,e4,e5 for ExtReal;
reserve p for Prime;

theorem
  p*p <= k < 961 implies
  p = 2 or p = 3 or p = 5 or p = 7 or p = 11 or p = 13 or p = 17 or p = 19
  or p = 23 or p = 29
  proof
    assume p*p <= k < 961;
    then p*p < 31*31 by XXREAL_0:2;
    hence thesis by Th19,NAT_4:1;
  end;
