Home
last modified time | relevance | path

Searched refs:Rc (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),
75 Rc = Rci
77 2 + NORMS( mynNo, commu, Rc)**2D0)
101 P(:,i) = Rc - P(:,i)
146 Rc = Rci - xB(1)*MP(:,1)
149 Rc = Rc - xB(j)*MP(:,j)
157 Rc = Rci - xB(1)*MP(:,1)
159 Rc = Rc - xB(j)*MP(:,j)
162 ls%Resc = NINT(1D2*(NORMS(mynNo, commu, Rc)/
[all …]