Lines Matching refs:RETVAL
971 RETVAL = gmp_version;
973 RETVAL
982 RETVAL = 1;
988 RETVAL = (u <= LONG_MAX);
995 RETVAL = (d >= (double) LONG_MIN && d < LONG_MAX_P1_AS_DOUBLE);
1004 RETVAL = x_mpq_fits_slong_p (tmp_mpq_0);
1011 RETVAL = mpf_fits_slong_p (tmp_mpf_0->m);
1017 RETVAL = mpz_fits_slong_p (SvMPZ(sv)->m);
1021 RETVAL = x_mpq_fits_slong_p (SvMPQ(sv)->m);
1025 RETVAL = mpf_fits_slong_p (SvMPF(sv));
1032 RETVAL
1041 RETVAL = (double) SvIVX(sv);
1045 RETVAL = (double) SvUVX(sv);
1049 RETVAL = SvNVX(sv);
1055 RETVAL = atof(SvPV(sv, len));
1060 RETVAL = mpz_get_d (SvMPZ(sv)->m);
1064 RETVAL = mpq_get_d (SvMPQ(sv)->m);
1068 RETVAL = mpf_get_d (SvMPF(sv));
1075 RETVAL
1138 RETVAL = SvIVX(sv);
1142 RETVAL = SvUVX(sv);
1146 RETVAL = (long) SvNVX(sv);
1150 RETVAL = SvIV(sv);
1154 RETVAL = mpz_get_si (SvMPZ(sv)->m);
1159 RETVAL = mpz_get_si (tmp_mpz_0);
1163 RETVAL = mpf_get_si (SvMPF(sv));
1170 RETVAL
1286 RETVAL = 1;
1290 RETVAL = double_integer_p (SvNVX(sv));
1300 RETVAL = x_mpq_integer_p (tmp_mpq_0);
1306 RETVAL = mpf_integer_p (tmp_mpf_0->m);
1314 RETVAL = 1;
1318 RETVAL = x_mpq_integer_p (SvMPQ(sv)->m);
1322 RETVAL = mpf_integer_p (SvMPF(sv));
1329 RETVAL
1338 RETVAL = SGN (SvIVX(sv));
1342 RETVAL = (SvUVX(sv) > 0);
1346 RETVAL = SGN (SvNVX(sv));
1356 RETVAL = mpq_sgn (tmp_mpq_0);
1362 RETVAL = mpf_sgn (tmp_mpf_0->m);
1370 RETVAL = mpz_sgn (SvMPZ(sv)->m);
1374 RETVAL = mpq_sgn (SvMPQ(sv)->m);
1378 RETVAL = mpf_sgn (SvMPF(sv));
1385 RETVAL
1422 gmp_asprintf (&RETVAL, fmt, SvMPZ(sv));
1424 TRACE (printf (" result |%s|\n", RETVAL));
1426 RETVAL
1442 RETVAL = new_mpz();
1446 mpz_set_ui (RETVAL->m, 0L);
1454 mpz_set_si (RETVAL->m, SvIVX(sv));
1458 mpz_set_ui (RETVAL->m, SvUVX(sv));
1462 mpz_set_d (RETVAL->m, SvNVX(sv));
1466 my_mpz_set_svstr (RETVAL->m, sv);
1470 mpz_set (RETVAL->m, SvMPZ(sv)->m);
1474 mpz_set_q (RETVAL->m, SvMPQ(sv)->m);
1478 mpz_set_f (RETVAL->m, SvMPF(sv));
1491 RETVAL
1521 RETVAL = new_mpz();
1522 mpz_set (RETVAL->m, z->m);
1524 RETVAL
1542 RETVAL = mpz_get_str (NULL, 10, z->m);
1544 RETVAL
1577 RETVAL = new_mpz();
1578 (*table[ix].op) (RETVAL->m,
1582 RETVAL
1637 RETVAL = new_mpz();
1638 (*table[ix].op) (RETVAL->m, coerce_mpz (RETVAL->m, zv), coerce_ulong (nv));
1640 RETVAL
1685 RETVAL = new_mpz();
1686 (*table[ix].op) (RETVAL->m, z->m);
1688 RETVAL
1722 RETVAL = mpz_cmp_si (x->m, SvIVX(yv));
1725 RETVAL = mpz_cmp_ui (x->m, SvUVX(yv));
1728 RETVAL = mpz_cmp (x->m, coerce_mpz (tmp_mpz_0, yv));
1731 RETVAL = mpz_cmp_d (x->m, SvNVX(yv));
1734 RETVAL = mpz_cmp (x->m, SvMPZ(yv)->m);
1737 RETVAL = x_mpz_cmp_q (x->m, SvMPQ(yv)->m);
1740 RETVAL = x_mpz_cmp_f (x->m, SvMPF(yv));
1745 RETVAL = SGN (RETVAL);
1747 RETVAL = -RETVAL;
1749 RETVAL
1760 RETVAL = (mpz_sgn (z->m) != 0) ^ ix;
1762 RETVAL
1781 RETVAL = new_mpz();
1782 (*table[ix].op) (RETVAL->m, n, k);
1784 RETVAL
1848 RETVAL = mpz_congruent_p (a, c, d);
1850 RETVAL
1860 RETVAL = mpz_congruent_2exp_p (a, c, d);
1862 RETVAL
1880 RETVAL = new_mpz();
1881 (*table[ix].op) (RETVAL->m, a, d);
1883 RETVAL
1891 RETVAL = mpz_divisible_p (a, d);
1893 RETVAL
1901 RETVAL = mpz_divisible_2exp_p (a, d);
1903 RETVAL
1924 RETVAL = (*table[ix].op) (z);
1926 RETVAL
1945 RETVAL = new_mpz();
1946 (*table[ix].op) (RETVAL->m, n);
1948 RETVAL
1993 RETVAL = new_mpz();
1995 mpz_set (RETVAL->m, x);
2002 (*table[ix].op_ui) (RETVAL->m, x, ABS(SvIVX(yv)));
2004 (*table[ix].op) (RETVAL->m, x, coerce_mpz (tmp_mpz_1, yv));
2005 x = RETVAL->m;
2009 RETVAL
2035 RETVAL = mpz_hamdist (x, y);
2037 RETVAL
2045 RETVAL = new_mpz();
2046 if (! mpz_invert (RETVAL->m, a, m))
2048 free_mpz (RETVAL);
2052 RETVAL
2060 RETVAL = mpz_jacobi (a, b);
2062 RETVAL
2071 RETVAL = mpz_kronecker_si (coerce_mpz(tmp_mpz_0,a), SvIVX(b));
2073 RETVAL = mpz_si_kronecker (SvIVX(a), coerce_mpz(tmp_mpz_0,b));
2075 RETVAL = mpz_kronecker (coerce_mpz(tmp_mpz_0,a),
2078 RETVAL
2120 RETVAL = new_mpz();
2121 mpz_import (RETVAL->m, count, order, size, endian, nails, data);
2123 RETVAL
2130 RETVAL = new_mpz();
2131 mpz_nextprime (RETVAL->m, z);
2133 RETVAL
2140 RETVAL = mpz_popcount (x);
2142 RETVAL
2151 RETVAL = new_mpz();
2152 mpz_powm (RETVAL->m, b, e, m);
2154 RETVAL
2162 RETVAL = mpz_probab_prime_p (z, n);
2164 RETVAL
2255 RETVAL = (*table[ix].op) (z, start);
2257 RETVAL &= 0xFFFFFFFF;
2259 RETVAL
2324 RETVAL = mpz_sizeinbase (z, base);
2326 RETVAL
2334 RETVAL = mpz_tstbit (z, bit);
2336 RETVAL
2351 RETVAL = new_mpq();
2354 mpq_set_ui (RETVAL->m, 0L, 1L);
2358 mpq_ptr rp = RETVAL->m;
2367 rp = mpq_numref (RETVAL->m);
2371 rp = mpq_denref (RETVAL->m);
2381 RETVAL
2408 RETVAL = new_mpq();
2409 mpq_set (RETVAL->m, q->m);
2411 RETVAL
2429 RETVAL = mpq_get_str (NULL, 10, q->m);
2431 RETVAL
2457 RETVAL = new_mpq();
2458 (*table[ix].op) (RETVAL->m,
2462 RETVAL
2509 RETVAL = new_mpq();
2510 (*table[ix].op) (RETVAL->m, coerce_mpq (RETVAL->m, qv), coerce_ulong (nv));
2512 RETVAL
2572 RETVAL = new_mpq();
2573 (*table[ix].op) (RETVAL->m, q->m);
2575 RETVAL
2584 RETVAL = mpq_cmp (x->m, y);
2585 RETVAL = SGN (RETVAL);
2587 RETVAL = -RETVAL;
2589 RETVAL
2600 RETVAL = (mpq_sgn (q->m) != 0) ^ ix;
2602 RETVAL
2620 RETVAL = 0;
2625 RETVAL = (mpz_cmp_si (mpq_numref(x->m), SvIVX(yv)) == 0);
2628 RETVAL = (mpz_cmp_ui (mpq_numref(x->m), SvUVX(yv)) == 0);
2631 RETVAL = (mpz_cmp (mpq_numref(x->m), SvMPZ(yv)->m) == 0);
2638 RETVAL = (mpq_equal (x->m, SvMPQ(yv)->m) != 0);
2642 RETVAL = (mpq_equal (x->m, coerce_mpq_using (tmp_mpq_0, yv, use)) != 0);
2645 RETVAL ^= ix;
2647 RETVAL
2661 RETVAL = new_mpq();
2662 mpq_inv (RETVAL->m, q);
2664 RETVAL
2673 RETVAL = new_mpz();
2674 mpz_set (RETVAL->m, (ix == 0 ? mpq_numref(q->m) : mpq_denref(q->m)));
2676 RETVAL
2696 RETVAL = new_mpf (prec);
2700 my_mpf_set_sv_using (RETVAL, sv, use_sv(sv));
2703 RETVAL
2714 RETVAL = new_mpf (mpf_get_default_prec());
2715 my_mpf_set_svstr (RETVAL, sv);
2717 RETVAL
2727 RETVAL = new_mpf (mpf_get_prec (f));
2728 mpf_set (RETVAL, f);
2730 RETVAL
2764 RETVAL = new_mpf (mpf_get_prec (x));
2767 (*table[ix].op) (RETVAL, x, y);
2769 RETVAL
2821 RETVAL = new_mpf (prec);
2822 (*table[ix].op) (RETVAL, f, coerce_ulong (nv));
2824 RETVAL
2867 RETVAL = new_mpf (mpf_get_prec (f));
2868 (*table[ix].op) (RETVAL, f);
2870 RETVAL
2903 RETVAL = mpf_cmp_si (x, SvIVX(yv));
2906 RETVAL = mpf_cmp_ui (x, SvUVX(yv));
2909 RETVAL = mpf_cmp_d (x, SvNVX(yv));
2919 RETVAL = mpf_cmp (x, tmp_mpf_0->m);
2923 RETVAL = - x_mpz_cmp_f (SvMPZ(yv)->m, x);
2926 RETVAL = mpf_cmp (x, SvMPF(yv));
2929 RETVAL = mpq_cmp (coerce_mpq (tmp_mpq_0, xv),
2933 RETVAL = SGN (RETVAL);
2935 RETVAL = -RETVAL;
2937 RETVAL
2948 RETVAL = (mpf_sgn (f) != 0) ^ ix;
2950 RETVAL
2969 RETVAL = new_mpf (mpf_get_prec (f));
2970 (*table[ix].op) (RETVAL, f);
2972 RETVAL
2978 RETVAL = mpf_get_default_prec();
2980 RETVAL
2987 RETVAL = mpf_get_prec (f);
2989 RETVAL
3002 RETVAL = mpf_eq (x, y, bits);
3004 RETVAL
3017 RETVAL = new_mpf (prec);
3018 mpf_reldiff (RETVAL, x, y);
3020 RETVAL
3075 New (GMP_MALLOC_ID, RETVAL, 1, __gmp_randstate_struct);
3076 TRACE (printf (" RETVAL %p\n", RETVAL));
3082 gmp_randinit_default (RETVAL);
3090 gmp_randinit_set (RETVAL, SvRANDSTATE (ST(0)));
3101 gmp_randinit_lc_2exp (RETVAL,
3110 if (! gmp_randinit_lc_2exp_size (RETVAL, coerce_ulong (ST(1))))
3112 Safefree (RETVAL);
3120 gmp_randinit_mt (RETVAL);
3130 RETVAL
3167 RETVAL = new_mpz();
3168 (*table[ix].fun) (RETVAL->m, r, bits);
3170 RETVAL
3178 RETVAL = new_mpz();
3179 mpz_urandomm (RETVAL->m, r, m);
3181 RETVAL
3189 RETVAL = new_mpf (bits);
3190 mpf_urandomb (RETVAL, r, bits);
3192 RETVAL
3210 RETVAL = (*table[ix].fun) (r, bits);
3212 RETVAL
Indexes created Sat Feb 28 05:31:39 UTC 2026