reserve p,q for Rational;
reserve g,m,m1,m2,n,n1,n2 for Nat;
reserve i,i1,i2,j,j1,j2 for Integer;

theorem
  m divides i implies i div m divides i
  proof
    assume
A1: m divides i;
    per cases;
    suppose
A2:   m <> 0;
      take m;
      i div m = i/m by A1,Th6;
      hence thesis by A2,XCMPLX_1:87;
    end;
    suppose m = 0;
      hence thesis by A1;
    end;
  end;
