| /phasta/phSolver/common/ |
| H A D | fillsparse.f | 3 1 row, col) argument
9 integer ien(npro,nshl), col(nshg+1), row(nshg*nnz) local
37 k = sparseloc( row(c), n, ien(e,b) ) + c-1
69 1 row, col) argument
82 integer ien(npro,nshl), col(nshg+1), row(nnz*nshg) local
113 k = sparseloc( row(c), n, ien(e,b) ) + c-1
132 & lhsk, row, col) argument
145 integer ien(npro,nshl), col(nshg+1), row(nnz*nshg) local
173 k = sparseloc( row(c), n, ien(e,b) ) + c-1
195 1 row, col) argument
[all …]
|
| H A D | fillsparse.c | 16 #define COLMAJ2D(row,col,numrow) (row-1)+(col-1)*numrow argument
18 #define ROWMAJ2D_ONE(row,col,numcol) (row-1)*numcol+(col-1) argument
|
| /phasta/phSolver/incompressible/ |
| H A D | lesSparse.f | 204 subroutine fLesSparseApG( col, row, pLhs, argument
212 integer col(nNodes+1), row(nnz_tot)
233 j = row(k)
252 subroutine fLesSparseApKG( col, row, kLhs, pLhs, argument
262 integer col(nNodes+1), row(nnz_tot)
287 j = row(k)
327 subroutine fLesSparseApNGt( col, row, pLhs, argument
335 integer col(nNodes+1), row(nnz_tot)
347 j = row(k)
368 subroutine fLesSparseApNGtC( col, row, pLhs, argument
[all …]
|
| H A D | filters.f | 1430 subroutine sparseCG (rhsorig, trx, lhsM, row, col, iper, argument
1453 integer row(nshg*nnz), col(nshg+1) local
1512 call fLesSparseApSclr( col, row, lhsM,
|
| /phasta/phSolver/compressible/ |
| H A D | sparseap.f | 1 subroutine SparseAp(iper, ilwork, iBC, col, row, lhsK, p) argument
18 integer col(nshg+1), row(nnz*nshg), local
57 j = row(k)
|
| H A D | solgmr.f | 370 & col, row, lhsk,
410 integer col(nshg+1), row(nnz*nshg)
455 & row, rerr )
495 if(lhs.eq.1) call Spsi3pre (BDiag, lhsK, col, row)
540 call SparseAp (iper,ilwork,iBC, col, row, lhsK, temp)
585 & col, row, lhsK,
|
| H A D | spsi3pre.f | 1 subroutine Spsi3pre (BDiag, lhsK, col, row) argument
24 integer col(nshg+1), row(nnz*nshg) local
129 j = row(k)
|
| H A D | elmgmr.f | 285 & col, row, rerr) argument
303 integer col(nshg+1), row(nnz*nshg) local
460 1 lhsK, row, col)
526 & lhsk, row, col)
|
| H A D | solgmrpetsc.c | 61 int* col, int* row, double* lhsk, in SolGMRp() argument
147 glbNZ=fncorp[row[j]-1]; in SolGMRp()
408 int* col, int* row, in SolGMRpSclr() argument
494 glbNZ=fncorp[row[j]-1]; in SolGMRpSclr()
|
| /phasta/phSolver/AMG/ |
| H A D | amgread.txt | 13 you continue. row-wise sparse storage is used everywhere in this
94 can bulid row by row. Eventually construct it to form I_cf_* which is
97 standard for row-wise sparse storage.
|