Searched refs:RGAMSQ (Results 1 – 2 of 2) sorted by relevance
/external/eigen/blas/fortran/ |
D | drotmg.f | 53 + DU,GAM,GAMSQ,ONE,RGAMSQ,TWO,ZERO local 62 DATA GAM,GAMSQ,RGAMSQ/4096.D0,16777216.D0,5.9604645D-8/ 142 IF (.NOT.DD1.LE.RGAMSQ) GO TO 130 167 IF (.NOT.DABS(DD2).LE.RGAMSQ) GO TO 190
|
D | srotmg.f | 54 REAL GAM,GAMSQ,ONE,RGAMSQ,SFLAG,SH11,SH12,SH21,SH22,SP1,SP2,SQ1, local 64 DATA GAM,GAMSQ,RGAMSQ/4096.E0,1.67772E7,5.96046E-8/ 144 IF (.NOT.SD1.LE.RGAMSQ) GO TO 130 169 IF (.NOT.ABS(SD2).LE.RGAMSQ) GO TO 190
|