Lines Matching refs:one
86 temp = one / sqrt ( temp1**2 + temp2**2 + temp3**2 )
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(:))
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(:))