`ptozp'
-------

ptozp(POLY)
     :: POLY L{ĐWɂ.

RETURN
     
POLY
     

   * ^ꂽ POLY ɓKȗL|, WW 
     GCD  1 ɂȂ悤ɂ.
   * ̎lZ, ̉ZɔrĒx, X̑Z
     ̑O, 𐮐WɂĂƂ]܂.
   * L񕪂 `red()' ŕWL񕪂Ă, q
     ̌W͗L̂܂܂ł, L̕q߂`nm()' ł, 
     W, Ŵ܂܂̌`ŏo͂邽, ɐW
     𓾂鎖͏oȂ.

     [0] ptozp(2*x+5/3);
     6*x+5
     [1] nm(2*x+5/3);   
     2*x+5/3

Q
     `nm', `dn'

