Lines Matching refs:temp
28 dimension dxdxib(npro,nsd,nsd), temp(npro),
86 temp = one / sqrt ( temp1**2 + temp2**2 + temp3**2 )
87 bnorm(:,1) = temp1 * temp
88 bnorm(:,2) = temp2 * temp
89 bnorm(:,3) = temp3 * temp
92 Wfactor(:) = one / (four*temp(:))
94 Wfactor(:) = one / (four*temp(:))
96 Wfactor(:) = one / (two*temp(:))
98 Wfactor(:) = one / (four*temp(:))
100 Wfactor(:) = one / (four*temp(:))
102 Wfactor(:) = one / (two*temp(:))
186 dimension dxdxib(npro,nsd,nsd), temp(npro),
244 temp = one / sqrt ( temp1**2 + temp2**2 + temp3**2 )
248 Wfactor(:) = one / (four*temp(:))
250 Wfactor(:) = one / (four*temp(:))
252 Wfactor(:) = one / (two*temp(:))
254 Wfactor(:) = one / (four*temp(:))
256 Wfactor(:) = one / (four*temp(:))
258 Wfactor(:) = one / (two*temp(:))