Home | History | Annotate | Download | only in f2c

Lines Matching refs:z__

28     real w, z__;
119 z__ = sy[i__];
120 sx[i__] = w + z__ * sh12;
121 sy[i__] = w * sh21 + z__;
132 z__ = sy[i__];
133 sx[i__] = w * sh11 + z__;
134 sy[i__] = -w + sh22 * z__;
147 z__ = sy[i__];
148 sx[i__] = w * sh11 + z__ * sh12;
149 sy[i__] = w * sh21 + z__ * sh22;
176 z__ = sy[ky];
177 sx[kx] = w + z__ * sh12;
178 sy[ky] = w * sh21 + z__;
190 z__ = sy[ky];
191 sx[kx] = w * sh11 + z__;
192 sy[ky] = -w + sh22 * z__;
206 z__ = sy[ky];
207 sx[kx] = w * sh11 + z__ * sh12;
208 sy[ky] = w * sh21 + z__ * sh22;