reserve k for Nat;
reserve p for Prime;

theorem 
  p*p <= k < 9 implies p = 2
  proof
    assume p*p <= k < 9;
    then p*p < 3*3 by XXREAL_0:2;
    hence thesis by Th1,NAT_4:1;
  end;
