theorem Th76:
  m <> 0 implies i div (i gcd m) , m div (i gcd m) are_coprime by RING_3:14;
