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 Th94: for a be positive Nat holds
  b,c are_coprime & a+1 divides b implies not a+1 divides c
  proof
    let a be positive Nat;
    assume
    A1: b,c are_coprime & a+1 divides b;
    A2: a+1 > 0+1 by XREAL_1:6;
    assume not thesis;
    hence contradiction by A1,A2,PYTHTRIP:def 1;
  end;
