Home
last modified time | relevance | path

Searched refs:vecslice (Results 1 – 25 of 58) sorted by relevance

123

/dports/math/pari/pari-2.13.3/src/basemath/
H A DFlv.c78 U2 = vecslice(U, n1 + 1, n); in Flm_rsolve_upper_pre()
100 GEN B1 = vecslice(B, 1, 1); in Flm_lsolve_upper_2()
101 GEN B2 = vecslice(B, 2, 2); in Flm_lsolve_upper_2()
120 U2 = vecslice(U, n1 + 1, n); in Flm_lsolve_upper_pre()
124 B1 = vecslice(B, 1, n1); in Flm_lsolve_upper_pre()
125 B2 = vecslice(B, n1 + 1, n); in Flm_lsolve_upper_pre()
158 L1 = vecslice(L, 1, m1); in Flm_rsolve_lower_unit_pre()
176 GEN X2 = vecslice(A, 2, 2); in Flm_lsolve_lower_unit_2()
198 L1 = vecslice(L, 1, m1); in Flm_lsolve_lower_unit_pre()
200 A1 = vecslice(A, 1, m1); in Flm_lsolve_lower_unit_pre()
[all …]
H A Dqfsolve.c53 return shallowconcat(ZM_lll(vecslice(U,1,m-n), 0.99, LLL_INPLACE), in completebasis()
54 vecslice(U, m-n+1,m)); in completebasis()
301 V = rowpermute(vecslice(G3, 2,n-1), mkvecsmall2(1,n)); in qflllgram_indefgoon()
331 U6 = mkvec3(mkmat(gel(U,1)), ZM_mul(vecslice(U,2,n-1),U5), mkmat(gel(U,n))); in qflllgram_indefgoon()
417 GEN G2 = vecslice(G,d+1,n); in blocks4()
491 U = shallowconcat(RgM_Rg_div(RgM_mul(vecslice(U,1,dimKer),K2), p), in qfminimize()
492 vecslice(U,dimKer+1,n)); in qfminimize()
1020 solG2 = vecslice(gel(solG2,2), 1, dim-1); in qfsolve_i()
H A Darith2.c264 return mkmat2(vecslice(P,2,n), vecslice(gel(f,2),2,n)); in clean_Z_factor()
277 P2 = vecslice(P, i, l-1); P = vecslice(P, 1, i-1); in fuse_Z_factor()
278 E2 = vecslice(E, i, l-1); E = vecslice(E, 1, i-1); in fuse_Z_factor()
359 if (l>1 && signe(gel(P,1)) < 0) { E++; P = vecslice(P,2,--l); } in set_fact_check()
696 if (n && equalim1(gel(P,1))) E = vecslice(E,2,n); in bigomega()
H A Dchar.c399 cyc = vecslice(cyc,i,l-1); in zv_cyc_minimize()
400 g = vecslice(g, i,l-1); in zv_cyc_minimize()
431 cyc = vecslice(cyc,k,l-1); in zv_cyc_minimal()
432 g = vecslice(g, k,l-1); in zv_cyc_minimal()
472 GEN cyc0 = vecslice(cyc,i+1,n), pre = zero_zv(i); in cyc2elts_normal()
1247 if (checkMF_i(D)) { chi = vecslice(MF_get_CHI(D),1,2); break; } in znchar()
1248 else if (checkmf_i(D)) { chi = vecslice(mf_get_CHI(D),1,2); break; } in znchar()
H A Dbb_hnf.c765 if (permute_zerocols && remove_zerocols==2) H = vecslice(H, nbz+1, n); in gen_howell_i()
766 if (remove_zerocols==1) H = vecslice(H, s+1, n); in gen_howell_i()
807 if (r<n2) *U = vecslice(*U, n2-r+1, n2); in gen_matimage()
968 X = vecslice(X, n2-n+1, n2); in gen_solve_from_howell()
1118 X = vecslice(X,1,n); in matsolvemod_finite()
H A Dbuch2.c1797 GEN C2 = nW? vecslice(C, nW+1, lg(C)-1): C; in isprincipalall()
1802 GEN C1 = vecslice(C, 1, nW); in isprincipalall()
2614 Mt = shallowconcat(Mt, conj_i(vecslice(Mt, r1+1, r1+r2))); in automorphism_perms()
2948 d = det2(rowslice(vecslice(Im_mdet, 2, RU), 2, RU)); in compute_multiple_of_R()
3307 fu = vecslice(fu, 2, lg(fu)-1); in bnfnewprec_shallow()
3854 F.L_jid = vecslice(F.perm, 1, n); in Buchall_param()
3973 GEN E = vecslice(embs, k-l+1,k-1); in Buchall_param()
3989 F.L_jid = vecslice(F.perm, 1, need); in Buchall_param()
4009 F.L_jid = vecslice(F.perm, 1, need); in Buchall_param()
4110 GEN c = v? vecpermute(C,v): vecslice(C,1,zc); in Buchall_param()
[all …]
H A Dalglin1.c905 U2 = vecslice(U, n1 + 1, n); in gen_rsolve_upper()
926 GEN B1 = vecslice(B, 1, 1); in gen_lsolve_upper_2()
927 GEN B2 = vecslice(B, 2, 2); in gen_lsolve_upper_2()
950 B1 = vecslice(B, 1, n1); in gen_lsolve_upper()
984 L1 = vecslice(L, 1, m1); in gen_rsolve_lower_unit()
1002 GEN X2 = vecslice(A, 2, 2); in gen_lsolve_lower_unit_2()
1026 L1 = vecslice(L, 1, m1); in gen_lsolve_lower_unit()
1028 A1 = vecslice(A, 1, m1); in gen_lsolve_lower_unit()
1081 *C = vecslice(A, 1, j - 1); in gen_CUP_basecase()
1156 A1 = vecslice(A, 1, n1); in gen_echelon()
[all …]
H A Dhnf_snf.c205 perm = vecslice(perm, k+1, lg(perm)-1); in p_mat()
601 *pB = vecslice(x, k+n, lx-1); in mathnfspec()
634 GEN A = vecslice(C, col+1, co); in hnfadd_i()
641 Cnew = shallowconcat(extraC, vecslice(C, col-lH+1, co)); in hnfadd_i()
653 *ptC = shallowconcat(vecslice(C, 1, col-lH), Cnew); in hnfadd_i()
886 gel(C,j) = vecslice(gel(A,j), 1,j); in hnfmerge_get_1()
887 gel(C,c) = vecslice(gel(B,j), 1,j); in hnfmerge_get_1()
2350 V0 = vecslice(V, 1, n0 - n); /* kernel */ in ZM_snfall_i()
2351 V = vecslice(V, n0-n+1, n0); in ZM_snfall_i()
H A Dkummer.c575 tu = gel(U,1); fu = vecslice(U, 2, lg(U)-1); in futu()
599 *pselmer = shallowconcat(futu(bnf), vecslice(B,1,rc)); in bnf_cycgenmod()
692 U1 = vecslice(vell, 1, ru); /* units */ in kervirtualunit()
693 U2 = vecslice(vell, ru+1, ru+rc); /* cycgen (mod ell-th powers) */ in kervirtualunit()
H A Decpp.c168 gel(w,1) = zv_prod_Z(vecslice(v,1,ind[1])); in primorial_vec()
172 GEN q = mulii(gel(w,i-1), zv_prod_Z(vecslice(v,ind[i-1]+1,ind[i]))); in primorial_vec()
921 return vecslice(Dmqvec, lo, hi); in Dmqvec_slice()
H A Dmftrace.c835 return (l == n2)? v: vecslice(v, 1, n2-1); in sertovecslice()
1319 else vF = vecslice(vF, sh+1, n1+1); in c_shift()
4483 ME = mfvectomat(vecslice(M,1,j-1), n, 1); in mflineardivtomat()
4484 M = vecslice(M, j,lM-1); in mflineardivtomat()
4967 return mkvec2(vecslice(id, d-d2+1,d), in split_starting_space()
5087 v = mkvec2(vecslice(gel(v,1),1,j-1), vecslice(P,1,j-1)); in dim_filter()
8085 V = vecslice(V, 1, n + 1); in mf2gaexpansion()
8093 V = vecslice(V, sh+1, n + sh+1); in mf2gaexpansion()
9675 D = vecslice(D, 2, l); in getcols_i()
10382 if (!gequal0(vecslice(v,1,nE))) in mfspace_i()
[all …]
H A Dbuch3.c54 H = zm_to_ZM( vecslice(v, t+1, r1) ); /* supplement H of sgn(U) */ in bnfnarrow()
514 U = mkvec3(vecslice(U, 1,ngen), vecslice(U,ngen+1,lg(U)-1), Ui); in Buchraymod_i()
1236 S.fu = vecslice(U,2,lg(U)-1); in bnfcertify0()
1320 v = vecslice(w,l,lg(w)-1); in bnrchar_i()
2505 Z = vecslice(Z, 1, sqbou); in discrayabslistarch()
H A Dlll.c60 g = vecslice(h,1,k); /* done first: vectail_inplace kills h */ in lll_finish()
792 return ZM_lll(vecslice(U,1,d), LLLDFT, LLL_INPLACE); in kerint0()
H A Dbase2.c208 P = vecslice(P, 2, l); in nfmaxord_check_args()
209 E = vecslice(E, 2, l); in nfmaxord_check_args()
352 P = shallowconcat(P, vecslice(u, 2, l-1)); in get_maxord()
2229 M2 = vecslice(M, r+1,N); /* M = (H|M2) invertible */ in primedec_aux()
3255 GEN mek = vecslice(MW, (k-1)*n+1, k*n), Ck; in rnfmaxord()
3484 A = shallowconcat(vecslice(A,n+1,lg(A)-1), vecslice(A,1,n)); in rnfallbase()
3784 col= gel(A,n); A = vecslice(A, 1, n-1); in rnfbasis()
H A Dbuch1.c485 no = gclone(vecslice(B->vperm, 1, lgsub-1)); in subFBquad()
1073 BQ.subFB = gclone(vecslice(BQ.vperm, 1, nsubFB)); in Buchquad()
H A Dzetamult.c388 *pwmid = wmid = a+b < s? vecslice(evec, a+1, s-b): cgetg(1, t_VECSMALL); in findabvgen()
509 *pwmid = wmid = a+b < s? vecslice(evec, a+1, s-b): cgetg(1, t_VECSMALL); in findabvgens()
H A Dbnflog.c441 D = vecslice(D,2,lg(D)-1); in bnflog_i()
H A Dgalconj.c2444 GEN v = vecsmall_concat(vecslice(g,1,i-o+1),gel(pw,g[i])); in pc_normalize()
2445 GEN w = vecsmall_concat(v,vecslice(g,i+2,l)); in pc_normalize()
2451 GEN v = vecsmall_concat(vecslice(g,1,i-1), br_get(br,g[i],g[i+1])); in pc_normalize()
2452 GEN w = vecsmall_concat(mkvecsmall2(g[i+1],g[i]),vecslice(g,i+2,l)); in pc_normalize()
2662 GEN ordH = vecslice(ord,2,lg(ord)-1); in nilp_froblift()
2760 pf = nilp_froblift(vecslice(res1,1,j), PG3, j, PG5, gel(PG2,j), incl, H, &gl, gp); in galoisgenlift_nilp()
H A Dbase3.c2561 if (lg(Ld) > 1 && equaliu(gel(Ld,1),2)) Ld = vecslice(Ld,2,lg(Ld)-1); in sprkinit()
2770 gel(vU,k) = vecslice(U, t+1, t+n); in split_U()
2775 if (!n) setlg(vU,l); else gel(vU,l) = vecslice(U, t+1, t+n); in split_U()
3315 : ZM_ZMV_mul(vecslice(U, 1, l1-1), U1); in join_bid()
3317 : ZM_ZMV_mul(vecslice(U, l1, nbgen), U2); in join_bid()
H A Dmellininv.c151 gel(V, m++) = vecslice(P,i,k-1); in gammapoles()
/dports/math/p5-Math-Pari/pari-2.3.5/src/modules/
H A Delldata.c151 return gerepilecopy(ltop, vecslice(gel(V,i),2, lg(gel(V,i))-1)); in ellcondlist()
225 M = coordch(vecslice(E,1,5),gel(G,2)); in ellidentify()
/dports/math/pari/pari-2.13.3/src/modules/
H A Delldata.c132 return vecslice(v,2, lg(v)-1); in ellcondlist()
215 M = ellchangecurve(vecslice(E,1,5),gel(G,2)); in ellidentify()
/dports/math/p5-Math-Pari/pari-2.3.5/src/basemath/
H A Dalglin2.c1742 perm = vecslice(perm, k+1, lg(perm)-1); in p_mat()
2141 *ptB = vecslice(x, j+lx-ly, lx-1); in mathnfspec()
2198 GEN A = vecslice(C, col+1, co); in hnfadd_i()
2205 Cnew = shallowconcat(extraC, vecslice(C, col-lH+1, co)); in hnfadd_i()
2217 *ptC = shallowconcat(vecslice(C, 1, col-lH), Cnew); in hnfadd_i()
2328 gel(C,j) = vecslice(gel(A,j), 1,j); in hnfmerge_get_1()
2329 gel(C,c) = vecslice(gel(B,j), 1,j); in hnfmerge_get_1()
3269 V0 = vecslice(V, 1, n0 - n); /* kernel */ in smithall()
3270 V = vecslice(V, n0-n+1, n0); in smithall()
H A Dbuch1.c1052 no = gclone(vecslice(vperm, 1, lgsub-1)); in subFBquad()
1606 subFB = gclone(vecslice(vperm, 1, nsubFB)); in buchquad()
/dports/math/pari/pari-2.13.3/src/language/
H A Dmembers.c377 fu = vecslice(fu, 2, lg(fu)-1); /* remove torsion unit */ in member_fu()

123