theorem
  a lcm b is Element of NAT by ORDINAL1:def 12;
