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
  b,c are_coprime & b|^2 + c|^2 = a|^2 implies not 3 divides a
  proof
    b,c are_coprime & b|^2 + c|^2 = a|^2 implies
      not 3 divides a|^(1+1) by Th95;
    hence thesis by Th96,PEPIN:41;
  end;
