Return to level0.h CVS log | Up to [local] / OpenXM_contrib / pari-2.2 / src / kernel / none |
version 1.1, 2001/10/02 11:17:08 | version 1.2, 2002/09/11 07:27:00 | ||
---|---|---|---|
|
|
||
if (aux1 > hiremainder) {q2--; hiremainder += v1; aux -= v2; goto again2;} | if (aux1 > hiremainder) {q2--; hiremainder += v1; aux -= v2; goto again2;} | ||
hiremainder = GLUE(hiremainder - aux1, LOWWORD(u4 - aux2)) >> k; | hiremainder = GLUE(hiremainder - aux1, LOWWORD(u4 - aux2)) >> k; | ||
return GLUE(q1, q2); | return GLUE(q1, q2); | ||
#undef GLUE | |||
#undef SPLIT | |||
} | } | ||
#endif | #endif |