Lines Matching refs:sflag
39 real sflag, stemp; in srotmg_() local
115 sflag = -two; in srotmg_()
137 sflag = zero; in srotmg_()
150 sflag = one; in srotmg_()
162 sflag = -one; in srotmg_()
175 if (! (sflag >= zero)) { in srotmg_()
179 if (! (sflag == zero)) { in srotmg_()
184 sflag = -one; in srotmg_()
189 sflag = -one; in srotmg_()
271 if (sflag < 0.f) { in srotmg_()
273 } else if (sflag == 0) { in srotmg_()
292 sparam[1] = sflag; in srotmg_()