Lines Matching refs:temp2
73 & temp1(npro), temp2(npro),
160 temp2 = dxdxib(:,3,1) * dxdxib(:,1,3) -
167 temp2 = v2(:,1) * v1(:,3) - v1(:,1) * v2(:,3)
171 temp2 = - v2(:,1) * v1(:,3) + v1(:,1) * v2(:,3)
175 temp = one / sqrt ( temp1**2 + temp2**2 + temp3**2 )
177 bnorm(:,2) = temp2 * temp
431 & temp1(npro), temp2(npro),
517 temp2 = dxdxib(:,3,1) * dxdxib(:,1,3) -
524 temp2 = v2(:,1) * v1(:,3) - v1(:,1) * v2(:,3)
528 temp2 = - v2(:,1) * v1(:,3) + v1(:,1) * v2(:,3)
532 temp = one / sqrt ( temp1**2 + temp2**2 + temp3**2 )
534 bnorm(:,2) = temp2 * temp