Searched refs:lhsS (Results 1 – 9 of 9) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | solvedata.f | 5 real*8, allocatable :: lhsP(:,:), lhsK(:,:), lhsS(:,:) variable
29 allocate (lhsS(nnz_tot,nsclrsol))
54 deallocate (lhsS)
|
| H A D | genlmass.f | 216 & lhsS, gmass) argument
221 real*8 lhsS(nnz_tot), gmass(nshg), rho(nshg) local
238 lhsS(k) = lhsS(k) + tmp
|
| H A D | usr.h | 42 double* lhsS ; member
132 double* lhsS,
|
| H A D | elmgmr.f | 372 & rowp, colm, lhsS ) argument
402 real*8 lhsS(nnz_tot) local
458 lhsS = zero
495 & xSebe, lhsS,
509 call lmassaddSclr(ac(:,isclr), res,rowp,colm,lhsS,gmass)
|
| H A D | usr.c | 63 double* lhsS, in usrNew() argument
96 usrHd->lhsS = lhsS ; in usrNew()
|
| H A D | solfar.f | 443 & rowp, colm, lhsS )
467 Val1(1,i) = lhsS(i,jsol) ! see above jsol indexs for scalars
499 & rlhsK, rlhsP, lhsS,
|
| H A D | lesSparse.f | 149 & rowp, colm, lhsS )
158 real*8 sclrDiag(nshg), lhsS(nnz_tot), BC(nshg,ndofBC)
166 sclrDiag(n) = lhsS(k)
|
| H A D | lestools.c | 14 int *colm, double *lhsS);
95 double *lhsS, double *lesP, double *lesQ,
150 usrHd->colm, usrHd->lhsS ) ; in lesPrepDiag()
1282 fLesSparseApSclr( usrHd->colm, usrHd->rowp, usrHd->lhsS, in lesApSclr()
|
| /phasta/phSolver/common/ |
| H A D | fillsparse.f | 194 subroutine fillsparseSclr( iens, xSebe, lhsS, argument
200 real*8 lhsS(nnz_tot) local
224 lhsS(k) = lhsS(k) + xSebe(e,aa,b)
|