Lines Matching defs:pdtj
248 double *pdm1, *pdm2, *pdn, *pdtj, pdn_0, pdm1_0;
261 pdtj = &(dt[0]);
262 for (j = jj = 0; j < 2 * nlen; j++, jj++, pdtj++) {
264 a = pdtj[0] + pdn[0] * digit;
265 b = pdtj[1] + pdm1[0] * pdm2[j + 1] + a * TwoToMinus16;
266 pdtj[1] = b;
270 pdtj[2 * i] += pdm1[i] * m2j + pdn[i] * digit;
301 pdtj = &(dt[0]);
303 for (j = 0; j < 32; j++, pdtj++) {
306 a = pdtj[0] + pdn_0 * digit;
307 b = pdtj[1] + pdm1_0 * pdm2[j + 1] + a * TwoToMinus16;
308 pdtj[1] = b;
310 pdtj[2] += pdm1[1] *m2j + pdn[1] * digit;
311 pdtj[4] += pdm1[2] *m2j + pdn[2] * digit;
312 pdtj[6] += pdm1[3] *m2j + pdn[3] * digit;
313 pdtj[8] += pdm1[4] *m2j + pdn[4] * digit;
314 pdtj[10] += pdm1[5] *m2j + pdn[5] * digit;
315 pdtj[12] += pdm1[6] *m2j + pdn[6] * digit;
316 pdtj[14] += pdm1[7] *m2j + pdn[7] * digit;
317 pdtj[16] += pdm1[8] *m2j + pdn[8] * digit;
318 pdtj[18] += pdm1[9] *m2j + pdn[9] * digit;
319 pdtj[20] += pdm1[10] *m2j + pdn[10] * digit;
320 pdtj[22] += pdm1[11] *m2j + pdn[11] * digit;
321 pdtj[24] += pdm1[12] *m2j + pdn[12] * digit;
322 pdtj[26] += pdm1[13] *m2j + pdn[13] * digit;
323 pdtj[28] += pdm1[14] *m2j + pdn[14] * digit;
324 pdtj[30] += pdm1[15] *m2j + pdn[15] * digit;