Searched refs:stsCInv (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | stats.f | 18 real*8, allocatable :: stsCInv(:,:) variable
56 allocate ( stsCInv(nshg,6) )
172 stsCInv(i,1) = det * (c1 * c2 - c4 * c4)
173 stsCInv(i,2) = det * (c0 * c2 - c5 * c5)
174 stsCInv(i,3) = det * (c0 * c1 - c3 * c3)
175 stsCInv(i,4) = det * (c4 * c5 - c2 * c3)
176 stsCInv(i,5) = det * (c3 * c5 - c0 * c4)
177 stsCInv(i,6) = det * (c3 * c4 - c1 * c5)
248 CInv = stsCInv(i,:)
|
| /phasta/phSolver/compressible/ |
| H A D | stats.f | 18 real*8, allocatable :: stsCInv(:,:) variable
|