Home
last modified time | relevance | path

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

/phasta/phSolver/incompressible/
H A Dsolfar.f117 REAL*8, ALLOCATABLE :: faceRes(:), Res4(:,:), Val4(:,:) local
170 ALLOCATE (Res4(dof,nshg), Val4(dof*dof,nnz_tot))
178 Val4(1:3,i) = lhsK(1:3,i)
179 Val4(5:7,i) = lhsK(4:6,i)
180 Val4(9:11,i) = lhsK(7:9,i)
181 Val4(13:15,i) = lhsP(1:3,i)
182 Val4(16,i) = lhsP(4,i)
191 Val4(4:12:4,l) = -lhsP(1:3,j)
197 CALL svLS_SOLVE(svLS_lhs, svLS_ls, dof, Res4, Val4, incL,