Lines Matching refs:xl
124 double xh, xl, z, q, zz;
138 xl = a - z + c + zz;
140 xl = c - z + a + zz;
155 xl = z - xh + zz;
157 return pack_ldouble (xh, xl);
179 double xh, xl, t, tau, u, v, w;
204 xl = (t - u) + tau;
205 return pack_ldouble (xh, xl);
211 double xh, xl, s, sigma, t, tau, u, v, w;
249 xl = (t - u) + tau;
250 return pack_ldouble (xh, xl);