Home
last modified time | relevance | path

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

/phasta/svLS/
H A DNSSOLVER.f60 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,