`dp_ptozp', `dp_prim'
---------------------

dp_ptozp(DPOLY)
     :: Converts a distributed polynomial POLY with rational
     coefficients into an integral distributed polynomial such that GCD
     of all its coefficients is 1.

dp_prim(DPOLY)
     :: Converts a distributed polynomial POLY with rational function
     coefficients into an integral distributed polynomial such that
     polynomial GCD of all its coefficients is 1.

RETURN
     distributed polynomial

DPOLY
     distributed polynomial

   * `dp_ptozp()' executes the same operation as `ptozp()' for a
     distributed polynomial. If the coefficients include polynomials,
     polynomial contents included in the coefficients are not removed.

   * `dp_prim()' removes polynomial contents.

     [208] X=dp_ptod(3*(x-y)*(y-z)*(z-x),[x]);
     (-3*y+3*z)*<<2>>+(3*y^2-3*z^2)*<<1>>+(-3*z*y^2+3*z^2*y)*<<0>>
     [209] dp_ptozp(X);
     (-y+z)*<<2>>+(y^2-z^2)*<<1>>+(-z*y^2+z^2*y)*<<0>>
     [210] dp_prim(X);
     (1)*<<2>>+(-y-z)*<<1>>+(z*y)*<<0>>

References
     *Note `ptozp': ptozp.

