
theorem
  5651 is prime
proof
  now
    5651 = 2*2825 + 1; hence not 2 divides 5651 by NAT_4:9;
    5651 = 3*1883 + 2; hence not 3 divides 5651 by NAT_4:9;
    5651 = 5*1130 + 1; hence not 5 divides 5651 by NAT_4:9;
    5651 = 7*807 + 2; hence not 7 divides 5651 by NAT_4:9;
    5651 = 11*513 + 8; hence not 11 divides 5651 by NAT_4:9;
    5651 = 13*434 + 9; hence not 13 divides 5651 by NAT_4:9;
    5651 = 17*332 + 7; hence not 17 divides 5651 by NAT_4:9;
    5651 = 19*297 + 8; hence not 19 divides 5651 by NAT_4:9;
    5651 = 23*245 + 16; hence not 23 divides 5651 by NAT_4:9;
    5651 = 29*194 + 25; hence not 29 divides 5651 by NAT_4:9;
    5651 = 31*182 + 9; hence not 31 divides 5651 by NAT_4:9;
    5651 = 37*152 + 27; hence not 37 divides 5651 by NAT_4:9;
    5651 = 41*137 + 34; hence not 41 divides 5651 by NAT_4:9;
    5651 = 43*131 + 18; hence not 43 divides 5651 by NAT_4:9;
    5651 = 47*120 + 11; hence not 47 divides 5651 by NAT_4:9;
    5651 = 53*106 + 33; hence not 53 divides 5651 by NAT_4:9;
    5651 = 59*95 + 46; hence not 59 divides 5651 by NAT_4:9;
    5651 = 61*92 + 39; hence not 61 divides 5651 by NAT_4:9;
    5651 = 67*84 + 23; hence not 67 divides 5651 by NAT_4:9;
    5651 = 71*79 + 42; hence not 71 divides 5651 by NAT_4:9;
    5651 = 73*77 + 30; hence not 73 divides 5651 by NAT_4:9;
  end;
  then for n being Element of NAT st 1 < n & n*n <= 5651 & n is prime
  holds not n divides 5651 by XPRIMET1:42;
  hence thesis by NAT_4:14;
end;
