Searched refs:SLAPY2 (Results 1 – 2 of 2) sorted by relevance
133 REAL SLAMCH, SLAPY2, SNRM2 local134 EXTERNAL SLAMCH, SLAPY2, SNRM2160 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )179 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
64 REAL FUNCTION SLAPY2( X, Y ) function96 SLAPY2 = W98 SLAPY2 = W*SQRT( ONE+( Z / W )**2 )