theorem
  m gcd 1 = 1
proof
  set M = m gcd 1;
A1: 1 divides M by NAT_D:6;
  M divides 1 by NAT_D:def 5;
  hence thesis by A1,NAT_D:5;
end;
