`dp_dtop'
---------

dp_dtop(DPOLY,VLIST)
     :: $BJ,;6I=8=B?9`<0$rB?9`<0$KJQ49$9$k(B.

RETURN
     $BB?9`<0(B

DPOLY
     $BJ,;6I=8=B?9`<0(B

VLIST
     $B%j%9%H(B

   * $BJ,;6I=8=B?9`<0$r(B, $BM?$($i$l$?ITDj85%j%9%H$rMQ$$$FB?9`<0$KJQ49$9$k(B.

   * $BITDj85%j%9%H$O(B,
     $BD9$5J,;6I=8=B?9`<0$NJQ?t$N8D?t$H0lCW$7$F$$$l$P2?$G$b$h$$(B.

     [53] T=dp_ptod((x+y+z)^2,[x,y]);
     (1)*<<2,0>>+(2)*<<1,1>>+(1)*<<0,2>>+(2*z)*<<1,0>>+(2*z)*<<0,1>>+(z^2)*<<0,0>>
     [54] P=dp_dtop(T,[a,b]);
     z^2+(2*a+2*b)*z+a^2+2*b*a+b^2

