 reserve n,i,k,m for Nat;
 reserve p for Prime;

theorem Krzys1:
  for n being Nat holds
    indexp n <= n
  proof
    let n be Nat;
    card SetPrimes n <= card Seg n by NAT_1:43,XBOOLE_1:17;
    hence thesis;
  end;
