Lines Matching refs:res
94 real*8 res(nResDims), reg, det, r0, r1, r2, r3, r4, r5, local
102 res = stsVec(i,:)
103 reg = res(1) * res(2) * res(3)
104 det = res(1) * (res(2) * res(3) - res(5) * res(5))
105 & + res(4) * (res(5) * res(6) - res(4) * res(3))
106 & + res(6) * (res(4) * res(5) - res(2) * res(6))
111 stsReg(i) = (res(1) + res(2) + res(3)) / 1000.
119 res = stsVec(i,:)
121 r0 = res(1) + reg
122 r1 = res(2) + reg
123 r2 = res(3) + reg
124 r3 = res(4)
125 r4 = res(5)
126 r5 = res(6)
145 res = stsVec(i,:)
147 r0 = res(1)
148 r1 = res(2)
149 r2 = res(3)
150 r3 = res(4)
151 r4 = res(5)
152 r5 = res(6)
213 & res(nResDims), MInv(6), local
242 res = stsVec(i,:)
257 r0 = res(1) + reg * u1
258 r1 = res(2) + reg * u2
259 r2 = res(3) + reg * u3
272 r0 = res(1) * u1 + reg * u1 * u1
273 r1 = res(2) * u2 + reg * u2 * u2
274 r2 = res(3) * u3 + reg * u3 * u3
275 r3 = res(1) * u2 + res(2) * u1 + reg * u2 * u1
276 r4 = res(2) * u3 + res(3) * u2 + reg * u3 * u2
277 r5 = res(3) * u1 + res(1) * u3 + reg * u1 * u3
299 r0 = res(4)
300 r1 = res(5)
301 r2 = res(6)
302 r3 = res(7)
303 r4 = res(8)
304 r5 = res(9)