| /external/eigen/blas/f2c/ |
| srotm.c | 30 real sh11, sh12, sh21, sh22, sflag; local
52 /* (SH11 SH12) (1.E0 SH12) (SH11 1.E0) (1.E0 0.E0) */
80 /* SPARAM(4)=SH12 */
113 sh12 = sparam[4];
120 sx[i__] = w + z__ * sh12;
140 sh12 = sparam[4];
148 sx[i__] = w * sh11 + z__ * sh12;
171 sh12 = sparam[4];
177 sx[kx] = w + z__ * sh12;
[all...] |
| srotmg.c | 37 real su, sp1, sp2, sq1, sq2, sh11, sh12, sh21, sh22; local
59 /* (SH11 SH12) (1.E0 SH12) (SH11 1.E0) (1.E0 0.E0) */
62 /* LOCATIONS 2-4 OF SPARAM CONTAIN SH11,SH21,SH12, AND SH22 */
88 /* SPARAM(4)=SH12 */
127 sh12 = sp2 / sp1;
129 su = one - sh12 * sh21;
164 sh12 = zero;
188 sh12 = one;
216 sh12 /= gam
[all...] |
| /external/eigen/blas/fortran/ |
| srotm.f | 23 * (SH11 SH12) (1.E0 SH12) (SH11 1.E0) (1.E0 0.E0)
51 * SPARAM(4)=SH12
57 REAL SFLAG,SH11,SH12,SH21,SH22,TWO,W,Z,ZERO
71 SH12 = SPARAM(4)
76 SX(I) = W + Z*SH12
92 SH12 = SPARAM(4)
98 SX(I) = W*SH11 + Z*SH12
110 SH12 = SPARAM(4)
115 SX(KX) = W + Z*SH12
[all...] |
| srotmg.f | 19 * (SH11 SH12) (1.E0 SH12) (SH11 1.E0) (1.E0 0.E0)
22 * LOCATIONS 2-4 OF SPARAM CONTAIN SH11,SH21,SH12, AND SH22
48 * SPARAM(4)=SH12
54 REAL GAM,GAMSQ,ONE,RGAMSQ,SFLAG,SH11,SH12,SH21,SH22,SP1,SP2,SQ1,
84 SH12 = SP2/SP1
86 SU = ONE - SH12*SH21
117 SH12 = ZERO
137 SH12 = ONE
153 SH12 = SH12/GA
[all...] |
