Searched refs:r5 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | stats.f | 94 real*8 res(nResDims), reg, det, r0, r1, r2, r3, r4, r5, local
126 r5 = res(6)
129 & + r3 * (r4 * r5 - r3 * r2)
130 & + r5 * (r3 * r4 - r1 * r5)
134 stsMInv(i,2) = det * (r0 * r2 - r5 * r5)
136 stsMInv(i,4) = det * (r4 * r5 - r2 * r3)
137 stsMInv(i,5) = det * (r3 * r5 - r0 * r4)
138 stsMInv(i,6) = det * (r3 * r4 - r1 * r5)
152 r5 = res(6)
161 stsB(i,3) = r5
[all …]
|