Home
last modified time | relevance | path

Searched refs:MATELEM (Results 1 – 25 of 42) sorted by relevance

12

/dports/math/singular/Singular-Release-4-2-1/kernel/linear_algebra/
H A Deigenval.cc33 MATELEM(M,i,k)=MATELEM(M,j,k); in evSwap()
34 MATELEM(M,j,k)=p; in evSwap()
40 MATELEM(M,k,i)=MATELEM(M,k,j); in evSwap()
41 MATELEM(M,k,j)=p; in evSwap()
49 if(MATELEM(M,i,k)==NULL||MATELEM(M,j,k)==NULL) in evRowElim()
60 MATELEM(M,i,l)=pSub(MATELEM(M,i,l),ppMult_qq(p,MATELEM(M,j,l))); in evRowElim()
65 MATELEM(M,l,j)=pAdd(MATELEM(M,l,j),ppMult_qq(p,MATELEM(M,l,i))); in evRowElim()
78 if(MATELEM(M,k,i)==0||MATELEM(M,k,j)==0) in evColElim()
81 poly p=pNSet(nDiv(pGetCoeff(MATELEM(M,k,i)),pGetCoeff(MATELEM(M,k,j)))); in evColElim()
86 MATELEM(M,l,i)=pSub(MATELEM(M,l,i),ppMult_qq(p,MATELEM(M,l,j))); in evColElim()
[all …]
H A DlinearAlgebra.cc138 MATELEM(uMat, r, c) = MATELEM(uMat, bestR, c); in luDecomp()
147 MATELEM(lMat, r, c) = MATELEM(lMat, bestR, c); in luDecomp()
492 MATELEM(H, r, c) = pCopy(MATELEM(N, r, c)); in luSolveViaLUDecomp()
788 MATELEM(aMat, row1, c) = MATELEM(aMat, row2, c); in swapRows()
813 MATELEM(block, i, j) = pCopy(MATELEM(aMat, i, j)); in matrixBlock()
1048 MATELEM(c,1,1) = pAdd(pAdd(pAdd(ppMult_qq(MATELEM(H,1,1), MATELEM(H,1,1)), in mpTrafo()
1052 MATELEM(c,2,1) = pAdd(pMult(pCopy(MATELEM(H,2,1)), in mpTrafo()
1056 MATELEM(c,3,1) = ppMult_qq(MATELEM(H,2,1), MATELEM(H,3,2)); in mpTrafo()
1359 MATELEM(uMat, r, c) = pCopy(MATELEM(aMat, r, c)); in lduDecomp()
1499 MATELEM(yVec, r, 1) = pMult(p, MATELEM(yVec, r, 1)); in luSolveViaLDUDecomp()
[all …]
H A Dtest.cc140 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
167 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
194 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
221 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
248 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/Singular/
H A Dgms.cc30 if(MATELEM(B,i,j)!=NULL) in gmsNF()
31 MATELEM(B0,i,j)=pDiff(MATELEM(B,i,j),i+1); in gmsNF()
50 if(MATELEM(B0,i+1,j+1)!=NULL) in gmsNF()
51 p->m[k]=pAdd(p->m[k],ppMult_mm(MATELEM(B0,i+1,j+1),m)); in gmsNF()
52 if(MATELEM(B,i+1,j+1)!=NULL&&m0!=NULL) in gmsNF()
53 p->m[k]=pAdd(p->m[k],ppMult_mm(MATELEM(B,i+1,j+1),m0)); in gmsNF()
H A DcalcSVD.cc72 char *str=pString(MATELEM(M,i,j)); in testsvd()
90 MATELEM(Mu,i,j)=p_svdInit(u(i,j).toString()); in testsvd()
96 MATELEM(Mw,i,i)=p_svdInit(w(i).toString()); in testsvd()
103 MATELEM(Mvt,i,j)=p_svdInit(vt(i,j).toString()); in testsvd()
H A Deigenval_ip.cc139 while(j<=n&&MATELEM(M,j,j-1)!=NULL) in evEigenvals()
143 e->m[k]=pHead(MATELEM(M,j0,j0)); in evEigenvals()
155 MATELEM(M0,i,j)=pCopy(MATELEM(M,j0+i,j0+j)); in evEigenvals()
157 MATELEM(M0,i,i)=pSub(MATELEM(M0,i,i),pCopy(t)); in evEigenvals()
/dports/math/singular/Singular-Release-4-2-1/libpolys/polys/nc/
H A Dold.gring.cc952 t = MATELEM(cMT,k,1); in gnc_uu_Mult_ww_vert()
973 t = MATELEM(cMT,a,m); in gnc_uu_Mult_ww_vert()
994 t=MATELEM(cMT,a,b); in gnc_uu_Mult_ww_vert()
1170 t=MATELEM(cMT,1,m); in gnc_uu_Mult_ww_horvert()
1194 t=MATELEM(cMT,m,1); in gnc_uu_Mult_ww_horvert()
1247 t=MATELEM(cMT,1,m); in gnc_uu_Mult_ww_horvert()
1267 t=MATELEM(cMT,k,b); in gnc_uu_Mult_ww_horvert()
1312 t=MATELEM(cMT,a,k); in gnc_uu_Mult_ww_horvert()
2428 p=MATELEM(M,s,t); in nc_PrintMat()
2766 CN = MATELEM(CCC,1,1); in nc_CallPlural()
[all …]
/dports/math/singular/Singular-Release-4-2-1/kernel/GBEngine/
H A Dunits.cc27 u0=nInvers(pGetCoeff(MATELEM(U0,i+1,i+1))); in redNF()
28 MATELEM(U0,i+1,i+1)=__p_Mult_nn(MATELEM(U0,i+1,i+1),u0,currRing); in redNF()
41 pCopy(MATELEM(U0,i+1,i+1)))); in redNF()
66 MATELEM(U,1,1)=u; in redNF()
H A Dtest.cc136 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
163 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
190 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
217 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
244 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/
H A Dpolys.cc81 p=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in p_Divide()
141 p=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in p_Divide()
219 p=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in pp_Divide()
281 p=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in pp_Divide()
366 p=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in p_DivRem()
369 rest=MATELEM(T,1,1); MATELEM(T,1,1)=NULL; in p_DivRem()
H A Dtest.cc230 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
257 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
284 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
311 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
338 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
H A Dideals.cc802 MATELEM(*T,t-syzComp,j+1) = pAdd(MATELEM(*T,t-syzComp,j+1),p); in idExtractG_T_S()
1090 MATELEM(*unit,i,i)=pOne(); in idLift_setUnit()
1297 MATELEM(*unit,i+1,i+1)=pAdd(MATELEM(*unit,i+1,i+1),p); in idLift()
1354 MATELEM(T,j+1,i+1)=pAdd(MATELEM(T,j+1,i+1),p0); in idLiftW()
1859 MATELEM(tmp,i,j) = MATELEM(a,rowchoise[i-1],colchoise[j-1]); in idMinor()
1921 MATELEM(tmp,i,j) = MATELEM(a,rowchoise[i-1],colchoise[j-1]); in idMinors()
1948 for (j=1; j<=ar; j++) MATELEM(tmp,i,j) = NULL; in idMinors()
2117 M->m[i]=pSeries(n,M->m[i],MATELEM(U,i+1,i+1),w); in idSeries()
2118 MATELEM(U,i+1,i+1)=NULL; in idSeries()
2370 MATELEM(*T,(int)t-length,i) = pAdd(MATELEM(*T,(int)t-length,i),p); in idModuloLP()
[all …]
/dports/math/singular/Singular-Release-4-2-1/libpolys/polys/
H A Dmatpol.cc298 p = pp_Mult_qq(MATELEM(a,i,j), MATELEM(b,j,i), R); in TraceOfProd()
425 MATELEM(co,1,i) = h; in mp_CoeffProc()
437 MATELEM(co,1,i) = h; in mp_CoeffProc()
452 MATELEM(co,2,i) = p_Add_q(MATELEM(co,2,i), h, R); in mp_CoeffProc()
464 MATELEM(co,2,pos_of_1) = p_Add_q(MATELEM(co,2,pos_of_1), h, R); in mp_CoeffProc()
531 MATELEM(co,j+2,i) = p_Add_q(MATELEM(co,j+2,i), h, R); in mp_CoeffProcId()
543 MATELEM(co,j+2,pos_of_1) = p_Add_q(MATELEM(co,j+2,pos_of_1), h, R); in mp_CoeffProcId()
630 MATELEM(*c,j,i) = p_Add_q(MATELEM(*c,j,i), h, R); in mp_Coef2()
1703 res = MATELEM(c,1,1); in mp_DetBareiss()
1704 MATELEM(c,1,1) = NULL; in mp_DetBareiss()
[all …]
/dports/math/singular/Singular-Release-4-2-1/kernel/fglm/
H A Dtest.cc139 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
166 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
193 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
220 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
247 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/maps/
H A Dtest.cc140 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
167 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
194 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
221 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
248 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/numeric/
H A Dtest.cc140 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
167 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
194 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
221 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
248 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
H A Dmpr_base.cc379 if ( (MATELEM( omat, i, j)!=NULL) in print_matrix()
380 && (!nIsZero(pGetCoeff( MATELEM( omat, i, j))))) in print_matrix()
2129 MATELEM(m,i,j)= pInit(); in createMatrix()
2130 pSetCoeff0( MATELEM(m,i,j), nInit(0) ); in createMatrix()
2152 MATELEM(m,numVectors - k,i + 1)= pInit(); in createMatrix()
2176 pWrite0(MATELEM(m,i,j));PrintS(" "); in createMatrix()
2479 p=MATELEM(m,i,j); in getMatrix()
2485 MATELEM(resmat,i,j)= pCopy( p ); in getMatrix()
2495 if ( MATELEM(resmat,numVectors-i, in getMatrix()
2604 MATELEM(mat,i,j)= pInit(); in getSubDet()
[all …]
H A Dmpr_numeric.cc1023 if ( MATELEM(mm,i,j) != NULL ) in mapFromMatrix()
1025 coef= pGetCoeff( MATELEM(mm,i,j) ); in mapFromMatrix()
1055 pDelete( &(MATELEM(mm,i,j)) ); in mapToMatrix()
1056 MATELEM(mm,i,j)= NULL; in mapToMatrix()
1062 MATELEM(mm,i,j)= pOne(); in mapToMatrix()
1063 pSetCoeff( MATELEM(mm,i,j), coef ); in mapToMatrix()
/dports/math/singular/Singular-Release-4-2-1/kernel/oswrapper/
H A Dtest.cc140 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
167 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
194 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
221 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
248 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/spectrum/
H A Dtest.cc136 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
163 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
190 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
217 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
244 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/groebner_walk/
H A Dtest.cc140 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
167 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
194 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
221 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
248 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/kernel/combinatorics/
H A Dtest.cc142 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // w2 - xz in TestGBEngine()
169 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // wx - yz in TestGBEngine()
196 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // x2 - wy in TestGBEngine()
223 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // xy - z2 in TestGBEngine()
250 MATELEM(I, 1, ++gen) = p_Add_q(lp, p, R); // y2 - wz in TestGBEngine()
/dports/math/singular/Singular-Release-4-2-1/libpolys/polys/monomials/
H A Dmaps.cc58 if(MATELEM(s,v,1)==NULL) in maEvalVariable()
60 MATELEM(s,v,1)=p_Copy(p/*theMap->m[v-1]*/,dst_r); in maEvalVariable()
64 while((j<=pExp)&&(MATELEM(s,v,j)!=NULL)) in maEvalVariable()
68 p0=MATELEM(s,v,j-1); in maEvalVariable()
73 p0=MATELEM(s,v,j)=pp_Mult_qq(p0, p,dst_r); in maEvalVariable()
H A Dring.cc728 MATELEM(C,i,j) = p_One( r); in nc_rCreateNCcomm_rCopy()
1204 assume(MATELEM(C1,i,j) != NULL); in rSumInternal()
1207 if (MATELEM(D1,i,j) != NULL) in rSumInternal()
1208MATELEM(D,i,j) = p_PermPoly(MATELEM(D1,i,j), perm1, R1, sum, nMap1, par_perm1, rPar(R1)); in rSumInternal()
1221MATELEM(C,rVar(R1)+i,rVar(R1)+j) = p_PermPoly(MATELEM(C2,i,j),perm2,R2,sum, nMap2,par_perm2,rPar(R… in rSumInternal()
1223 if (MATELEM(D2,i,j) != NULL) in rSumInternal()
5585MATELEM(C,nj,ni) = p_PermPoly(MATELEM(src->GetNC()->C,i,j),perm,src,r, nMap,par_perm,rPar(src)); in rOpposite()
5588MATELEM(D,nj,ni) = p_PermPoly(MATELEM(src->GetNC()->D,i,j),perm,src,r, nMap,par_perm,rPar(src)); in rOpposite()
5697 MATELEM(C,i,j) = p; in nc_rComplete()
5698 if (MATELEM(D0,i,j) != NULL) in nc_rComplete()
[all …]
/dports/math/polymake/polymake-4.5/bundled/singular/apps/ideal/src/
H A DsingularIdeal.cc382 if (MATELEM(T, j, 1)) { in convert_number_to_Rational()
383 polys[j-1]=convert_poly_to_Polynomial(MATELEM(T, j, 1)); in convert_number_to_Rational()
434 MATELEM(variableSlackMatrix,i+1,j+1) = p_Copy(m, singRing); in convert_number_to_Rational()

12