/dports/math/pari/pari-2.13.3/src/kernel/none/ |
H A D | halfgcd.c | 30 retmkmat2(mkcol2(addii(T1,T2), addii(M2,M4)), in ZM_mul2() 31 mkcol2(addii(M3,M5), addii(T3,T4))); in ZM_mul2() 37 retmkmat2(mkcol2(gen_1,gen_0), in matid2() 38 mkcol2(gen_0,gen_1)); in matid2() 48 gel(res,1) = mkcol2(u, v); in mulq() 72 gel(res,2) = mkcol2(u,v); in mulqi() 129 mkcol2(subii(gcoeff(Q,1,1), gcoeff(Q,1,2)) in mulT() 290 return gerepilecopy(av, mkvec2(ZM_inv2(Q),mkcol2(a,b))); in halfgcdii()
|
/dports/math/pari/pari-2.13.3/src/basemath/ |
H A D | qfsolve.c | 302 A = mkmat2(mkcol2(gcoeff(G3,1,1),gcoeff(G3,1,n)), in qflllgram_indefgoon() 303 mkcol2(gcoeff(G3,1,n),gcoeff(G3,2,2))); in qflllgram_indefgoon() 369 U2 = mkmat2(mkcol2(negi(u),negi(v)), mkcol2(negi(b),a)); in qflllgram_indefgoon2() 488 G = shallowmatconcat(mkmat2(mkcol2(A,B), in qfminimize() 489 mkcol2(shallowtrans(B), C))); in qfminimize() 518 sol = signe(a)? mkcol2(Fp_sub(Fp_sqrt(di,p), b, p), a): vec_ei(2,1); in qfminimize() 643 { return mkmat2(mkcol2(gen_1,gen_0),mkcol2(gen_0,shifti(negi(D),-2))); } in id() 788 if (!signe(v2)) return mkcol2(Fp_neg(b,p), a); in qfsolvemodp() 868 if (!signe(a)) return mkcol2(gen_1, gen_0); in qfsolve_i() 871 return mkcol2(subii(t,gcoeff(G,1,2)), a); in qfsolve_i() [all …]
|
H A D | FpXX.c | 544 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in FpXQX_halfgcd_basecase() 575 retmkmat2(mkcol2(FpXX_add(T1,T2, p), FpXX_add(M2,M4, p)), in FpXQXM_mul2() 576 mkcol2(FpXX_add(M3,M5, p), FpXX_add(T3,T4, p))); in FpXQXM_mul2() 584 gel(res,1) = mkcol2(gcoeff(M,2,1), u); in FpXQX_FpXQXM_qmul() 586 gel(res,2) = mkcol2(gcoeff(M,2,2), v); in FpXQX_FpXQXM_qmul() 593 retmkmat2(mkcol2(pol_1(v),pol_0(v)), in matid2_FpXQXM() 594 mkcol2(pol_0(v),pol_1(v))); in matid2_FpXQXM() 643 retmkmat2(mkcol2(pol_0(v),pol_1(v)), in FpXQX_halfgcd() 644 mkcol2(pol_1(v),pol_0(v))); in FpXQX_halfgcd()
|
H A D | F2x.c | 1009 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in F2x_halfgcd_i() 2534 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in F2xqX_halfgcd_basecase() 2565 retmkmat2(mkcol2(F2xX_add(T1,T2), F2xX_add(M2,M4)), in F2xqXM_mul2() 2566 mkcol2(F2xX_add(M3,M5), F2xX_add(T3,T4))); in F2xqXM_mul2() 2575 gel(res,1) = mkcol2(gcoeff(M,2,1), u); in F2xqX_F2xqXM_qmul() 2577 gel(res,2) = mkcol2(gcoeff(M,2,2), v); in F2xqX_F2xqXM_qmul() 2584 retmkmat2(mkcol2(pol1_F2xX(v, sv),pol_0(v)), in matid2_F2xXM() 2585 mkcol2(pol_0(v),pol1_F2xX(v, sv))); in matid2_F2xXM() 2624 retmkmat2(mkcol2(pol_0(v),pol1_F2xX(v,vT)), in F2xqX_halfgcd() 2625 mkcol2(pol1_F2xX(v,vT),pol_0(v))); in F2xqX_halfgcd()
|
H A D | bb_hnf.c | 141 mkcol2(gen_1,Fp_neg(x,(GEN)data)), in _Fp_extgcd() 142 mkcol2(gen_0,gen_1))); in _Fp_extgcd() 149 mkcol2(diviiexact(y,d),negi(diviiexact(x,d))), in _Fp_extgcd() 150 mkcol2(u,v)); in _Fp_extgcd() 448 C2 = gen_matmul_hermite(X, mkmat(mkcol2(gel(C,i),gel(C,j))), data, R); in gen_leftapply()
|
H A D | FlxX.c | 1096 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in FlxqX_halfgcd_basecase() 1127 retmkmat2(mkcol2(FlxX_add(T1,T2, p), FlxX_add(M2,M4, p)), in FlxqXM_mul2() 1128 mkcol2(FlxX_add(M3,M5, p), FlxX_add(T3,T4, p))); in FlxqXM_mul2() 1137 gel(res,1) = mkcol2(gcoeff(M,2,1), u); in FlxqX_FlxqXM_qmul() 1139 gel(res,2) = mkcol2(gcoeff(M,2,2), v); in FlxqX_FlxqXM_qmul() 1146 retmkmat2(mkcol2(pol1_FlxX(v, sv),pol_0(v)), in matid2_FlxXM() 1147 mkcol2(pol_0(v),pol1_FlxX(v, sv))); in matid2_FlxXM() 1187 retmkmat2(mkcol2(pol_0(v),pol1_FlxX(v,vT)), in FlxqX_halfgcd() 1188 mkcol2(pol1_FlxX(v,vT),pol_0(v))); in FlxqX_halfgcd()
|
H A D | FpX.c | 593 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in FpX_halfgcd_basecase() 624 retmkmat2(mkcol2(FpX_add(T1,T2, p), FpX_add(M2,M4, p)), in FpXM_mul2() 625 mkcol2(FpX_add(M3,M5, p), FpX_add(T3,T4, p))); in FpXM_mul2() 634 gel(res,1) = mkcol2(gcoeff(M,2,1), u); in FpX_FpXM_qmul() 636 gel(res,2) = mkcol2(gcoeff(M,2,2), v); in FpX_FpXM_qmul() 643 retmkmat2(mkcol2(pol_1(v),pol_0(v)), in matid2_FpXM() 644 mkcol2(pol_0(v),pol_1(v))); in matid2_FpXM() 693 retmkmat2(mkcol2(pol_0(v),pol_1(v)), in FpX_halfgcd() 694 mkcol2(pol_1(v),pol_0(v))); in FpX_halfgcd()
|
H A D | bnflog.c | 432 M = mkmat2(mkcol2(diagonal_shallow(cycAp), C), mkcol2(gen_0, vtG)); in bnflog_i()
|
H A D | Qfb.c | 672 *U = mkmat2(mkcol2(u1,v1), mkcol2(u2,v2)); return Q; in redimagsl2() 1389 mkcol2(subii(mulii(q, gcoeff(M, 1, 2)), gcoeff(M, 1, 1)), in redrealsl2step() 1418 M = mkmat2(mkcol2(u1,u2), mkcol2(v1,v2)); in redrealsl2()
|
H A D | Flx.c | 1840 return gerepilecopy(av, mkmat2(mkcol2(u,u1), mkcol2(v,v1))); in Flx_halfgcd_basecase() 1881 retmkmat2(mkcol2(Flx_add(T1,T2, p), Flx_add(M2,M4, p)), in FlxM_mul2() 1882 mkcol2(Flx_add(M3,M5, p), Flx_add(T3,T4, p))); in FlxM_mul2() 1891 gel(res,1) = mkcol2(gcoeff(M,2,1), u); in Flx_FlxM_qmul() 1893 gel(res,2) = mkcol2(gcoeff(M,2,2), v); in Flx_FlxM_qmul() 1900 return mkmat2(mkcol2(pol1_Flx(v),pol0_Flx(v)), in matid2_FlxM() 1901 mkcol2(pol0_Flx(v),pol1_Flx(v))); in matid2_FlxM() 1942 retmkmat2(mkcol2(pol0_Flx(v),pol1_Flx(v)), in Flx_halfgcd() 1943 mkcol2(pol1_Flx(v),pol0_Flx(v))); in Flx_halfgcd()
|
H A D | alglin3.c | 929 gel(y,1) = mkcol2(icopy(gel(x,1)), b); in gtomat() 930 gel(y,2) = mkcol2(b, icopy(gel(x,3))); in gtomat()
|
H A D | ellanal.c | 845 V0 = ZM_ZC_mul(U, mkcol2(x0, utoipos(y))); in best_point() 893 M = mkmat2( mkcol2(mulii(d, Q), mulii(negi(N), c)), in best_lift() 894 mkcol2(b, mulii(a, Q))); in best_lift()
|
H A D | FpXQX_factor.c | 1040 return mkcol2(z, F2x_add(b, z)); in F2xqX_quad_roots() 1058 return mkcol2(s, Flx_sub(nb,s,p)); in FlxqX_quad_roots() 1078 return mkcol2(Fq_to_FpXQ(s,T,p), Fq_to_FpXQ(Fq_sub(nb,s,T,p),T,p)); in FpXQX_quad_roots() 1689 GEN t = mkcol2(f1, f2), E = mkvecsmall2(1, 1); in F2xqX_factor_2() 1712 GEN t = mkcol2(f1, f2), E = mkvecsmall2(1, 1); in FlxqX_factor_2() 1735 GEN t = mkcol2(f1, f2), E = mkvecsmall2(1, 1); in FpXQX_factor_2()
|
H A D | modsym.c | 229 return mkcol2(negi(b),a); in SL2_inv2() 1854 C2 = ZM_ZC_mul(U, mkcol2(gel(P,i), gel(Q,i))); in M2_log() 1932 return mkcol2(gen_1,gen_0); in cusp_to_ZC() 1934 return mkcol2(c,gen_1); in cusp_to_ZC() 1936 return mkcol2(gel(c,1),gel(c,2)); in cusp_to_ZC() 1938 return mkcol2(stoi(c[1]), stoi(c[2])); in cusp_to_ZC() 3546 v = RgM_RgC_mul(C, mkcol2(phi1,phi2)); in oms_dim2() 4857 d = mkcol2(gen_0,gen_1); in mslattice()
|
H A D | alglin1.c | 576 C = mkmat2(mkcol2(C11, C21), mkcol2(C12, C22)); in gen_matmul_sw() 2610 ainv = mkmat2(mkcol2(x, gneg(w)), mkcol2(gneg(v), u)); in RgM_solve_basecase() 3032 retmkmat2(mkcol2(icopy(d), negi(c)), mkcol2(negi(b), icopy(a))); in ZM_inv2() 3034 retmkmat2(mkcol2(negi(d), icopy(c)), mkcol2(icopy(b), negi(a))); in ZM_inv2()
|
H A D | base4.c | 1221 gel(h,1) = mkcol2(gcopy(f), gcopy(g)); in famat_mul() 1222 gel(h,2) = mkcol2(gen_1, gen_1); in famat_mul() 1240 gel(h,1) = mkcol2(gcopy(f), gcopy(g)); in famat_div() 1241 gel(h,2) = mkcol2(gen_1, gen_m1); in famat_div()
|
H A D | FpX_factor.c | 1241 return mkvec2(mkcol2(R,S), mkvecsmall2(1,1)); in FpX_factor_2() 1283 default: return mkvec2(mkcol2(mkvecsmall2(v,2),mkvecsmall2(v,3)), mkvecsmall2(1,1)); in F2x_factor_2() 1489 return mkvec2(mkcol2(R,S), mkvecsmall2(1,1)); in Flx_factor_2()
|
H A D | arith1.c | 5032 if (lx == 2) return gerepilecopy(av, mkmat(mkcol2(p1,q1))); in contfracpnqn() 5035 return gerepilecopy(av, mkmat2(mkcol2(p1,q1), mkcol2(gen_1,gen_0))); in contfracpnqn() 5040 gel(M,1) = mkcol2(p1,q1); in contfracpnqn() 5051 gel(M,i) = mkcol2(p1,q1); in contfracpnqn() 5404 retmkmat2(mkcol2(addii(a,b), addii(e,f)), mkcol2(addii(c,d), addii(g,h))); in ZM_mul2()
|
H A D | polarit2.c | 2784 return gerepilecopy(av, mkvec2(mkmat22(u,u1,v,v1), mkcol2(a, b))); in RgX_halfgcd_i() 2796 return gerepilecopy(av, mkvec2(M, mkcol2(a, b))); in RgX_halfgcd_FFX() 2824 V = mkcol2(a, b); in RgX_halfgcd_FpX() 2838 V = mkcol2(a, b); in RgX_halfgcd_FpXQX()
|
H A D | alglin2.c | 323 gel(y,1) = mkcol2(gcopy(d), gneg(c)); in caradj() 324 gel(y,2) = mkcol2(gneg(b), gcopy(a)); in caradj()
|
/dports/math/p5-Math-Pari/pari-2.3.5/src/basemath/ |
H A D | Qfb.c | 580 gel(*U,1) = mkcol2(u1,v1); in redimagsl2() 581 gel(*U,2) = mkcol2(u2,v2); return Q; in redimagsl2() 1167 mkcol2(subii(mulii(q, gcoeff(M, 1, 2)), gcoeff(M, 1, 1)), in redrealsl2step() 1205 M = mkmat2(mkcol2(u1,u2), mkcol2(v1,v2)); in redrealsl2()
|
H A D | buch1.c | 308 return coltoalg(nf, mkcol2(a,b)); in findbezk() 330 return mkmat2( mkcol2(gel(x,1), gen_0), in form_to_ideal() 331 mkcol2((GEN)shifti(b,-1), gen_1) ); in form_to_ideal()
|
H A D | arith1.c | 2418 return gerepilecopy(av, mkmat2(mkcol2(p1,q1), mkcol2(p0,q0))); in pnqn() 2602 f = mkmat2(mkcol2(a, gen_1), mkcol2(gen_1, gen_0)); in fundunit()
|
/dports/math/p5-Math-Pari/pari-2.3.5/src/kernel/none/ |
H A D | level1.h | 24 GEN mkcol2(GEN x, GEN y); 334 mkcol2(GEN x, GEN y) { in mkcol2() function
|
/dports/math/pari/pari-2.13.3/src/headers/ |
H A D | pariinl.h | 269 mkcol2(GEN x, GEN y) { retmkcol2(x,y); } in mkcol2() function 312 mkmat22(GEN a, GEN b, GEN c, GEN d) { retmkmat2(mkcol2(a,c),mkcol2(b,d)); } in mkmat22()
|