reserve a,b,c,d,m,x,n,j,k,l for Nat,
  t,u,v,z for Integer,
  f,F for FinSequence of NAT;
reserve p,q,r,s for real number;
reserve a,b,c,d,m,x,n,k,l for Nat,
  t,z for Integer,
  f,F,G for FinSequence of REAL;
reserve q,r,s for real number;
reserve D for set;

theorem
  not 3 divides b|^3 + b|^2 - b + 1
  proof
    A0: (b|^2 + 1) + (b|^3 - b) = b|^3 + b|^2 - b + 1;
    not 3 divides b|^2 + 1 by Th92;
    hence thesis by A0,PEPIN:41,Th58,INT_2:1;
  end;
