Home
last modified time | relevance | path

Searched refs:colindUJ (Results 1 – 8 of 8) sorted by relevance

/dports/math/spooles-mpich/spooles.2.2/FrontMtx/src/
H A Dsplit.c27 int *colindJ, *colindUJ, *colindUJK, *colmap, *indicesUJ, in FrontMtx_splitUpperMatrices() local
100 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_splitUpperMatrices()
104 IVfprintf(msgFile, ncolUJ, colindUJ) ; in FrontMtx_splitUpperMatrices()
109 if ( (K = colmap[colindUJ[0]]) == colmap[colindUJ[ncolUJ-1]] ) { in FrontMtx_splitUpperMatrices()
122 colindUJ[ii] = locmap[colindUJ[ii]] ; in FrontMtx_splitUpperMatrices()
152 K = colmap[colindUJ[0]] ; in FrontMtx_splitUpperMatrices()
158 colindUJ[jcol], colmap[colindUJ[jcol]]); in FrontMtx_splitUpperMatrices()
162 if ( jcol == ncolUJ || K != colmap[colindUJ[jcol]] ) { in FrontMtx_splitUpperMatrices()
218 colindUJK[ii] = locmap[colindUJ[jj]] ; in FrontMtx_splitUpperMatrices()
246 K = colmap[colindUJ[jcol]] ; in FrontMtx_splitUpperMatrices()
H A Dpermute.c119 int *map, *colindJ, *colindUJ ; in FrontMtx_permuteUpperMatrices() local
139 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_permuteUpperMatrices()
141 if ( colindJ[ii] != colindUJ[jj] ) { in FrontMtx_permuteUpperMatrices()
150 colindUJ[ii] = map[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
154 colindUJ[ii] = colindJ[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
/dports/math/spooles-mpich/spooles.2.2_SHARED/FrontMtx/src/
H A Dsplit.c27 int *colindJ, *colindUJ, *colindUJK, *colmap, *indicesUJ, in FrontMtx_splitUpperMatrices() local
100 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_splitUpperMatrices()
104 IVfprintf(msgFile, ncolUJ, colindUJ) ; in FrontMtx_splitUpperMatrices()
109 if ( (K = colmap[colindUJ[0]]) == colmap[colindUJ[ncolUJ-1]] ) { in FrontMtx_splitUpperMatrices()
122 colindUJ[ii] = locmap[colindUJ[ii]] ; in FrontMtx_splitUpperMatrices()
152 K = colmap[colindUJ[0]] ; in FrontMtx_splitUpperMatrices()
158 colindUJ[jcol], colmap[colindUJ[jcol]]); in FrontMtx_splitUpperMatrices()
162 if ( jcol == ncolUJ || K != colmap[colindUJ[jcol]] ) { in FrontMtx_splitUpperMatrices()
218 colindUJK[ii] = locmap[colindUJ[jj]] ; in FrontMtx_splitUpperMatrices()
246 K = colmap[colindUJ[jcol]] ; in FrontMtx_splitUpperMatrices()
H A Dpermute.c119 int *map, *colindJ, *colindUJ ; in FrontMtx_permuteUpperMatrices() local
139 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_permuteUpperMatrices()
141 if ( colindJ[ii] != colindUJ[jj] ) { in FrontMtx_permuteUpperMatrices()
150 colindUJ[ii] = map[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
154 colindUJ[ii] = colindJ[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
/dports/math/spooles/spooles.2.2_SHARED/FrontMtx/src/
H A Dsplit.c27 int *colindJ, *colindUJ, *colindUJK, *colmap, *indicesUJ, in FrontMtx_splitUpperMatrices() local
100 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_splitUpperMatrices()
104 IVfprintf(msgFile, ncolUJ, colindUJ) ; in FrontMtx_splitUpperMatrices()
109 if ( (K = colmap[colindUJ[0]]) == colmap[colindUJ[ncolUJ-1]] ) { in FrontMtx_splitUpperMatrices()
122 colindUJ[ii] = locmap[colindUJ[ii]] ; in FrontMtx_splitUpperMatrices()
152 K = colmap[colindUJ[0]] ; in FrontMtx_splitUpperMatrices()
158 colindUJ[jcol], colmap[colindUJ[jcol]]); in FrontMtx_splitUpperMatrices()
162 if ( jcol == ncolUJ || K != colmap[colindUJ[jcol]] ) { in FrontMtx_splitUpperMatrices()
218 colindUJK[ii] = locmap[colindUJ[jj]] ; in FrontMtx_splitUpperMatrices()
246 K = colmap[colindUJ[jcol]] ; in FrontMtx_splitUpperMatrices()
H A Dpermute.c119 int *map, *colindJ, *colindUJ ; in FrontMtx_permuteUpperMatrices() local
139 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_permuteUpperMatrices()
141 if ( colindJ[ii] != colindUJ[jj] ) { in FrontMtx_permuteUpperMatrices()
150 colindUJ[ii] = map[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
154 colindUJ[ii] = colindJ[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
/dports/math/spooles/spooles.2.2/FrontMtx/src/
H A Dsplit.c27 int *colindJ, *colindUJ, *colindUJK, *colmap, *indicesUJ, in FrontMtx_splitUpperMatrices() local
100 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_splitUpperMatrices()
104 IVfprintf(msgFile, ncolUJ, colindUJ) ; in FrontMtx_splitUpperMatrices()
109 if ( (K = colmap[colindUJ[0]]) == colmap[colindUJ[ncolUJ-1]] ) { in FrontMtx_splitUpperMatrices()
122 colindUJ[ii] = locmap[colindUJ[ii]] ; in FrontMtx_splitUpperMatrices()
152 K = colmap[colindUJ[0]] ; in FrontMtx_splitUpperMatrices()
158 colindUJ[jcol], colmap[colindUJ[jcol]]); in FrontMtx_splitUpperMatrices()
162 if ( jcol == ncolUJ || K != colmap[colindUJ[jcol]] ) { in FrontMtx_splitUpperMatrices()
218 colindUJK[ii] = locmap[colindUJ[jj]] ; in FrontMtx_splitUpperMatrices()
246 K = colmap[colindUJ[jcol]] ; in FrontMtx_splitUpperMatrices()
H A Dpermute.c119 int *map, *colindJ, *colindUJ ; in FrontMtx_permuteUpperMatrices() local
139 SubMtx_columnIndices(mtxUJ, &ncolUJ, &colindUJ) ; in FrontMtx_permuteUpperMatrices()
141 if ( colindJ[ii] != colindUJ[jj] ) { in FrontMtx_permuteUpperMatrices()
150 colindUJ[ii] = map[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()
154 colindUJ[ii] = colindJ[colindUJ[ii]] ; in FrontMtx_permuteUpperMatrices()