Searched defs:fillsparseC (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | fillsparse.f | 68 subroutine fillsparseC( iens, EGmass, lhsK, subroutine
81 real*8 EGmass(npro,nedof,nedof)
82 integer ien(npro,nshl), col(nshg+1), row(nnz*nshg)
83 real*8 lhsK(nflow*nflow,nnz_tot)
86 integer aa, b, c, e, i, k, n, n1
87 integer f, g, r, s, t local
89 integer sparseloc
91 integer iens(npro,nshl)
|