Searched refs:Res1 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | solfar.f | 422 REAL*8, ALLOCATABLE :: faceRes(:), Res1(:,:), Val1(:,:) local
458 IF (.NOT.ALLOCATED(Res1)) THEN
459 ALLOCATE (Res1(dof,nshg), Val1(dof*dof,nnz_tot))
463 Res1(1,i) = res(i,1)
470 CALL svLS_SOLVE(svLS_lhs, svLS_ls, dof, Res1, Val1, incL,
474 solinc(i,1) = Res1(1,i)
|