Return to ndbf.rr CVS log | Up to [local] / OpenXM / src / asir-contrib / testing / noro |
version 1.4, 2009/10/13 02:39:44 | version 1.5, 2009/10/16 02:57:26 | ||
---|---|---|---|
|
|
||
CR = conv_tdt(R,F,V0,DV0,T,DT); | CR = conv_tdt(R,F,V0,DV0,T,DT); | ||
dp_set_weight(0); | dp_set_weight(0); | ||
return [LB,Ax,CR]; | Cont = cont(CR); | ||
Gcd = igcd(Den,Cont); | |||
return [LB,(Den/Gcd)*Ax,CR/Gcd]; | |||
} | } | ||
/* t^(l+k)*dt^l (k>l) -> (s-k)(s-k-1)...(s-(k+l-1))t^k */ | /* t^(l+k)*dt^l (k>l) -> (s-k)(s-k-1)...(s-(k+l-1))t^k */ |