Searched refs:Rmi (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | NSSOLVER.f | 60 3 mD(:,:), mL(:), Gt(:,:), Rm(:,:), Rc(:), Rmi(:,:), Rci(:) local 65 ALLOCATE(Rm(nsd,nNo), Rc(nNo), Rmi(nsd,nNo), Rci(nNo), 69 Rmi = Ri(1:nsd,:) 74 Rm = Rmi 132 B(k) = DOTV (nsd, mynNo, commu, MU(:,:,k), Rmi) 145 Rm = Rmi - xB(1)*MU(:,:,1) 166 Rmi = xB(2)*U(:,:,1) 172 Rmi = Rmi + xB(iBB)*U(:,:,i) 179 Ri(1:nsd,:) = Rmi 182 DEALLOCATE (Rm, Rc, Rmi, Rci, U, P, MU, MP, A, B, mK, mD, mG, mL,
|