reserve n,m for Nat;
reserve p,q,r for Element of Nat_Lattice;
reserve p,q,r for Element of Nat_Lattice;
reserve m,n for NatPlus;
reserve p,q for Element of NatPlus_Lattice;

theorem
  p"/\"q = @p gcd @q;
