Home
last modified time | relevance | path

Searched refs:BasFac (Results 1 – 2 of 2) sorted by relevance

/dports/math/palp/palp-2.20/
H A DVertex.c748 int BasFac[POLY_Dmax], Long *Den, in Compute_InvMat()
779 BasFac[rank]=OrdFac[i]; in Compute_InvMat()
791 ((long long) (_E->e[BasFac[j]].a[k])); in Compute_InvMat()
842 position[k]=-_E->e[BasFac[k]].c; in Complete_Poly()
844 position[n-1]=-_E->e[BasFac[n-1]].c-1; in Complete_Poly()
851 if (position[k]!=MaxDist[BasFac[k]]-_E->e[BasFac[k]].c) break; in Complete_Poly()
852 position[k]=-_E->e[BasFac[k]].c; in Complete_Poly()
1052 position[k]=-_E->e[BasFac[k]].c; in QComplete_Poly()
1054 position[n-2]=-_E->e[BasFac[n-2]].c-1; in QComplete_Poly()
1067 if (position[k]!=MaxDist[BasFac[k]]-_E->e[BasFac[k]].c) break; in QComplete_Poly()
[all …]
H A DE_Poly.c65 BasFac[POLY_Dmax], one[POLY_Dmax], position[POLY_Dmax]; in DYNComplete_Poly() local
112 BasFac[rank]=OrdFac[i]; in DYNComplete_Poly()
124 ((long long) (_E->e[BasFac[j]].a[k])); in DYNComplete_Poly()
145 position[k]=-_E->e[BasFac[k]].c; in DYNComplete_Poly()
146 for(i=0;i<n;i++) yDen[i]-=_E->e[BasFac[k]].c*InvMat[i][k]; } in DYNComplete_Poly()
147 position[n-1]=-_E->e[BasFac[n-1]].c-1; in DYNComplete_Poly()
148 for(i=0;i<n;i++) yDen[i]-=(_E->e[BasFac[k]].c+1)*InvMat[i][n-1]; in DYNComplete_Poly()
154 if (position[k]!=MaxDist[BasFac[k]]-_E->e[BasFac[k]].c) break; in DYNComplete_Poly()
155 position[k]=-_E->e[BasFac[k]].c; in DYNComplete_Poly()
156 for (i=0;i<n;i++) yDen[i]-=MaxDist[BasFac[k]]*InvMat[i][k]; }} in DYNComplete_Poly()