Lines Matching defs:index
117 static void check_error(TH_DATA * th_data, double e, double r, int index)
122 "%s failed at index %d: OLD: %2.18e NEW: %2.18e DIFF: %2.18e\n";
141 index, e, r, x);
155 int index)
159 d = din[index];
160 e = dex[index];
163 check_error(th_data, e, r, index);
169 int index)
173 d = din[index];
174 e = dex[index];
177 check_error(th_data, e, r, index);
182 double *dex2, int index)
185 "%s failed at index %d: OLD integral part: %f NEW: %f\n";
189 d = din[index];
190 e = dex[index];
193 if (tmp != dex2[index]) { /* bad integral part! */
200 index, dex2[index], tmp);
206 check_error(th_data, e, r, index);
211 double *dex2, int index)
215 d = din[index];
216 e = dex[index];
217 r = (*(th_data->th_func.funct)) (d, dex2[index]);
219 check_error(th_data, e, r, index);
225 int *dex2, int index)
228 "%s failed at index %d: OLD (exp. or sign): %d NEW: %d\n";
233 d = din[index];
234 e = dex[index];
238 if (tmp != dex2[index]) { /* bad exponent! */
245 index, dex2[index], tmp);
252 check_error(th_data, e, r, index);
257 int *din2, int index)
261 d = din[index];
262 e = dex[index];
263 r = (*(th_data->th_func.funct)) (d, din2[index]);
265 check_error(th_data, e, r, index);
282 int imax, index;
365 for (index = th_data->th_num; index < imax; index += num_threads) { /* computation loop */
368 compute_normal(th_data, din, dex, index);
372 compute_atan2_hypot(th_data, din, dex, index);
375 compute_modf(th_data, din, dex, dex2, index);
380 din, dex, dex2, index);
386 index);
390 din, dex, (int *)dex2, index);