Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A Deqn_plane.f31 & xA(nsd), xB(nsd), xC(nsd), xD(nsd), fourth(nsd),
79 xB(:) = x(ienb(inum,2),:)
93 xnrml = (xB(2) - xA(2)) * (xC(3) - xA(3))
94 & - (xB(3) - xA(3)) * (xC(2) - xA(2))
96 ynrml = (xB(3) - xA(3)) * (xC(1) - xA(1))
97 & - (xB(1) - xA(1)) * (xC(3) - xA(3))
99 znrml = (xB(1) - xA(1)) * (xC(2) - xA(2))
100 & - (xB(2) - xA(2)) * (xC(1) - xA(1))
/phasta/svLS/
H A DNSSOLVER.f59 2 MU(:,:,:), MP(:,:), A(:,:), B(:), xB(:), mK(:,:), mG(:,:), local
67 3 A(nB,nB), B(nB), xB(nB))
72 xB = 0D0
136 xB = B
137 CALL GE(iBB, A(1:iBB,1:iBB), xB(1:iBB))
139 ls%RI%fNorm = SQRT(ls%RI%iNorm**2D0 - SUM(xB(1:iBB)*B(1:iBB)))
145 Rm = Rmi - xB(1)*MU(:,:,1)
146 Rc = Rci - xB(1)*MP(:,1)
148 Rm = Rm - xB(j)*MU(:,:,j)
149 Rc = Rc - xB(j)*MP(:,j)
[all …]