Lines Matching refs:r5
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
164 c2 = r2 + r0 - r5 * r5 * (d2 + d0) + reg
165 c3 = r5 - r3 * r4 * d1
166 c4 = r3 - r4 * r5 * d2
167 c5 = r4 - r5 * r3 * d0
217 real*8 u1, u2, u3, r0, r1, r2, r3, r4, r5, t3, t4, t5 local
277 r5 = res(3) * u1 + res(1) * u3 + reg * u1 * u3
283 r5 = r5 - B(3) * (r2 + r0)
284 t3 = CInv(1) * r3 + CInv(4) * r4 + CInv(6) * r5
285 t4 = CInv(4) * r3 + CInv(2) * r4 + CInv(5) * r5
286 t5 = CInv(6) * r3 + CInv(5) * r4 + CInv(3) * r5
304 r5 = res(9)
312 r5 = r5 - B(3) * (r2 + r0)
314 t3 = CInv(1) * r3 + CInv(4) * r4 + CInv(6) * r5
315 t4 = CInv(4) * r3 + CInv(2) * r4 + CInv(5) * r5
316 t5 = CInv(6) * r3 + CInv(5) * r4 + CInv(3) * r5