Searched defs:SQ1 (Results 1 - 1 of 1) sorted by relevance

/external/eigen/blas/
H A Dsrotmg.f54 REAL GAM,GAMSQ,ONE,RGAMSQ,SFLAG,SH11,SH12,SH21,SH22,SP1,SP2,SQ1, local in subroutine:SROTMG
80 SQ1 = SP1*SX1
82 IF (.NOT.ABS(SQ1).GT.ABS(SQ2)) GO TO 40

Completed in 137 milliseconds