Searched refs:iBB (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | NSSOLVER.f | 56 INTEGER i, j, k, iB, iBB, nB, nsd local
93 iBB = 2*i
108 MU(:,:,iBB) = Rm - MU(:,:,iB)
110 2 ls%GM, rowPtr, colPtr, mK, MU(:,:,iBB), U(:,:,i))
113 2 rowPtr, colPtr, mK, U(:,:,i), MU(:,:,iBB))
116 2 face, U(:,:,i), MU(:,:,iBB))
122 2 rowPtr, colPtr, mD, U(:,:,i), MP(:,iBB))
124 DO k=iB, iBB
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)))
[all …]
|