Lines Matching defs:er
61 int something_wrong (mp_limb_t er, mp_limb_t ec, mp_limb_t es)
63 fprintf (stderr, "root = %lu , rem = {%lu , %lu}\n", (long unsigned) es,(long unsigned) ec,(long unsigned) er);
70 mp_limb_t es, mer, er, s[1], r[2], q[2];
79 er=0;
85 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
86 || UNLIKELY ((x == 1) && (er != *r)))
87 STOP (something_wrong (er, 0, es));
89 if (UNLIKELY (er == mer)) {
94 er = 0;
96 ++er;
106 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
107 || UNLIKELY ((x == 1) && (er != *r)))
108 STOP (something_wrong (er, 0, es));
110 if (UNLIKELY (er == mer)) {
117 er = 0;
119 ++er;
155 mp_limb_t es, her, er, k, s[1], r[2], q[2];
164 er = 0;
171 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
172 || UNLIKELY ((x == 1) && (er != *r)))
173 STOP (something_wrong (er, 0, es));
179 er = upd (&es, k + er);
182 er = upd1 (&es, er);
198 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
199 || UNLIKELY ((x == 1) && (er != *r)))
200 STOP (something_wrong (er, 0, es));
209 /* er = er + GMP_NUMB_MAX - 1 - es*2 // postponed */
211 /* er = er + GMP_NUMB_MAX - 1 - 2*(es-1) =
212 = er +(GMP_NUMB_MAX + 1)- 2* es = er - 2*es */
213 er = upd (&es, er - 2 * es);
217 er = upd1 (&es, er);
222 er = GMP_NUMB_MAX; her = 0;
227 if (UNLIKELY (x != (her?2:(er != 0))) || UNLIKELY (*s != es)
228 || UNLIKELY ((x != 0) && ((er != *r) || ((x == 2) && (r[1] != 1)))))
229 STOP (something_wrong (er, her, es));
239 er = er - 2 * es;
241 her = --er != GMP_NUMB_MAX;
242 if (her & (er > es * 2)) {
243 er -= es * 2 + 1;
251 if ((her == 0) | (er < es * 2)) {
252 her += ++er == 0;
254 er -= es * 2;
267 mp_limb_t es, er, s[1], r[2], q[2];
276 er = 0;
281 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
282 || UNLIKELY ((x == 1) && (er != *r)))
283 STOP (something_wrong (er, 0, es));
285 if (er != 0) {
289 er = 0;
292 er = es * 2;
293 *q += er;
311 if (UNLIKELY (x != (er != 0)) || UNLIKELY (*s != es)
312 || UNLIKELY ((x == 1) && (er != *r)))
313 STOP (something_wrong (er, 0, es));
315 if (er != 0) {
319 er = 0;
324 er = es * 2;
325 add_ssaaaa (q[1], *q, q[1], *q, 0, er);
341 if (UNLIKELY (x != (er != 0) * 2) || UNLIKELY (*s != es)
342 || UNLIKELY ((x == 2) && ((er != *r) || (r[1] != 1))))
343 STOP (something_wrong (er, er != 0, es));
345 if (er != 0) {
351 er = 0;
354 er = es * 2;
355 add_ssaaaa (q[1], *q, q[1], *q, 1, er);