Lines Matching refs:t2
45 dimension t1(npro,3), t2(npro,3), t3(npro,3),
110 t2(:,1) = rmu * shg(:,b,1)
111 t2(:,2) = rmu * shg(:,b,2)
112 t2(:,3) = rmu * shg(:,b,3)
124 t3(:,1) = t2(:,1) + tmp1 * u1 + tmp2 * rLui(:,1)
125 t3(:,2) = t2(:,2) + tmp1 * u2 + tmp2 * rLui(:,2)
126 t3(:,3) = t2(:,3) + tmp1 * u3 + tmp2 * rLui(:,3)
144 & + t2(:,1) * shg(:,aa,1)
147 & + t2(:,2) * shg(:,aa,2)
150 & + t2(:,3) * shg(:,aa,3)
153 & + t2(:,2) * shg(:,aa,1)
158 & + t2(:,3) * shg(:,aa,1)
163 & + t2(:,3) * shg(:,aa,2)
176 & + t2(:,1) * shg(:,aa,1)
182 & + t2(:,2) * shg(:,aa,2)
188 & + t2(:,3) * shg(:,aa,3)
195 & + t2(:,2) * shg(:,aa,1)
200 & + t2(:,3) * shg(:,aa,1)
205 & + t2(:,1) * shg(:,aa,2)
210 & + t2(:,3) * shg(:,aa,2)
215 & + t2(:,1) * shg(:,aa,3)
220 & + t2(:,2) * shg(:,aa,3)