Home | History | Annotate | Download | only in f2c

Lines Matching defs:one

21     static real one = 1.f;
55 /*     WITH SPARAM(1)=SFLAG, H HAS ONE OF THE FOLLOWING FORMS.. */
129     su = one - sh12 * sh21;
150     sflag = one;
153     su = one + sh11 * sh22;
162     sflag = -one;
182     sh11 = one;
183     sh22 = one;
184     sflag = -one;
187     sh21 = -one;
188     sh12 = one;
189     sflag = -one;