tests/mpz/reuse.c

215   mpz_t ref1, ref2, ref3;
232   mpz_init (ref1);
294 	  (dss[i].fptr) (ref1, in1, in2);
295 	  MPZ_CHECK_FORMAT (ref1);
300 	  if (mpz_cmp (ref1, res1) != 0)
306 	  if (mpz_cmp (ref1, res1) != 0)
315 	  (ddss_div[i].fptr) (ref1, ref2, in1, in2);
316 	  MPZ_CHECK_FORMAT (ref1);
324 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
332 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
340 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
348 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
357 	  (ds[i].fptr) (ref1, in1);
358 	  MPZ_CHECK_FORMAT (ref1);
363 	  if (mpz_cmp (ref1, res1) != 0)
374 	  (dsi[i].fptr) (ref1, in1, in2i);
375 	  MPZ_CHECK_FORMAT (ref1);
380 	  if (mpz_cmp (ref1, res1) != 0)
388 	      r1 = (dsi_div[i].fptr) (ref1, in1, in2i);
389 	      MPZ_CHECK_FORMAT (ref1);
394 	      if (mpz_cmp (ref1, res1) != 0 || r1 != r2)
400 	      r1 = (ddsi_div[i].fptr) (ref1, ref2, in1, in2i);
401 	      MPZ_CHECK_FORMAT (ref1);
407 	      if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0 || r1 != r2)
414 	      if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0 || r1 != r2)
421 	  mpz_sqrtrem (ref1, ref2, in1);
422 	  MPZ_CHECK_FORMAT (ref1);
429 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
436 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
448 	  mpz_root (ref1, in1, in2i % 0x100 + 1);
449 	  MPZ_CHECK_FORMAT (ref1);
454 	  if (mpz_cmp (ref1, res1) != 0)
460 	  mpz_rootrem (ref1, ref2, in1, in2i % 0x100 + 1);
461 	  MPZ_CHECK_FORMAT (ref1);
468 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
475 	  if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)
481 	  mpz_gcdext (ref1, ref2, ref3, in1, in2);
482 	  MPZ_CHECK_FORMAT (ref1);
491 	    if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0	\
499 	    if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)	\
581 	  mpz_abs (ref1, in1);
590 	    if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0	\
598 	    if (mpz_cmp (ref1, res1) != 0 || mpz_cmp (ref2, res2) != 0)	\
633 	  mpz_powm (ref1, in1, in2, in3);
634 	  MPZ_CHECK_FORMAT (ref1);
639 	  if (mpz_cmp (ref1, res1) != 0)
645 	  if (mpz_cmp (ref1, res1) != 0)
651 	  if (mpz_cmp (ref1, res1) != 0)
658 	  mpz_powm_ui (ref1, in1, in2i, in3);
659 	  MPZ_CHECK_FORMAT (ref1);
664 	  if (mpz_cmp (ref1, res1) != 0)
670 	  if (mpz_cmp (ref1, res1) != 0)
675 	r1 = mpz_gcd_ui (ref1, in1, in2i);
676 	MPZ_CHECK_FORMAT (ref1);
681 	if (mpz_cmp (ref1, res1) != 0)
689 	  refretval = mpz_remove (ref1, in1, in2);
690 	  MPZ_CHECK_FORMAT (ref1);
695 	  if (mpz_cmp (ref1, res1) != 0 || refretval != retval)
701 	  if (mpz_cmp (ref1, res1) != 0 || refretval != retval)
709 	  mpz_divexact (ref1, t, in2);
710 	  MPZ_CHECK_FORMAT (ref1);
715 	  if (mpz_cmp (ref1, res1) != 0)
721 	  if (mpz_cmp (ref1, res1) != 0)
729 	  mpz_divexact_gcd (ref1, t, in2);
730 	  MPZ_CHECK_FORMAT (ref1);
735 	  if (mpz_cmp (ref1, res1) != 0)
741 	  if (mpz_cmp (ref1, res1) != 0)
753   mpz_clear (ref1);