Searched refs:trx (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | settauw.f | 19 & ull(nsd), trx(numnp,nsd),
26 trx=zero
89 trx(nodw,:)=twoub*ull(:)
141 mBCB(iblk)%p(i,j,3:5)=trx(mienb(iblk)%p(i,j),:)
|
| /phasta/phSolver/incompressible/ |
| H A D | filters.f | 1430 subroutine sparseCG (rhsorig, trx, lhsM, row, col, iper, argument
1443 dimension rhsorig(nshg), trx(nshg)
1494 trx(:) = zero ! x_{0}=0
1586 trx(:) = trx(:) + alpha * p(:)
1625 if(numpe>1) call commu (trx, ilwork, 1, 'out ')
1626 trx(:) = trx(iper(:))
|