`dp_hm', `dp_ht', `dp_hc', `dp_rest'
------------------------------------

dp_hm(DPOLY)
     :: $BF,C19`<0$r<h$j=P$9(B.

dp_ht(DPOLY)
     :: $BF,9`$r<h$j=P$9(B.

dp_hc(DPOLY)
     :: $BF,78?t$r<h$j=P$9(B.

dp_rest(DPOLY)
     :: $BF,C19`<0$r<h$j=|$$$?;D$j$rJV$9(B.

RETURN
     `dp_hm()', `dp_ht()', `dp_rest()' : $BJ,;6I=8=B?9`<0(B, `dp_hc()' :
     $B?t$^$?$OB?9`<0(B

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

   * $B$3$l$i$O(B, $BJ,;6I=8=B?9`<0$N3FItJ,$r<h$j=P$9$?$a$NH!?t$G$"$k(B.

   * $BJ,;6I=8=B?9`<0(B P $B$KBP$7<!$,@.$jN)$D(B.
    `P = dp_hm(P) + dp_rest(P)'

    `dp_hm(P) = dp_hc(P) dp_ht(P)'

     [87] dp_ord(0)$
     [88] X=ptozp((a46^2+7/10*a46+7/48)*u3^4-50/27*a46^2-35/27*a46-49/216)$
     [89] T=dp_ptod(X,[u3,u4,a46])$
     [90] dp_hm(T);
     (2160)*<<4,0,2>>
     [91] dp_ht(T);
     (1)*<<4,0,2>>
     [92] dp_hc(T);
     2160
     [93] dp_rest(T);
     (1512)*<<4,0,1>>+(315)*<<4,0,0>>+(-4000)*<<0,0,2>>+(-2800)*<<0,0,1>>
     +(-490)*<<0,0,0>>

