/dports/math/pari/pari-2.13.3/src/kernel/none/ |
H A D | level1.h | 103 set_avma(ulong av) { avma = av; } in set_avma() function 114 gc_int(pari_sp av, int s) { set_avma(av); return s; } in gc_int() 116 gc_NULL(pari_sp av) { set_avma(av); return NULL; } in gc_NULL() 127 set_avma((pari_sp)z); in new_chunk() 475 av=avma; z = itor(x, realprec(y)); set_avma(av); in cmpir() 899 set_avma(av); return z; in rdivis() 907 set_avma(av); return z; in rdivsi() 915 set_avma(av); return z; in rdivss() 938 set_avma((ulong)z); in rdiviiz() 986 set_avma(av); if (r) return 0; in dvdisz() [all …]
|
H A D | gcd.c | 59 set_avma(av); in gcd_plus_minus() 89 if (!signe(t)) { set_avma(av); return absi(b); } in gcdii_basecase() 97 case 0: set_avma(av); a = shifti(a,v); return a; in gcdii_basecase() 100 if (is_pm1(b)) { set_avma(av); return int2n(v); } in gcdii_basecase() 111 if (is_pm1(t)) { set_avma(av); return int2n(v); } in gcdii_basecase() 116 case 0: set_avma(av); b = shifti(b,v); return b; in gcdii_basecase() 122 set_avma(av); return shifti(r,v); in gcdii_basecase()
|
H A D | invmod.c | 55 set_avma(av); in invmod_pari() 117 if (g != 1UL) { set_avma(av); *res = utoipos(g); return 0; } in invmod_pari() 127 set_avma(av); *res = modii(v,b); return 1; in invmod_pari() 130 set_avma(av); in invmod_pari()
|
H A D | ratlift.c | 176 set_avma(av); in Fp_ratlift() 184 set_avma(av); in Fp_ratlift() 202 set_avma(av); in Fp_ratlift() 257 set_avma(av); in Fp_ratlift() 265 set_avma(av); in Fp_ratlift()
|
H A D | mp_indep.c | 262 set_avma(av); return; in sqrz_i() 318 set_avma(av); in mulrrz_int() 446 set_avma(av); return z; in mulir() 462 set_avma(av); return addii(t,x); in addmulii_gen() 487 set_avma(av); return addii(x,t); in addmulii_lg3() 570 set_avma(av); return z; in divir() 589 set_avma(av); return z; in divur() 609 set_avma(av); return z; in divsr() 620 set_avma(av); return z; in invr_basecase() 649 set_avma((pari_sp)a); in invr() [all …]
|
/dports/math/pari/pari-2.13.3/src/kernel/gmp/ |
H A D | gcd.c | 48 if (!signe(t)) { set_avma(av); return absi(b); } in gcdii() 56 case 0: set_avma(av); a=shifti(a,v); return a; in gcdii() 59 if (is_pm1(b)) { set_avma(av); return int2n(v); } in gcdii() 71 set_avma(av); in gcdii()
|
H A D | gcdext.c | 34 if (!sa) { set_avma(av); *res = absi(b); return 0; } in invmod() 52 if (!is_pm1(d)) {set_avma(av); *res=icopy(d); return 0;} in invmod() 56 set_avma(av); *res=icopy(u); return 1; in invmod() 163 set_avma(av); in bezout()
|
/dports/math/pari/pari-2.13.3/src/mt/ |
H A D | mpi.c | 74 pari_free(buf); set_avma(av); in send_GEN() 216 set_avma(av); in pari_MPI_child() 239 set_avma(ltop); in pari_MPI_child() 244 set_avma(av); in pari_MPI_child() 255 set_avma(av); in pari_MPI_child() 263 set_avma(av); in pari_MPI_child() 318 set_avma(av); in mt_export_add() 333 set_avma(av); in mt_export_del()
|
/dports/math/pari/pari-2.13.3/src/basemath/ |
H A D | galconj.c | 310 set_avma(av2); in galoisborne() 337 set_avma(av); in initlift() 405 set_avma(ltop); in monoratlift() 576 set_avma(ltop2); in frobeniusliftall() 627 set_avma(av); in frobeniusliftall() 778 set_avma(avm); in testpermutation() 1423 set_avma(av2); in a4galoisgen() 1624 set_avma(av); in s4galoisgen() 1665 set_avma(av); in s4galoisgen() 2604 set_avma(av); in permtoaut() [all …]
|
H A D | bern.c | 95 gel(t,j) = z; set_avma(av2); in bernset() 110 set_avma(av2); k -= 2; in bernset() 120 set_avma(av2); in bernset() 157 set_avma(av); in constbern() 165 set_avma(av); in constbern() 177 set_avma(av); in constbern() 331 affrr(z, res); set_avma(av); return res; in inv_szeta_euler()
|
H A D | subcyclo.c | 70 set_avma(av); in znstar_partial_coset_bits_inplace() 213 set_avma(ltop); in znstar_cosets() 261 set_avma(ltop); return gen; in znstar_hnf_generators() 393 set_avma(av); /* HACK */ in polsubcyclo_orbits() 416 set_avma(av); in polsubcyclo_start() 457 set_avma(av); return modii(p1,l); in muliimod_sz() 606 set_avma(ltop); in galoissubcyclo() 654 set_avma(ltop); in galoissubcyclo() 666 set_avma(ltop); in galoissubcyclo() 736 set_avma(ltop); in polsubcyclo() [all …]
|
H A D | ifactor1.c | 105 set_avma(av); in nextprime() 182 set_avma(av); in precprime() 496 set_avma(av2); in elldouble() 760 set_avma(av2); in ECM_loop() 768 set_avma(av2); in ECM_loop() 986 set_avma(av1); in ECM_loop() 1394 set_avma(av); in squfof_ambig() 1950 set_avma(av); in is_357_power() 2000 set_avma(av); in is_kth_power() 3211 set_avma(av); in factoru_sign() [all …]
|
H A D | subgroup.c | 214 treatsub(T, (GEN)H); set_avma(av); in dogroup() 225 pari_sp av = avma; dogroup(T); set_avma(av); in loop() 244 if (!t) { treatsub(T, mkmat( zerocol(l) )); set_avma(av); return; } in dopsubtyp() 248 treatsub(T, p1); set_avma(av); return; in dopsubtyp() 270 loop(T, 1); set_avma(av); return; in dopsubtyp() 335 setlg(T->subqpart, k); set_avma(av); in dopsub() 442 set_avma(av); return; in subgroup_engine() 470 if (!is_pm1(B)) { set_avma(av); return; } in subgroup_engine() 508 set_avma(av); in subgroup_engine() 632 set_avma(av); in subgrouplist_i()
|
H A D | bb_group.c | 353 fixlg(v, l+1); set_avma((pari_sp)v); return v; in producttree_scheme() 509 if (grp->equal1(p1)) { set_avma(av); return stoi(i-1); } in gen_Shanks_log() 543 set_avma(av); return cgetg(1, t_VEC); /* no solution */ in gen_Shanks_log() 649 set_avma(av); return cgetg(1, t_VEC); in gen_PH_log() 780 if (--nbo == 1) { set_avma(ltop); return icopy(lastgood); } in gen_select_order() 786 set_avma(btop); in gen_select_order() 806 for (;; set_avma(av1)) in gen_lgener() 991 if (!F) {set_avma(av); return mkveccopy(N);} in gen_ellgroup() 1015 set_avma(av2); in gen_ellgroup() 1031 set_avma(av); in gen_ellgens() [all …]
|
H A D | volcano.c | 67 set_avma(av); in extend_path() 118 set_avma(btop); in ascend_volcano() 122 max_len++; set_avma(av); in ascend_volcano() 140 set_avma(av); in random_distinct_neighbours_of() 280 set_avma(av); in surface_path() 308 set_avma(av); if (W[w] == W0) return w; in surface_path() 392 set_avma(bv); if (j > h) break; in next_surface_nbr() 524 h10 = Flx_coeff(h1, 0); set_avma(av); in surface_gcd_cycle() 534 h20 = Flx_coeff(h2, 0); set_avma(av); in surface_gcd_cycle() 577 i++; j++; set_avma(av); in surface_gcd_path()
|
H A D | prime.c | 157 set_avma(av2); in millerrabin() 589 for(a = 2;; a++, set_avma(av)) in pl831() 1053 set_avma(av); return icopy(p); in prime() 1120 set_avma(av2); in randomprime() 1152 set_avma(av2); in randomprime0() 1278 set_avma(av); in gprimepi_upper_bound() 1295 set_avma(av); in gprimepi_lower_bound() 1314 set_avma((pari_sp)y); in primes() 1328 set_avma((pari_sp)y); return y; in primes_zv() 1365 set_avma(av); in primes_interval() [all …]
|
H A D | Qfb.c | 123 set_avma(av); in Qfb0() 656 set_avma(av); in redimagsl2() 669 set_avma(av); in redimagsl2() 702 set_avma(av); in redimag_1() 710 set_avma(av); in redimag_1() 759 set_avma(av); in redimag_av() 1330 { set_avma(av); return gen_0; } in qfbsolve_cornacchia() 1595 set_avma(av); in cornacchia() 1615 set_avma(av); in cornacchia2_helper() 1628 set_avma(av); in cornacchia2_helper() [all …]
|
H A D | bnfunits.c | 39 s = signe(x); set_avma(av); v = zerocol(RU); in bnfisunit() 43 if (!isint1(Q_denom(x))) { set_avma(av); return cgetg(1,t_COL); } in bnfisunit() 60 if (typ(logN) != t_REAL) { set_avma(av); return cgetg(1,t_COL); } /*no*/ in bnfisunit() 62 !is_pm1(nfnorm(nf, x))) { set_avma(av); return cgetg(1, t_COL); } in bnfisunit() 360 if (!z) { set_avma(av); return cgetg(1,t_COL); } in bnfisunit0() 383 if (!z) { set_avma(av); return cgetg(1,t_COL); } in bnfissunit()
|
H A D | arith2.c | 76 set_avma(av); in factoru_pow() 162 set_avma(av); 749 set_avma(av); return utoipos(e); in eulerphi() 1105 set_avma(av); in digits_dacsmall() 1127 set_avma(av); return Flv_to_ZV(z); in digits() 1131 set_avma(av); return binary_2k(x, k); in digits() 1147 set_avma(av); return Flv_to_ZV(z); in digits() 1277 set_avma(av); return utoipos(s); in sumdigits() 1312 set_avma(av); return utoi(zv_sum(z)); in sumdigits0() 1316 if (!signe(x)) { set_avma(av); return gen_0; } in sumdigits0() [all …]
|
/dports/math/pari/pari-2.13.3/src/modules/ |
H A D | galois.c | 298 set_avma(av); return f; in galopen() 766 set_avma(av); in moreprec() 1729 set_avma(av); if (!res) return 0; in galoismodulo9() 2402 set_avma(av); in galoisbig() 2498 set_avma(av); in polgalois() 2532 case 3: set_avma(av); in polgalois() 2570 set_avma(av); in polgalois() 2644 set_avma(av); in polgalois() 2656 set_avma(av); in polgalois() 2662 set_avma(av); in polgalois() [all …]
|
H A D | part.c | 70 set_avma(av); in L() 128 for (q = (ulong)(sqrt(gtodouble(n))*0.24 + 5); q >= 3; q--, set_avma(av)) in numbpart() 360 set_avma(av); in countpart() 387 set_avma(av); in forpart() 399 set_avma(av); in forpart0()
|
H A D | mpqs.c | 360 set_avma(av); in mpqs_create_FB() 511 set_avma(av); in check_root() 778 affii(b, B); set_avma(av); in mpqs_self_init() 874 set_avma(av); in mpqs_self_init() 1059 set_avma(av); in mpqs_check_rel() 1122 set_avma(av1); in combine_large_primes() 1293 set_avma(btop); in mpqs_eval_cand() 1298 set_avma(btop); in mpqs_eval_cand() 1426 if (is_pm1(D) || equalii(D,N)) { set_avma(av2); continue; } in mpqs_solve_linear_system() 1531 if (p) { set_avma(av); return utoipos(p); } in mpqs() [all …]
|
/dports/math/pari/pari-2.13.3/src/language/ |
H A D | compile.c | 281 set_avma(av); in getfunction() 696 set_avma(av); in ctxmvar() 952 set_avma(ltop); in compilevec() 989 set_avma(ltop); in compilemat() 1088 set_avma(ltop); in compilecall() 1788 set_avma(ltop); in compilefunc() 2066 set_avma(ltop); in closurefunc() 2078 set_avma(av); in compileseq() 2396 set_avma(ltop); in optimizevec() 2585 set_avma(av); in optimizecall() [all …]
|
/dports/math/pari/pari-2.13.3/src/headers/ |
H A D | pariinl.h | 1231 set_avma((pari_sp)q); in gerepileuptoleaf() 1269 set_avma(av); in gerepilecopy() 1273 set_avma((pari_sp)x); in gerepilecopy() 1293 set_avma(av); in gerepilemany() 1307 set_avma(av); in gerepileall() 1316 set_avma(av); in gerepileall() 1328 set_avma(av); in gerepilecoeffs() 1397 set_avma(av); in gtodouble() 1409 set_avma(av); in gisdouble() 1562 set_avma((pari_sp)(res+3)); in affc_fixlg() [all …]
|
/dports/math/pari/pari-2.13.3/src/gp/ |
H A D | gp.c | 349 set_avma(av = pari_mainstack->top); in gp_main_loop() 398 set_avma(av); in gp_main_loop() 419 set_avma(pari_mainstack->top); in read_main() 443 if (numerr == e_STACK) { evalstate_clone(); set_avma(pari_mainstack->top); } in break_loop() 465 set_avma(av); in break_loop()
|