| line |
true |
false |
branch |
|
58
|
3 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
3 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
0 |
3 |
if (!(p && nrows && ncols)) return NULL; |
|
61
|
18 |
3 |
for (i=0; i < nrows; i++) { |
|
77
|
124 |
30 |
for (i=0; i
|
|
78
|
798 |
124 |
for (j=0; j
|
|
88
|
0 |
0 |
for (i=0; i
|
|
89
|
0 |
0 |
for (j=0; j
|
|
149
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
150
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
151
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
157
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
160
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
163
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
166
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
177
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
180
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
183
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
186
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
197
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
200
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
203
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
206
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
217
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
220
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
223
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
226
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
237
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
240
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
243
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
246
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
257
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
260
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
263
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
266
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
277
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
280
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
283
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
286
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
297
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
300
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
303
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
306
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
334
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
335
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
336
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
338
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
340
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
341
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
345
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
347
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
348
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
353
|
0 |
0 |
if(!__creating[1]) { |
|
354
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
355
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n1_size <= 1) __privtrans->__n1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n1_size <= 1) __privtrans->__n1_size = 1; |
|
357
|
0 |
0 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
359
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n1_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n1_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
360
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
368
|
0 |
0 |
}if(!__creating[2]) { |
|
369
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
370
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
372
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
374
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
375
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
383
|
0 |
0 |
}if(!__creating[3]) { |
|
384
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
385
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
387
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
389
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
390
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
403
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
404
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
410
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
411
|
0 |
0 |
!__creating[1] && |
|
412
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
418
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
419
|
0 |
0 |
!__creating[2] && |
|
420
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
426
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
427
|
0 |
0 |
!__creating[3] && |
|
428
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
434
|
0 |
0 |
if (hdrp) { |
|
435
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
443
|
0 |
0 |
PUSHMARK(SP) ; |
|
444
|
0 |
0 |
XPUSHs( hdrp ); |
|
448
|
0 |
0 |
if(count != 1) |
|
453
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
457
|
0 |
0 |
FREETMPS ; |
|
463
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
464
|
0 |
0 |
if( __privtrans->pdls[1]->hdrsv && __privtrans->pdls[1]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[1]->hdrsv && __privtrans->pdls[1]->hdrsv != &PL_sv_undef) |
|
466
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
470
|
0 |
0 |
if(propagate_hdrcpy) |
|
472
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
473
|
0 |
0 |
if( __privtrans->pdls[2]->hdrsv && __privtrans->pdls[2]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[2]->hdrsv && __privtrans->pdls[2]->hdrsv != &PL_sv_undef) |
|
475
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
479
|
0 |
0 |
if(propagate_hdrcpy) |
|
481
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
482
|
0 |
0 |
if( __privtrans->pdls[3]->hdrsv && __privtrans->pdls[3]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[3]->hdrsv && __privtrans->pdls[3]->hdrsv != &PL_sv_undef) |
|
484
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
488
|
0 |
0 |
if(propagate_hdrcpy) |
|
491
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
495
|
0 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
497
|
0 |
0 |
__privtrans->__inc_a_n = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_a_n = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
499
|
0 |
0 |
__privtrans->__inc_a_m = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_a_m = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
501
|
0 |
0 |
__privtrans->__inc_ptr_n1 = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_ptr_n1 = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
503
|
0 |
0 |
__privtrans->__inc_rowids_nnz = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids_nnz = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
525
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
529
|
0 |
0 |
if(__copy->__ddone) { |
|
546
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
549
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
552
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
555
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
560
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
578
|
0 |
0 |
for( __tind2 = 0 ; |
|
587
|
0 |
0 |
for( __tind1 = 0 ; |
|
620
|
0 |
0 |
if (dm.value) free(dm.value); |
|
621
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
631
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
632
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
635
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
638
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
641
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
646
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
664
|
0 |
0 |
for( __tind2 = 0 ; |
|
673
|
0 |
0 |
for( __tind1 = 0 ; |
|
706
|
0 |
0 |
if (dm.value) free(dm.value); |
|
707
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
717
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
718
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
721
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
724
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
727
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
732
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
750
|
0 |
0 |
for( __tind2 = 0 ; |
|
759
|
0 |
0 |
for( __tind1 = 0 ; |
|
792
|
0 |
0 |
if (dm.value) free(dm.value); |
|
793
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
803
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
804
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
807
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
810
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
813
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
818
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
836
|
0 |
0 |
for( __tind2 = 0 ; |
|
845
|
0 |
0 |
for( __tind1 = 0 ; |
|
878
|
0 |
0 |
if (dm.value) free(dm.value); |
|
879
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
889
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
890
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
893
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
896
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
899
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
904
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
922
|
0 |
0 |
for( __tind2 = 0 ; |
|
931
|
0 |
0 |
for( __tind1 = 0 ; |
|
964
|
0 |
0 |
if (dm.value) free(dm.value); |
|
965
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
975
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
976
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
979
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
982
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
985
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
990
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1008
|
0 |
0 |
for( __tind2 = 0 ; |
|
1017
|
0 |
0 |
for( __tind1 = 0 ; |
|
1050
|
0 |
0 |
if (dm.value) free(dm.value); |
|
1051
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
1061
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
1062
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1065
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1068
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1071
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1076
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1094
|
0 |
0 |
for( __tind2 = 0 ; |
|
1103
|
0 |
0 |
for( __tind1 = 0 ; |
|
1136
|
0 |
0 |
if (dm.value) free(dm.value); |
|
1137
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
1147
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
1148
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1151
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1154
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1157
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1162
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1180
|
0 |
0 |
for( __tind2 = 0 ; |
|
1189
|
0 |
0 |
for( __tind1 = 0 ; |
|
1222
|
0 |
0 |
if (dm.value) free(dm.value); |
|
1223
|
0 |
0 |
if (sm) svdFreeSMat(sm); |
|
1233
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
1250
|
0 |
0 |
if(__privtrans->__ddone) { |
|
1296
|
0 |
3 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
1297
|
0 |
3 |
__creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]); |
|
|
0 |
0 |
__creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]); |
|
1298
|
0 |
3 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
|
0 |
0 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
1304
|
0 |
3 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1307
|
0 |
3 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1310
|
0 |
3 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1313
|
0 |
3 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1316
|
0 |
3 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1319
|
0 |
3 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1322
|
0 |
3 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1325
|
0 |
3 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1328
|
0 |
3 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1331
|
0 |
3 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1346
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1349
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1352
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1355
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1358
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1361
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1364
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1367
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1370
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1373
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1388
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1391
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1394
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1397
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1400
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1403
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1406
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1409
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1412
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1415
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1430
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1433
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1436
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1439
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1442
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1445
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1448
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1451
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1454
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1457
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1472
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1475
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1478
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1481
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1484
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1487
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1490
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1493
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1496
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1499
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1514
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1517
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1520
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1523
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1526
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1529
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1532
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1535
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1538
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1541
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1556
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1559
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1562
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1565
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1568
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1571
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1574
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1577
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1580
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1583
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1598
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1601
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1604
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1607
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1610
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1613
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1616
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1619
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1622
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1625
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1657
|
0 |
3 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
1658
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
1660
|
0 |
3 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
1662
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
1663
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
1668
|
0 |
3 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
1669
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
1671
|
0 |
3 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
1673
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
1674
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
1679
|
0 |
3 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
1680
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
1682
|
3 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
1684
|
3 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
1685
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
1690
|
0 |
3 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
1691
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
1693
|
0 |
3 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
1695
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
1696
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
1701
|
3 |
0 |
if(!__creating[7]) { |
|
1702
|
0 |
3 |
if(((__privtrans->pdls[7]))->ndims < 2) { |
|
1703
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
1704
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
1706
|
0 |
3 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
1708
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
1709
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
1713
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
1715
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
1716
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[1] != 1) { |
|
1724
|
3 |
0 |
}if(!__creating[8]) { |
|
1725
|
0 |
3 |
if(((__privtrans->pdls[8]))->ndims < 1) { |
|
1726
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
1728
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
1730
|
3 |
0 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
1731
|
0 |
0 |
if(((__privtrans->pdls[8]))->dims[0] != 1) { |
|
1739
|
3 |
0 |
}if(!__creating[9]) { |
|
1740
|
0 |
3 |
if(((__privtrans->pdls[9]))->ndims < 2) { |
|
1741
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
1742
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
1744
|
0 |
3 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
1746
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
1747
|
0 |
0 |
if(((__privtrans->pdls[9]))->dims[0] != 1) { |
|
1751
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
1753
|
3 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[9]))->dims[1]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[9]))->dims[1]) { |
|
1754
|
0 |
0 |
if(((__privtrans->pdls[9]))->dims[1] != 1) { |
|
1767
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1768
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
1774
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1775
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
1781
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1782
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
1788
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1789
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
1795
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1796
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
1802
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1803
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
1809
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
1810
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
1816
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
1817
|
0 |
3 |
!__creating[7] && |
|
1818
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
1824
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
1825
|
0 |
3 |
!__creating[8] && |
|
1826
|
0 |
0 |
__privtrans->pdls[8]->hdrsv && |
|
1832
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
1833
|
0 |
3 |
!__creating[9] && |
|
1834
|
0 |
0 |
__privtrans->pdls[9]->hdrsv && |
|
1840
|
0 |
3 |
if (hdrp) { |
|
1841
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
1849
|
0 |
0 |
PUSHMARK(SP) ; |
|
1850
|
0 |
0 |
XPUSHs( hdrp ); |
|
1854
|
0 |
0 |
if(count != 1) |
|
1859
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
1863
|
0 |
0 |
FREETMPS ; |
|
1869
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
1870
|
0 |
0 |
if( __privtrans->pdls[7]->hdrsv && __privtrans->pdls[7]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[7]->hdrsv && __privtrans->pdls[7]->hdrsv != &PL_sv_undef) |
|
1872
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
1876
|
0 |
0 |
if(propagate_hdrcpy) |
|
1878
|
0 |
0 |
if ( __privtrans->pdls[8]->hdrsv != hdrp ){ |
|
1879
|
0 |
0 |
if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef) |
|
1881
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
1885
|
0 |
0 |
if(propagate_hdrcpy) |
|
1887
|
0 |
0 |
if ( __privtrans->pdls[9]->hdrsv != hdrp ){ |
|
1888
|
0 |
0 |
if( __privtrans->pdls[9]->hdrsv && __privtrans->pdls[9]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[9]->hdrsv && __privtrans->pdls[9]->hdrsv != &PL_sv_undef) |
|
1890
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
1894
|
0 |
0 |
if(propagate_hdrcpy) |
|
1897
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
1901
|
3 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
3 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
1903
|
3 |
0 |
__privtrans->__inc_ptr_nplus1 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_ptr_nplus1 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
1905
|
3 |
0 |
__privtrans->__inc_rowids_nnz = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_rowids_nnz = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
1907
|
3 |
0 |
__privtrans->__inc_nzvals_nnz = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_nzvals_nnz = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
1909
|
3 |
0 |
__privtrans->__inc_end_2 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_end_2 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
1911
|
3 |
0 |
__privtrans->__inc_ut_m = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_ut_m = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
1913
|
3 |
0 |
__privtrans->__inc_ut_d = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_ut_d = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
1915
|
3 |
0 |
__privtrans->__inc_s_d = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_s_d = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
1917
|
3 |
0 |
__privtrans->__inc_vt_n = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 1 || __privtrans->pdls[9]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_vt_n = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 1 || __privtrans->pdls[9]->dims[1] <= 1) |
|
1939
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
1943
|
0 |
0 |
if(__copy->__ddone) { |
|
1960
|
0 |
3 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1963
|
0 |
3 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1966
|
0 |
3 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1969
|
0 |
3 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1972
|
0 |
3 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1975
|
0 |
3 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1978
|
0 |
3 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
1981
|
0 |
3 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
1984
|
0 |
3 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
1987
|
0 |
3 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
1992
|
0 |
3 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2028
|
3 |
3 |
for( __tind2 = 0 ; |
|
2043
|
3 |
3 |
for( __tind1 = 0 ; |
|
2107
|
3 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2123
|
0 |
3 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
2124
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2127
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2130
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2133
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2136
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2139
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2142
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2145
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2148
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2151
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2156
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2192
|
0 |
0 |
for( __tind2 = 0 ; |
|
2207
|
0 |
0 |
for( __tind1 = 0 ; |
|
2271
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2287
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
2288
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2291
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2294
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2297
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2300
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2303
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2306
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2309
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2312
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2315
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2320
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2356
|
0 |
0 |
for( __tind2 = 0 ; |
|
2371
|
0 |
0 |
for( __tind1 = 0 ; |
|
2435
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2451
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
2452
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2455
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2458
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2461
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2464
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2467
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2470
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2473
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2476
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2479
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2484
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2520
|
0 |
0 |
for( __tind2 = 0 ; |
|
2535
|
0 |
0 |
for( __tind1 = 0 ; |
|
2599
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2615
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
2616
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2619
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2622
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2625
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2628
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2631
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2634
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2637
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2640
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2643
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2648
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2684
|
0 |
0 |
for( __tind2 = 0 ; |
|
2699
|
0 |
0 |
for( __tind1 = 0 ; |
|
2763
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2779
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
2780
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2783
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2786
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2789
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2792
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2795
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2798
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2801
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2804
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2807
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2812
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2848
|
0 |
0 |
for( __tind2 = 0 ; |
|
2863
|
0 |
0 |
for( __tind1 = 0 ; |
|
2927
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
2943
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
2944
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2947
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2950
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2953
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2956
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2959
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2962
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2965
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2968
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
2971
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
2976
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3012
|
0 |
0 |
for( __tind2 = 0 ; |
|
3027
|
0 |
0 |
for( __tind1 = 0 ; |
|
3091
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
3107
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
3108
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3111
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3114
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3117
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3120
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3123
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3126
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3129
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3132
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3135
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3140
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3176
|
0 |
0 |
for( __tind2 = 0 ; |
|
3191
|
0 |
0 |
for( __tind1 = 0 ; |
|
3255
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
3271
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
3288
|
3 |
0 |
if(__privtrans->__ddone) { |
|
3334
|
0 |
4 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
3335
|
0 |
4 |
__creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]); |
|
|
0 |
0 |
__creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]); |
|
3336
|
0 |
4 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
|
0 |
0 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
3342
|
4 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
4 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3345
|
0 |
4 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3348
|
0 |
4 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3351
|
0 |
4 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3354
|
0 |
4 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3357
|
0 |
4 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3360
|
0 |
4 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3363
|
0 |
4 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3366
|
0 |
4 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3369
|
0 |
4 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3384
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3387
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3390
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3393
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3396
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3399
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3402
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3405
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3408
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3411
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3426
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3429
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3432
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3435
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3438
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3441
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3444
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3447
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3450
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3453
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3468
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3471
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3474
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3477
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3480
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3483
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3486
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3489
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3492
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3495
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3510
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3513
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3516
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3519
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3522
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3525
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3528
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3531
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3534
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3537
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3552
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3555
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3558
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3561
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3564
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3567
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3570
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3573
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3576
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3579
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3594
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3597
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3600
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3603
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3606
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3609
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3612
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3615
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3618
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3621
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3636
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3639
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3642
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3645
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3648
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3651
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3654
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3657
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3660
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
3663
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
3695
|
0 |
4 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
3696
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
3697
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__Two_size <= 1) __privtrans->__Two_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__Two_size <= 1) __privtrans->__Two_size = 1; |
|
3699
|
0 |
4 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
3701
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
3702
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
3706
|
0 |
4 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__Two_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__Two_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__Two_size == 1)) { |
|
3708
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__Two_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__Two_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
3709
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
3714
|
0 |
4 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
3715
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
3717
|
4 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
4 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
4 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
3719
|
4 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
4 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
3720
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
3725
|
0 |
4 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
3726
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
3728
|
0 |
4 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
3730
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
3731
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
3736
|
4 |
0 |
if(!__creating[7]) { |
|
3737
|
0 |
4 |
if(((__privtrans->pdls[7]))->ndims < 2) { |
|
3738
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
3739
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
3741
|
0 |
4 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
3743
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
3744
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
3748
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
3750
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
3751
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[1] != 1) { |
|
3759
|
4 |
0 |
}if(!__creating[8]) { |
|
3760
|
0 |
4 |
if(((__privtrans->pdls[8]))->ndims < 1) { |
|
3761
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
3763
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
3765
|
4 |
0 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
|
0 |
4 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
3766
|
0 |
0 |
if(((__privtrans->pdls[8]))->dims[0] != 1) { |
|
3774
|
4 |
0 |
}if(!__creating[9]) { |
|
3775
|
0 |
4 |
if(((__privtrans->pdls[9]))->ndims < 2) { |
|
3776
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
3777
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
3779
|
0 |
4 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
3781
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
3782
|
0 |
0 |
if(((__privtrans->pdls[9]))->dims[0] != 1) { |
|
3786
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
3788
|
4 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[9]))->dims[1]) { |
|
|
0 |
4 |
} else if(((__privtrans->pdls[9]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[9]))->dims[1]) { |
|
3789
|
0 |
0 |
if(((__privtrans->pdls[9]))->dims[1] != 1) { |
|
3802
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3803
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
3809
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3810
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
3816
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3817
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
3823
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3824
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
3830
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3831
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
3837
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3838
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
3844
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
3845
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
3851
|
4 |
0 |
if(!hdrp && |
|
|
4 |
0 |
if(!hdrp && |
|
3852
|
0 |
4 |
!__creating[7] && |
|
3853
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
3859
|
4 |
0 |
if(!hdrp && |
|
|
4 |
0 |
if(!hdrp && |
|
3860
|
0 |
4 |
!__creating[8] && |
|
3861
|
0 |
0 |
__privtrans->pdls[8]->hdrsv && |
|
3867
|
4 |
0 |
if(!hdrp && |
|
|
4 |
0 |
if(!hdrp && |
|
3868
|
0 |
4 |
!__creating[9] && |
|
3869
|
0 |
0 |
__privtrans->pdls[9]->hdrsv && |
|
3875
|
0 |
4 |
if (hdrp) { |
|
3876
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
3884
|
0 |
0 |
PUSHMARK(SP) ; |
|
3885
|
0 |
0 |
XPUSHs( hdrp ); |
|
3889
|
0 |
0 |
if(count != 1) |
|
3894
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
3898
|
0 |
0 |
FREETMPS ; |
|
3904
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
3905
|
0 |
0 |
if( __privtrans->pdls[7]->hdrsv && __privtrans->pdls[7]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[7]->hdrsv && __privtrans->pdls[7]->hdrsv != &PL_sv_undef) |
|
3907
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
3911
|
0 |
0 |
if(propagate_hdrcpy) |
|
3913
|
0 |
0 |
if ( __privtrans->pdls[8]->hdrsv != hdrp ){ |
|
3914
|
0 |
0 |
if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef) |
|
3916
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
3920
|
0 |
0 |
if(propagate_hdrcpy) |
|
3922
|
0 |
0 |
if ( __privtrans->pdls[9]->hdrsv != hdrp ){ |
|
3923
|
0 |
0 |
if( __privtrans->pdls[9]->hdrsv && __privtrans->pdls[9]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[9]->hdrsv && __privtrans->pdls[9]->hdrsv != &PL_sv_undef) |
|
3925
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
3929
|
0 |
0 |
if(propagate_hdrcpy) |
|
3932
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
3936
|
4 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
4 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
3938
|
4 |
0 |
__privtrans->__inc_whichi_nnz = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_whichi_nnz = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
3940
|
4 |
0 |
__privtrans->__inc_whichi_Two = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_whichi_Two = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
3942
|
4 |
0 |
__privtrans->__inc_nzvals_nnz = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_nzvals_nnz = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
3944
|
4 |
0 |
__privtrans->__inc_end_2 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_end_2 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
3946
|
4 |
0 |
__privtrans->__inc_ut_m = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_ut_m = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
3948
|
4 |
0 |
__privtrans->__inc_ut_d = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_ut_d = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
3950
|
4 |
0 |
__privtrans->__inc_s_d = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_s_d = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
3952
|
4 |
0 |
__privtrans->__inc_vt_n = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 1 || __privtrans->pdls[9]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_vt_n = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 1 || __privtrans->pdls[9]->dims[1] <= 1) |
|
3974
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
3978
|
0 |
0 |
if(__copy->__ddone) { |
|
3995
|
4 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
4 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3998
|
0 |
4 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4001
|
0 |
4 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4004
|
0 |
4 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4007
|
0 |
4 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4010
|
0 |
4 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4013
|
0 |
4 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4016
|
0 |
4 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4019
|
0 |
4 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4022
|
0 |
4 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4027
|
0 |
4 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4063
|
4 |
4 |
for( __tind2 = 0 ; |
|
4078
|
4 |
4 |
for( __tind1 = 0 ; |
|
4115
|
0 |
4 |
if (__privtrans->__Two_size != 2) { |
|
4120
|
88 |
4 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4121
|
0 |
88 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
88 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4122
|
0 |
88 |
if ( nzc < ci ) |
|
4129
|
88 |
4 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4130
|
0 |
88 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
88 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4131
|
28 |
88 |
for ( ; ci <= nzc; ++ci) { |
|
4135
|
4 |
4 |
for ( ; ci <= dimN; ++ci) { |
|
4144
|
4 |
0 |
if (sm.pointr) free(sm.pointr); |
|
4150
|
4 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
4166
|
0 |
4 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
4167
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4170
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4173
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4176
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4179
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4182
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4185
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4188
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4191
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4194
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4199
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4235
|
0 |
0 |
for( __tind2 = 0 ; |
|
4250
|
0 |
0 |
for( __tind1 = 0 ; |
|
4287
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
4292
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4293
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4294
|
0 |
0 |
if ( nzc < ci ) |
|
4301
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4302
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4303
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
4307
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
4316
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
4322
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
4338
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
4339
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4342
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4345
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4348
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4351
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4354
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4357
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4360
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4363
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4366
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4371
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4407
|
0 |
0 |
for( __tind2 = 0 ; |
|
4422
|
0 |
0 |
for( __tind1 = 0 ; |
|
4459
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
4464
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4465
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4466
|
0 |
0 |
if ( nzc < ci ) |
|
4473
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4474
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4475
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
4479
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
4488
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
4494
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
4510
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
4511
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4514
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4517
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4520
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4523
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4526
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4529
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4532
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4535
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4538
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4543
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4579
|
0 |
0 |
for( __tind2 = 0 ; |
|
4594
|
0 |
0 |
for( __tind1 = 0 ; |
|
4631
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
4636
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4637
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4638
|
0 |
0 |
if ( nzc < ci ) |
|
4645
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4646
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4647
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
4651
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
4660
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
4666
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
4682
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
4683
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4686
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4689
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4692
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4695
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4698
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4701
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4704
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4707
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4710
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4715
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4751
|
0 |
0 |
for( __tind2 = 0 ; |
|
4766
|
0 |
0 |
for( __tind1 = 0 ; |
|
4803
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
4808
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4809
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4810
|
0 |
0 |
if ( nzc < ci ) |
|
4817
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4818
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4819
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
4823
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
4832
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
4838
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
4854
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
4855
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4858
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4861
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4864
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4867
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4870
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
4873
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
4876
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
4879
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
4882
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
4887
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4923
|
0 |
0 |
for( __tind2 = 0 ; |
|
4938
|
0 |
0 |
for( __tind1 = 0 ; |
|
4975
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
4980
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4981
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4982
|
0 |
0 |
if ( nzc < ci ) |
|
4989
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
4990
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
4991
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
4995
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
5004
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
5010
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
5026
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
5027
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5030
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5033
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5036
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5039
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5042
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5045
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5048
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
5051
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
5054
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
5059
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5095
|
0 |
0 |
for( __tind2 = 0 ; |
|
5110
|
0 |
0 |
for( __tind1 = 0 ; |
|
5147
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
5152
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
5153
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
5154
|
0 |
0 |
if ( nzc < ci ) |
|
5161
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
5162
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
5163
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
5167
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
5176
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
5182
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
5198
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
5199
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * whichi_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5202
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5205
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * n_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5208
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * m_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5211
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5214
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5217
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5220
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
5223
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
5226
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
5231
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5267
|
0 |
0 |
for( __tind2 = 0 ; |
|
5282
|
0 |
0 |
for( __tind1 = 0 ; |
|
5319
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
5324
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
5325
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
5326
|
0 |
0 |
if ( nzc < ci ) |
|
5333
|
0 |
0 |
for (ci=0,nzi=0; nzi < __privtrans->__nnz_size; ++nzi) { |
|
5334
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
nzc = (whichi_datap)[0+(__inc_whichi_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))+(__inc_whichi_Two*PP_INDTERM(__privtrans->__Two_size, 0))] PDL_COMMENT("ACCESS()") ; |
|
5335
|
0 |
0 |
for ( ; ci <= nzc; ++ci) { |
|
5339
|
0 |
0 |
for ( ; ci <= dimN; ++ci) { |
|
5348
|
0 |
0 |
if (sm.pointr) free(sm.pointr); |
|
5354
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
5370
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
5387
|
4 |
0 |
if(__privtrans->__ddone) { |
|
5428
|
0 |
3 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
5429
|
0 |
3 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
5430
|
0 |
3 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
|
0 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
5436
|
0 |
3 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5439
|
0 |
3 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5442
|
0 |
3 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5445
|
0 |
3 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5448
|
0 |
3 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5451
|
0 |
3 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5454
|
0 |
3 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5468
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5471
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5474
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5477
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5480
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5483
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5486
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5500
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5503
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5506
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5509
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5512
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5515
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5518
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5532
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5535
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5538
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5541
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5544
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5547
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5550
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5564
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5567
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5570
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5573
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5576
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5579
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5582
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5596
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5599
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5602
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5605
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5608
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5611
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5614
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5628
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5631
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5634
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5637
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5640
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5643
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5646
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5660
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5663
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5666
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5669
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5672
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5675
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5678
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5709
|
0 |
3 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
5710
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
5711
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
5713
|
0 |
3 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
5715
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
5716
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
5720
|
0 |
3 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
5722
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
5723
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
5728
|
0 |
3 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
5729
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
5731
|
0 |
3 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
5733
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
5734
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
5739
|
3 |
0 |
if(!__creating[4]) { |
|
5740
|
0 |
3 |
if(((__privtrans->pdls[4]))->ndims < 2) { |
|
5741
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
5742
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
5744
|
3 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) { |
|
5746
|
3 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
5747
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
5751
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
5753
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
5754
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[1] != 1) { |
|
5762
|
3 |
0 |
}if(!__creating[5]) { |
|
5763
|
0 |
3 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
5764
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
5766
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
5768
|
3 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
5769
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
5777
|
3 |
0 |
}if(!__creating[6]) { |
|
5778
|
0 |
3 |
if(((__privtrans->pdls[6]))->ndims < 2) { |
|
5779
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
5780
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
5782
|
3 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
5784
|
3 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
5785
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
5789
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
5791
|
3 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[6]))->dims[1]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[6]))->dims[1]) { |
|
5792
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[1] != 1) { |
|
5805
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
5806
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
5812
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
5813
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
5819
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
5820
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
5826
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
5827
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
5833
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
5834
|
0 |
3 |
!__creating[4] && |
|
5835
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
5841
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
5842
|
0 |
3 |
!__creating[5] && |
|
5843
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
5849
|
3 |
0 |
if(!hdrp && |
|
|
3 |
0 |
if(!hdrp && |
|
5850
|
0 |
3 |
!__creating[6] && |
|
5851
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
5857
|
0 |
3 |
if (hdrp) { |
|
5858
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
5866
|
0 |
0 |
PUSHMARK(SP) ; |
|
5867
|
0 |
0 |
XPUSHs( hdrp ); |
|
5871
|
0 |
0 |
if(count != 1) |
|
5876
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
5880
|
0 |
0 |
FREETMPS ; |
|
5886
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
5887
|
0 |
0 |
if( __privtrans->pdls[4]->hdrsv && __privtrans->pdls[4]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[4]->hdrsv && __privtrans->pdls[4]->hdrsv != &PL_sv_undef) |
|
5889
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
5893
|
0 |
0 |
if(propagate_hdrcpy) |
|
5895
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
5896
|
0 |
0 |
if( __privtrans->pdls[5]->hdrsv && __privtrans->pdls[5]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[5]->hdrsv && __privtrans->pdls[5]->hdrsv != &PL_sv_undef) |
|
5898
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
5902
|
0 |
0 |
if(propagate_hdrcpy) |
|
5904
|
0 |
0 |
if ( __privtrans->pdls[6]->hdrsv != hdrp ){ |
|
5905
|
0 |
0 |
if( __privtrans->pdls[6]->hdrsv && __privtrans->pdls[6]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[6]->hdrsv && __privtrans->pdls[6]->hdrsv != &PL_sv_undef) |
|
5907
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
5911
|
0 |
0 |
if(propagate_hdrcpy) |
|
5914
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
5918
|
3 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
3 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
5920
|
3 |
0 |
__privtrans->__inc_a_n = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_a_n = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
5922
|
3 |
0 |
__privtrans->__inc_a_m = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_a_m = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
5924
|
3 |
0 |
__privtrans->__inc_end_2 = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_end_2 = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
5926
|
3 |
0 |
__privtrans->__inc_ut_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_ut_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
5928
|
3 |
0 |
__privtrans->__inc_ut_d = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_ut_d = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
5930
|
3 |
0 |
__privtrans->__inc_s_d = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_s_d = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
5932
|
3 |
0 |
__privtrans->__inc_vt_n = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_vt_n = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1) |
|
5954
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
5958
|
0 |
0 |
if(__copy->__ddone) { |
|
5975
|
0 |
3 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5978
|
0 |
3 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5981
|
0 |
3 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5984
|
0 |
3 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5987
|
0 |
3 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5990
|
0 |
3 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
5993
|
0 |
3 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
5998
|
0 |
3 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6025
|
3 |
3 |
for( __tind2 = 0 ; |
|
6037
|
3 |
3 |
for( __tind1 = 0 ; |
|
6075
|
3 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6076
|
3 |
0 |
if (smp) svdFreeSMat(smp); |
|
6077
|
3 |
0 |
if (dm.value) free(dm.value); |
|
6090
|
0 |
3 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
6091
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6094
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6097
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6100
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6103
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6106
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6109
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6114
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6141
|
0 |
0 |
for( __tind2 = 0 ; |
|
6153
|
0 |
0 |
for( __tind1 = 0 ; |
|
6191
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6192
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6193
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6206
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
6207
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6210
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6213
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6216
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6219
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6222
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6225
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6230
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6257
|
0 |
0 |
for( __tind2 = 0 ; |
|
6269
|
0 |
0 |
for( __tind1 = 0 ; |
|
6307
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6308
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6309
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6322
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
6323
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6326
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6329
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6332
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6335
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6338
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6341
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6346
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6373
|
0 |
0 |
for( __tind2 = 0 ; |
|
6385
|
0 |
0 |
for( __tind1 = 0 ; |
|
6423
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6424
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6425
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6438
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
6439
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6442
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6445
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6448
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6451
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6454
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6457
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6462
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6489
|
0 |
0 |
for( __tind2 = 0 ; |
|
6501
|
0 |
0 |
for( __tind1 = 0 ; |
|
6539
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6540
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6541
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6554
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
6555
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6558
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6561
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6564
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6567
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6570
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6573
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6578
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6605
|
0 |
0 |
for( __tind2 = 0 ; |
|
6617
|
0 |
0 |
for( __tind1 = 0 ; |
|
6655
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6656
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6657
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6670
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
6671
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6674
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6677
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6680
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6683
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6686
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6689
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6694
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6721
|
0 |
0 |
for( __tind2 = 0 ; |
|
6733
|
0 |
0 |
for( __tind1 = 0 ; |
|
6771
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6772
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6773
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6786
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
6787
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * a_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6790
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * iterations_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6793
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * end_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6796
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * kappa_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6799
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * ut_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6802
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
6805
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * vt_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
6810
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6837
|
0 |
0 |
for( __tind2 = 0 ; |
|
6849
|
0 |
0 |
for( __tind1 = 0 ; |
|
6887
|
0 |
0 |
if (svdr) svdFreeSVDRec(svdr); |
|
6888
|
0 |
0 |
if (smp) svdFreeSMat(smp); |
|
6889
|
0 |
0 |
if (dm.value) free(dm.value); |
|
6902
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
6919
|
3 |
0 |
if(__privtrans->__ddone) { |
|
6961
|
4 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
4 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
6967
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6970
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6973
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6976
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6979
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
6993
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6996
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6999
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7002
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7005
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7019
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7022
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7025
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7028
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7031
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7045
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7048
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7051
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7054
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7057
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7071
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7074
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7077
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7080
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7083
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7097
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7100
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7103
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7106
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7109
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7123
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7126
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7129
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7132
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7135
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7149
|
3 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
3 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7152
|
2 |
2 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
2 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7155
|
3 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
3 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7158
|
0 |
4 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7161
|
0 |
4 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7192
|
0 |
4 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
7193
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
7194
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
7196
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7198
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
7199
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
7203
|
0 |
4 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
7205
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
7206
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
7210
|
0 |
4 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
7211
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
7213
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7215
|
4 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
4 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
7216
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
7220
|
0 |
4 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
7221
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
7222
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
7224
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
4 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
4 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7226
|
4 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
4 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
7227
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
7231
|
0 |
4 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
7233
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
7234
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
7238
|
0 |
4 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
7239
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__Two_size <= 1) __privtrans->__Two_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__Two_size <= 1) __privtrans->__Two_size = 1; |
|
7240
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
7242
|
0 |
4 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__Two_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__Two_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__Two_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__Two_size == 1)) { |
|
7244
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__Two_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__Two_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
7245
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
7249
|
0 |
4 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__nnz_size == 1)) { |
|
7251
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__nnz_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__nnz_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
7252
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
7256
|
0 |
4 |
if(!__creating[4]) { |
|
7257
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
7258
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
7260
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
7262
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
7263
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
7275
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
7276
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
7282
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
7283
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
7289
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
7290
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
7296
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
7297
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
7303
|
4 |
0 |
if(!hdrp && |
|
|
0 |
4 |
if(!hdrp && |
|
7304
|
0 |
0 |
!__creating[4] && |
|
7305
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
7311
|
0 |
4 |
if (hdrp) { |
|
7312
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
7320
|
0 |
0 |
PUSHMARK(SP) ; |
|
7321
|
0 |
0 |
XPUSHs( hdrp ); |
|
7325
|
0 |
0 |
if(count != 1) |
|
7330
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
7334
|
0 |
0 |
FREETMPS ; |
|
7340
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
7341
|
0 |
0 |
if( __privtrans->pdls[4]->hdrsv && __privtrans->pdls[4]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[4]->hdrsv && __privtrans->pdls[4]->hdrsv != &PL_sv_undef) |
|
7343
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
7347
|
0 |
0 |
if(propagate_hdrcpy) |
|
7350
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
7354
|
4 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
4 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
7356
|
3 |
1 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
7358
|
3 |
1 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
7360
|
2 |
2 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
7362
|
3 |
1 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
7364
|
3 |
1 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
7366
|
0 |
4 |
__privtrans->__inc_which_Two = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_which_Two = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_which_Two = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
7368
|
0 |
4 |
__privtrans->__inc_which_nnz = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
4 |
0 |
__privtrans->__inc_which_nnz = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
4 |
__privtrans->__inc_which_nnz = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
7370
|
0 |
4 |
__privtrans->__inc_vals_nnz = PDL_REPRINC(__privtrans->pdls[4],0); __privtrans->__ddone = 1; |
|
7390
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
7394
|
0 |
0 |
if(__copy->__ddone) { |
|
7413
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7416
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7419
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7422
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7425
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7430
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7451
|
0 |
0 |
for( __tind2 = 0 ; |
|
7461
|
0 |
0 |
for( __tind1 = 0 ; |
|
7481
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7487
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7490
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7491
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7492
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7494
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7506
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
7507
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7510
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7513
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7516
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7519
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7524
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7545
|
0 |
0 |
for( __tind2 = 0 ; |
|
7555
|
0 |
0 |
for( __tind1 = 0 ; |
|
7575
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7581
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7584
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7585
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7586
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7588
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7600
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
7601
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7604
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7607
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7610
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7613
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7618
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7639
|
0 |
0 |
for( __tind2 = 0 ; |
|
7649
|
0 |
0 |
for( __tind1 = 0 ; |
|
7669
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7675
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7678
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7679
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7680
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7682
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7694
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
7695
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7698
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7701
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7704
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7707
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7712
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7733
|
0 |
0 |
for( __tind2 = 0 ; |
|
7743
|
0 |
0 |
for( __tind1 = 0 ; |
|
7763
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7769
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7772
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7773
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7774
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7776
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7788
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
7789
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7792
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7795
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7798
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7801
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7806
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7827
|
0 |
0 |
for( __tind2 = 0 ; |
|
7837
|
0 |
0 |
for( __tind1 = 0 ; |
|
7857
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7863
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7866
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7867
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7868
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7870
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7882
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
7883
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7886
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7889
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7892
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7895
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7900
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7921
|
0 |
0 |
for( __tind2 = 0 ; |
|
7931
|
0 |
0 |
for( __tind1 = 0 ; |
|
7951
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
7957
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
7960
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
7961
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
7962
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
7964
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
7976
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
7977
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7980
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7983
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7986
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7989
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7994
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8015
|
0 |
0 |
for( __tind2 = 0 ; |
|
8025
|
0 |
0 |
for( __tind1 = 0 ; |
|
8045
|
0 |
0 |
if (__privtrans->__Two_size != 2) { |
|
8051
|
0 |
0 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
8054
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
8055
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
8056
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
8058
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
8070
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
8071
|
3 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
3 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8074
|
2 |
2 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
2 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8077
|
3 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
3 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8080
|
0 |
4 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * which_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8083
|
0 |
4 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8088
|
0 |
4 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8109
|
4 |
4 |
for( __tind2 = 0 ; |
|
8119
|
4 |
4 |
for( __tind1 = 0 ; |
|
8139
|
0 |
4 |
if (__privtrans->__Two_size != 2) { |
|
8145
|
88 |
4 |
for(nnz=0; nnz<(__nnz_size); nnz++) { |
|
8148
|
484 |
88 |
for(d=0; d<(__d_size); d++) { |
|
8149
|
0 |
484 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
__SVDLIBC_LONG ni=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 0))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") , mi=(which_datap)[0+(__inc_which_Two*PP_INDTERM(__privtrans->__Two_size, 1))+(__inc_which_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") ; |
|
8150
|
0 |
484 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
484 |
v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
8152
|
0 |
88 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nnz))] PDL_COMMENT("ACCESS()") = v; |
|
8164
|
0 |
4 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
8181
|
4 |
0 |
if(__privtrans->__ddone) { |
|
8224
|
2 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
2 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
8230
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8233
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8236
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8239
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8242
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8245
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8259
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8262
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8265
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8268
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8271
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8274
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8288
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8291
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8294
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8297
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8300
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8303
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8317
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8320
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8323
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8326
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8329
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8332
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8346
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8349
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8352
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8355
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8358
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8361
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8375
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8378
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8381
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8384
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8387
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8390
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8404
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8407
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8410
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8413
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8416
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8419
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8433
|
1 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
1 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8436
|
1 |
1 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
1 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8439
|
1 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
1 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8442
|
0 |
2 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8445
|
0 |
2 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8448
|
0 |
2 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8479
|
0 |
2 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
8480
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
8481
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
8483
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
8485
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
8486
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
8490
|
0 |
2 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
8492
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
8493
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
8497
|
0 |
2 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
8498
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
8500
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
8502
|
2 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
8503
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
8507
|
0 |
2 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
8508
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
8509
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
8511
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
8513
|
2 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
8514
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
8518
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
8520
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
8521
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
8525
|
0 |
2 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
8526
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
8528
|
0 |
2 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
8530
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
8531
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
8535
|
0 |
2 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
8536
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
8538
|
0 |
2 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
8540
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
8541
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
8545
|
0 |
2 |
if(!__creating[5]) { |
|
8546
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
8547
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
8549
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
8551
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
8552
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
8564
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8565
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
8571
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8572
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
8578
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8579
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
8585
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8586
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
8592
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8593
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
8599
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8600
|
0 |
0 |
!__creating[5] && |
|
8601
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
8607
|
0 |
2 |
if (hdrp) { |
|
8608
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
8616
|
0 |
0 |
PUSHMARK(SP) ; |
|
8617
|
0 |
0 |
XPUSHs( hdrp ); |
|
8621
|
0 |
0 |
if(count != 1) |
|
8626
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
8630
|
0 |
0 |
FREETMPS ; |
|
8636
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
8637
|
0 |
0 |
if( __privtrans->pdls[5]->hdrsv && __privtrans->pdls[5]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[5]->hdrsv && __privtrans->pdls[5]->hdrsv != &PL_sv_undef) |
|
8639
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
8643
|
0 |
0 |
if(propagate_hdrcpy) |
|
8646
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
8650
|
2 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
2 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
8652
|
1 |
1 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
8654
|
1 |
1 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
8656
|
1 |
1 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
8658
|
1 |
1 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
8660
|
1 |
1 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
8662
|
0 |
2 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
8664
|
0 |
2 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
8666
|
0 |
2 |
__privtrans->__inc_vals_nnz = PDL_REPRINC(__privtrans->pdls[5],0); __privtrans->__ddone = 1; |
|
8686
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
8690
|
0 |
0 |
if(__copy->__ddone) { |
|
8709
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8712
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8715
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8718
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8721
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8724
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Byte * vals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8729
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8753
|
0 |
0 |
for( __tind2 = 0 ; |
|
8764
|
0 |
0 |
for( __tind1 = 0 ; |
|
8785
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
8791
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
8793
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
8794
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
8795
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
8798
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
8799
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
8813
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
8814
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8817
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8820
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8823
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8826
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8829
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Short * vals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8834
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8858
|
0 |
0 |
for( __tind2 = 0 ; |
|
8869
|
0 |
0 |
for( __tind1 = 0 ; |
|
8890
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
8896
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
8898
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
8899
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
8900
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
8903
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
8904
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
8918
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
8919
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8922
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8925
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8928
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8931
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8934
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Ushort * vals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8939
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8963
|
0 |
0 |
for( __tind2 = 0 ; |
|
8974
|
0 |
0 |
for( __tind1 = 0 ; |
|
8995
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9001
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
9003
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9004
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9005
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9008
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9009
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9023
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
9024
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9027
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9030
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9033
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9036
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9039
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * vals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9044
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9068
|
0 |
0 |
for( __tind2 = 0 ; |
|
9079
|
0 |
0 |
for( __tind1 = 0 ; |
|
9100
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9106
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
9108
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9109
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9110
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9113
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9114
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9128
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
9129
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9132
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9135
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9138
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9141
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9144
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Indx * vals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9149
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9173
|
0 |
0 |
for( __tind2 = 0 ; |
|
9184
|
0 |
0 |
for( __tind1 = 0 ; |
|
9205
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9211
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
9213
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9214
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9215
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9218
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9219
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9233
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
9234
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9237
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9240
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9243
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9246
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9249
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_LongLong * vals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9254
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9278
|
0 |
0 |
for( __tind2 = 0 ; |
|
9289
|
0 |
0 |
for( __tind1 = 0 ; |
|
9310
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9316
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
9318
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9319
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9320
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9323
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9324
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9338
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
9339
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9342
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9345
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9348
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9351
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9354
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Float * vals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9359
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9383
|
0 |
0 |
for( __tind2 = 0 ; |
|
9394
|
0 |
0 |
for( __tind1 = 0 ; |
|
9415
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9421
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
9423
|
0 |
0 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9424
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9425
|
0 |
0 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9428
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9429
|
0 |
0 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9443
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
9444
|
1 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
1 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9447
|
1 |
1 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
1 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9450
|
1 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
1 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9453
|
0 |
2 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9456
|
0 |
2 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9459
|
0 |
2 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * vals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9464
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9488
|
2 |
2 |
for( __tind2 = 0 ; |
|
9499
|
2 |
2 |
for( __tind1 = 0 ; |
|
9520
|
0 |
2 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
9526
|
14 |
2 |
for(n=0; n<(__n_size); n++) { |
|
9528
|
0 |
14 |
__SVDLIBC_LONG nzi, nzj=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
9529
|
0 |
14 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
44 |
14 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
9530
|
0 |
44 |
__SVDLIBC_LONG mi = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
9533
|
0 |
242 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
242 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
242 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
242 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
242 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
242 |
44 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, mi))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
9534
|
0 |
44 |
(vals_datap)[0+(__inc_vals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") = v; |
|
9548
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
9565
|
2 |
0 |
if(__privtrans->__ddone) { |
|
9609
|
2 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
|
2 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
9615
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9618
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9621
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9624
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9627
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9630
|
0 |
0 |
PDL_Byte * nzvals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Byte * nzvals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9633
|
0 |
0 |
PDL_Byte * err_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Byte * err_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9647
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9650
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9653
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9656
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9659
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9662
|
0 |
0 |
PDL_Short * nzvals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Short * nzvals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9665
|
0 |
0 |
PDL_Short * err_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Short * err_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9679
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9682
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9685
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9688
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9691
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9694
|
0 |
0 |
PDL_Ushort * nzvals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Ushort * nzvals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9697
|
0 |
0 |
PDL_Ushort * err_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Ushort * err_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9711
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9714
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9717
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9720
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9723
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9726
|
0 |
0 |
PDL_Long * nzvals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nzvals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9729
|
0 |
0 |
PDL_Long * err_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * err_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9743
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9746
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9749
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9752
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9755
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9758
|
0 |
0 |
PDL_Indx * nzvals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Indx * nzvals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9761
|
0 |
0 |
PDL_Indx * err_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Indx * err_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9775
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9778
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9781
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9784
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9787
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9790
|
0 |
0 |
PDL_LongLong * nzvals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_LongLong * nzvals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9793
|
0 |
0 |
PDL_LongLong * err_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_LongLong * err_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9807
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9810
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9813
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9816
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9819
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9822
|
0 |
0 |
PDL_Float * nzvals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Float * nzvals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9825
|
0 |
0 |
PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9839
|
1 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
1 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9842
|
1 |
1 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
1 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9845
|
1 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
1 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9848
|
0 |
2 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9851
|
0 |
2 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9854
|
0 |
2 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9857
|
0 |
2 |
PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
9888
|
0 |
2 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
9889
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
9890
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1; |
|
9892
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
9894
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
9895
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
9899
|
0 |
2 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size == 1)) { |
|
9901
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
9902
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
9906
|
0 |
2 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
9907
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
9909
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
9911
|
2 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
9912
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
9916
|
0 |
2 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
9917
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
9918
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
9920
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
9922
|
2 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
9923
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
9927
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
9929
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
9930
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
9934
|
0 |
2 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
9935
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nplus1_size <= 1) __privtrans->__nplus1_size = 1; |
|
9937
|
0 |
2 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nplus1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size == 1)) { |
|
9939
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nplus1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
9940
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
9944
|
0 |
2 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
9945
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
9947
|
0 |
2 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
9949
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
9950
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
9954
|
0 |
2 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
9955
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nnz_size <= 1) __privtrans->__nnz_size = 1; |
|
9957
|
2 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__nnz_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size == 1)) { |
|
9959
|
2 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nnz_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
9960
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
9964
|
2 |
0 |
if(!__creating[6]) { |
|
9973
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
9974
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
9980
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
9981
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
9987
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
9988
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
9994
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
9995
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
10001
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
10002
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
10008
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
10009
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
10015
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
10016
|
0 |
0 |
!__creating[6] && |
|
10017
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
10023
|
0 |
2 |
if (hdrp) { |
|
10024
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
10032
|
0 |
0 |
PUSHMARK(SP) ; |
|
10033
|
0 |
0 |
XPUSHs( hdrp ); |
|
10037
|
0 |
0 |
if(count != 1) |
|
10042
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
10046
|
0 |
0 |
FREETMPS ; |
|
10052
|
0 |
0 |
if ( __privtrans->pdls[6]->hdrsv != hdrp ){ |
|
10053
|
0 |
0 |
if( __privtrans->pdls[6]->hdrsv && __privtrans->pdls[6]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[6]->hdrsv && __privtrans->pdls[6]->hdrsv != &PL_sv_undef) |
|
10055
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
10059
|
0 |
0 |
if(propagate_hdrcpy) |
|
10062
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
10066
|
2 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
2 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
10068
|
1 |
1 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_u_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
10070
|
1 |
1 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_u_m = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
10072
|
1 |
1 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_s_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
10074
|
1 |
1 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_v_d = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
10076
|
1 |
1 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_v_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
10078
|
0 |
2 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_ptr_nplus1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
10080
|
0 |
2 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
2 |
0 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_rowids_nnz = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
10082
|
0 |
2 |
__privtrans->__inc_nzvals_nnz = PDL_REPRINC(__privtrans->pdls[5],0); __privtrans->__ddone = 1; |
|
10102
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
10106
|
0 |
0 |
if(__copy->__ddone) { |
|
10126
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * u_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10129
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * s_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10132
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * v_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10135
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10138
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10141
|
0 |
0 |
PDL_Byte * nzvals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Byte * nzvals_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10144
|
0 |
0 |
PDL_Byte * err_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Byte * err_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10149
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10176
|
0 |
0 |
for( __tind2 = 0 ; |
|
10188
|
0 |
0 |
for( __tind1 = 0 ; |
|
10214
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10220
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10222
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10224
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10225
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10227
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10233
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10235
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10236
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10237
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10239
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10243
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10246
|
0 |
0 |
if (m==ri) { |
|
10247
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10249
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10268
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
10269
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * u_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10272
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * s_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10275
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * v_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10278
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10281
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10284
|
0 |
0 |
PDL_Short * nzvals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Short * nzvals_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10287
|
0 |
0 |
PDL_Short * err_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Short * err_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10292
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10319
|
0 |
0 |
for( __tind2 = 0 ; |
|
10331
|
0 |
0 |
for( __tind1 = 0 ; |
|
10357
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10363
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10365
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10367
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10368
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10370
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10376
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10378
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10379
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10380
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10382
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10386
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10389
|
0 |
0 |
if (m==ri) { |
|
10390
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10392
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10411
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
10412
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * u_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10415
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * s_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10418
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * v_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10421
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10424
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10427
|
0 |
0 |
PDL_Ushort * nzvals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Ushort * nzvals_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10430
|
0 |
0 |
PDL_Ushort * err_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Ushort * err_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10435
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10462
|
0 |
0 |
for( __tind2 = 0 ; |
|
10474
|
0 |
0 |
for( __tind1 = 0 ; |
|
10500
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10506
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10508
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10510
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10511
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10513
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10519
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10521
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10522
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10523
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10525
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10529
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10532
|
0 |
0 |
if (m==ri) { |
|
10533
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10535
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10554
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
10555
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * u_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10558
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * s_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10561
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * v_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10564
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10567
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10570
|
0 |
0 |
PDL_Long * nzvals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nzvals_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10573
|
0 |
0 |
PDL_Long * err_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * err_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10578
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10605
|
0 |
0 |
for( __tind2 = 0 ; |
|
10617
|
0 |
0 |
for( __tind1 = 0 ; |
|
10643
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10649
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10651
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10653
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10654
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10656
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10662
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10664
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10665
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10666
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10668
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10672
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10675
|
0 |
0 |
if (m==ri) { |
|
10676
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10678
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10697
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
10698
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Indx * u_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10701
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Indx * s_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10704
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Indx * v_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10707
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10710
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10713
|
0 |
0 |
PDL_Indx * nzvals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Indx * nzvals_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10716
|
0 |
0 |
PDL_Indx * err_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Indx * err_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10721
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10748
|
0 |
0 |
for( __tind2 = 0 ; |
|
10760
|
0 |
0 |
for( __tind1 = 0 ; |
|
10786
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10792
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10794
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10796
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10797
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10799
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10805
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10807
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10808
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10809
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10811
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10815
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10818
|
0 |
0 |
if (m==ri) { |
|
10819
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10821
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10840
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
10841
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_LongLong * u_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10844
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_LongLong * s_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10847
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_LongLong * v_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10850
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10853
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10856
|
0 |
0 |
PDL_LongLong * nzvals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_LongLong * nzvals_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
10859
|
0 |
0 |
PDL_LongLong * err_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_LongLong * err_datap = ((PDL_LongLong *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
10864
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10891
|
0 |
0 |
for( __tind2 = 0 ; |
|
10903
|
0 |
0 |
for( __tind1 = 0 ; |
|
10929
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
10935
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10937
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10939
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
10940
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
10942
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10948
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
10950
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
10951
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
10952
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10954
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
10958
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
10961
|
0 |
0 |
if (m==ri) { |
|
10962
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
10964
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
10983
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
10984
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Float * u_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10987
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Float * s_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10990
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Float * v_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10993
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10996
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10999
|
0 |
0 |
PDL_Float * nzvals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Float * nzvals_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11002
|
0 |
0 |
PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
11007
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11034
|
0 |
0 |
for( __tind2 = 0 ; |
|
11046
|
0 |
0 |
for( __tind1 = 0 ; |
|
11072
|
0 |
0 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
11078
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
11080
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
11082
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
0 |
0 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
11083
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
0 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
11085
|
0 |
0 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
11091
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
11093
|
0 |
0 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
11094
|
0 |
0 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
11095
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
11097
|
0 |
0 |
for(m=0; m<(__m_size); m++) { |
|
11101
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
0 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
11104
|
0 |
0 |
if (m==ri) { |
|
11105
|
0 |
0 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
11107
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
11126
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
11127
|
1 |
1 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
1 |
0 |
PDL_Double * u_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11130
|
1 |
1 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
1 |
0 |
PDL_Double * s_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11133
|
1 |
1 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
1 |
0 |
PDL_Double * v_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11136
|
0 |
2 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Indx * ptr_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11139
|
0 |
2 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Indx * rowids_datap = ((PDL_Indx *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11142
|
0 |
2 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * nzvals_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11145
|
0 |
2 |
PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
11150
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11177
|
2 |
2 |
for( __tind2 = 0 ; |
|
11189
|
2 |
2 |
for( __tind1 = 0 ; |
|
11215
|
0 |
2 |
if (__privtrans->__nplus1_size <= __privtrans->__n_size) { |
|
11221
|
14 |
2 |
for(n=0; n<(__n_size); n++) { |
|
11223
|
0 |
14 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
11225
|
0 |
14 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
|
44 |
14 |
for (nzi=(ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; nzi < nzj; ++nzi) { |
|
11226
|
0 |
44 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
|
0 |
44 |
if ((rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") < ri) |
|
11228
|
0 |
44 |
ri = (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
11234
|
14 |
2 |
for(n=0; n<(__n_size); n++) { |
|
11236
|
0 |
14 |
nzi = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n))] PDL_COMMENT("ACCESS()") ; |
|
11237
|
0 |
14 |
nzj = (ptr_datap)[0+(__inc_ptr_nplus1*PP_INDTERM(__privtrans->__nplus1_size, n1))] PDL_COMMENT("ACCESS()") ; |
|
11238
|
14 |
0 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
14 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
11240
|
84 |
14 |
for(m=0; m<(__m_size); m++) { |
|
11244
|
0 |
462 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
462 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
462 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
462 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
0 |
462 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
|
462 |
84 |
for(d=0; d<(__d_size); d++) { v += (u_datap)[0+(__inc_u_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_u_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") * (s_datap)[0+(__inc_s_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") * (v_datap)[0+(__inc_v_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_v_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; }} PDL_COMMENT("Close d") |
|
11247
|
44 |
40 |
if (m==ri) { |
|
11248
|
0 |
44 |
v -= (nzvals_datap)[0+(__inc_nzvals_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") ; |
|
11250
|
30 |
14 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
|
0 |
30 |
ri = nzi < nzj ? (rowids_datap)[0+(__inc_rowids_nnz*PP_INDTERM(__privtrans->__nnz_size, nzi))] PDL_COMMENT("ACCESS()") : (__SVDLIBC_LONG)-1; |
|
11269
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
11286
|
2 |
0 |
if(__privtrans->__ddone) { |
|
11342
|
0 |
0 |
if (items >= 1) SVDVerbosity = SvIV(ST(0)); |
|
|
0 |
0 |
if (items >= 1) SVDVerbosity = SvIV(ST(0)); |
|
11386
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
11388
|
0 |
0 |
if (sv_isobject(parent)){ |
|
11390
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
11393
|
0 |
0 |
if (items == 4) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
11400
|
0 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
11403
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11407
|
0 |
0 |
if (bless_stash) ptr_SV = sv_bless(ptr_SV, bless_stash); |
|
11409
|
0 |
0 |
PUSHMARK(SP); |
|
11410
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11418
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11422
|
0 |
0 |
if (bless_stash) rowids_SV = sv_bless(rowids_SV, bless_stash); |
|
11424
|
0 |
0 |
PUSHMARK(SP); |
|
11425
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11433
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11437
|
0 |
0 |
if (bless_stash) nzvals_SV = sv_bless(nzvals_SV, bless_stash); |
|
11439
|
0 |
0 |
PUSHMARK(SP); |
|
11440
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11466
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
11467
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
11468
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
11469
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
11470
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
11471
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
11472
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
11473
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
11474
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
11476
|
0 |
0 |
if(PDL_D != a->datatype) { |
|
11478
|
0 |
0 |
}if( (ptr->state & PDL_NOMYDIMS) && ptr->trans == NULL ) { |
|
|
0 |
0 |
}if( (ptr->state & PDL_NOMYDIMS) && ptr->trans == NULL ) { |
|
11480
|
0 |
0 |
} else if(PDL_IND != ptr->datatype) { |
|
11482
|
0 |
0 |
}if( (rowids->state & PDL_NOMYDIMS) && rowids->trans == NULL ) { |
|
|
0 |
0 |
}if( (rowids->state & PDL_NOMYDIMS) && rowids->trans == NULL ) { |
|
11484
|
0 |
0 |
} else if(PDL_IND != rowids->datatype) { |
|
11486
|
0 |
0 |
}if( (nzvals->state & PDL_NOMYDIMS) && nzvals->trans == NULL ) { |
|
|
0 |
0 |
}if( (nzvals->state & PDL_NOMYDIMS) && nzvals->trans == NULL ) { |
|
11488
|
0 |
0 |
} else if(PDL_D != nzvals->datatype) { |
|
11495
|
0 |
0 |
if (badflag_cache) { |
|
11500
|
0 |
0 |
if (nreturn) { |
|
11501
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
11537
|
3 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
3 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
11539
|
3 |
0 |
if (sv_isobject(parent)){ |
|
11541
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
3 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
3 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
11544
|
3 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
11557
|
0 |
0 |
else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
11566
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11570
|
0 |
0 |
if (bless_stash) ut_SV = sv_bless(ut_SV, bless_stash); |
|
11572
|
0 |
0 |
PUSHMARK(SP); |
|
11573
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11581
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11585
|
0 |
0 |
if (bless_stash) s_SV = sv_bless(s_SV, bless_stash); |
|
11587
|
0 |
0 |
PUSHMARK(SP); |
|
11588
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11596
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11600
|
0 |
0 |
if (bless_stash) vt_SV = sv_bless(vt_SV, bless_stash); |
|
11602
|
0 |
0 |
PUSHMARK(SP); |
|
11603
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11628
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
0 |
3 |
badflag_cache = ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
11629
|
0 |
3 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
11630
|
0 |
3 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
11631
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
11632
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
11633
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
11634
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
11635
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
11636
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
11637
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
11639
|
3 |
0 |
if(PDL_IND != ptr->datatype) { |
|
11641
|
3 |
0 |
}if(PDL_IND != rowids->datatype) { |
|
11643
|
0 |
3 |
}if(PDL_D != nzvals->datatype) { |
|
11645
|
3 |
0 |
}if(PDL_IND != m->datatype) { |
|
11647
|
2 |
1 |
}if(PDL_L != iterations->datatype) { |
|
11649
|
0 |
3 |
}if(PDL_D != end->datatype) { |
|
11651
|
0 |
3 |
}if(PDL_D != kappa->datatype) { |
|
11653
|
0 |
3 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
|
0 |
0 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
11655
|
0 |
3 |
} else if(PDL_D != ut->datatype) { |
|
11657
|
0 |
3 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
|
0 |
0 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
11659
|
0 |
3 |
} else if(PDL_D != s->datatype) { |
|
11661
|
0 |
3 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
|
0 |
0 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
11663
|
0 |
3 |
} else if(PDL_D != vt->datatype) { |
|
11676
|
0 |
3 |
if (badflag_cache) { |
|
11681
|
0 |
3 |
if (nreturn) { |
|
11682
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
11718
|
4 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
4 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
11720
|
4 |
0 |
if (sv_isobject(parent)){ |
|
11722
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
4 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
4 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
11725
|
4 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
11738
|
0 |
0 |
else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
11747
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11751
|
0 |
0 |
if (bless_stash) ut_SV = sv_bless(ut_SV, bless_stash); |
|
11753
|
0 |
0 |
PUSHMARK(SP); |
|
11754
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11762
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11766
|
0 |
0 |
if (bless_stash) s_SV = sv_bless(s_SV, bless_stash); |
|
11768
|
0 |
0 |
PUSHMARK(SP); |
|
11769
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11777
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11781
|
0 |
0 |
if (bless_stash) vt_SV = sv_bless(vt_SV, bless_stash); |
|
11783
|
0 |
0 |
PUSHMARK(SP); |
|
11784
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11809
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
0 |
4 |
badflag_cache = ((whichi->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0) || ((n->state & PDL_BADVAL) > 0) || ((m->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
11810
|
0 |
4 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
11811
|
0 |
4 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
11812
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
11813
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
11814
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
11815
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
11816
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
11817
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
11818
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
11820
|
0 |
4 |
if(PDL_IND != whichi->datatype) { |
|
11822
|
0 |
4 |
}if(PDL_D != nzvals->datatype) { |
|
11824
|
4 |
0 |
}if(PDL_IND != n->datatype) { |
|
11826
|
4 |
0 |
}if(PDL_IND != m->datatype) { |
|
11828
|
3 |
1 |
}if(PDL_L != iterations->datatype) { |
|
11830
|
0 |
4 |
}if(PDL_D != end->datatype) { |
|
11832
|
0 |
4 |
}if(PDL_D != kappa->datatype) { |
|
11834
|
0 |
4 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
|
0 |
0 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
11836
|
0 |
4 |
} else if(PDL_D != ut->datatype) { |
|
11838
|
0 |
4 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
|
0 |
0 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
11840
|
0 |
4 |
} else if(PDL_D != s->datatype) { |
|
11842
|
0 |
4 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
|
0 |
0 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
11844
|
0 |
4 |
} else if(PDL_D != vt->datatype) { |
|
11857
|
0 |
4 |
if (badflag_cache) { |
|
11862
|
0 |
4 |
if (nreturn) { |
|
11863
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
11896
|
3 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
3 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
11898
|
3 |
0 |
if (sv_isobject(parent)){ |
|
11900
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
3 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
3 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
3 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
11903
|
3 |
0 |
if (items == 7) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
11913
|
0 |
0 |
else if (items == 4) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
11919
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11923
|
0 |
0 |
if (bless_stash) ut_SV = sv_bless(ut_SV, bless_stash); |
|
11925
|
0 |
0 |
PUSHMARK(SP); |
|
11926
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11934
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11938
|
0 |
0 |
if (bless_stash) s_SV = sv_bless(s_SV, bless_stash); |
|
11940
|
0 |
0 |
PUSHMARK(SP); |
|
11941
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11949
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
11953
|
0 |
0 |
if (bless_stash) vt_SV = sv_bless(vt_SV, bless_stash); |
|
11955
|
0 |
0 |
PUSHMARK(SP); |
|
11956
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
11981
|
3 |
0 |
badflag_cache = ((a->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((a->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((a->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
|
0 |
3 |
badflag_cache = ((a->state & PDL_BADVAL) > 0) || ((iterations->state & PDL_BADVAL) > 0) || ((end->state & PDL_BADVAL) > 0) || ((kappa->state & PDL_BADVAL) > 0); |
|
11982
|
0 |
3 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
11983
|
0 |
3 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
11984
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
11985
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
11986
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
11987
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
11988
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
11989
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
11990
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
11992
|
0 |
3 |
if(PDL_D != a->datatype) { |
|
11994
|
2 |
1 |
}if(PDL_L != iterations->datatype) { |
|
11996
|
0 |
3 |
}if(PDL_D != end->datatype) { |
|
11998
|
0 |
3 |
}if(PDL_D != kappa->datatype) { |
|
12000
|
0 |
3 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
|
0 |
0 |
}if( (ut->state & PDL_NOMYDIMS) && ut->trans == NULL ) { |
|
12002
|
0 |
3 |
} else if(PDL_D != ut->datatype) { |
|
12004
|
0 |
3 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
|
0 |
0 |
}if( (s->state & PDL_NOMYDIMS) && s->trans == NULL ) { |
|
12006
|
0 |
3 |
} else if(PDL_D != s->datatype) { |
|
12008
|
0 |
3 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
|
0 |
0 |
}if( (vt->state & PDL_NOMYDIMS) && vt->trans == NULL ) { |
|
12010
|
0 |
3 |
} else if(PDL_D != vt->datatype) { |
|
12020
|
0 |
3 |
if (badflag_cache) { |
|
12025
|
0 |
3 |
if (nreturn) { |
|
12026
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
12055
|
4 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
4 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
12057
|
4 |
0 |
if (sv_isobject(parent)){ |
|
12059
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
4 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
4 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
4 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
12062
|
0 |
4 |
if (items == 5) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
12070
|
4 |
0 |
else if (items == 4) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
12076
|
4 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
12080
|
4 |
0 |
if (bless_stash) vals_SV = sv_bless(vals_SV, bless_stash); |
|
12082
|
0 |
0 |
PUSHMARK(SP); |
|
12083
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
12108
|
4 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((which->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((which->state & PDL_BADVAL) > 0); |
|
|
4 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((which->state & PDL_BADVAL) > 0); |
|
|
0 |
4 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((which->state & PDL_BADVAL) > 0); |
|
12109
|
0 |
4 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
12110
|
4 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype < u->datatype) { |
|
12113
|
0 |
4 |
if(__privtrans->__datatype < s->datatype) { |
|
12116
|
0 |
4 |
if(__privtrans->__datatype < v->datatype) { |
|
12119
|
4 |
0 |
if(!((vals->state & PDL_NOMYDIMS) && |
|
|
0 |
4 |
if(!((vals->state & PDL_NOMYDIMS) && |
|
12120
|
0 |
0 |
vals->trans == NULL) && __privtrans->__datatype < vals->datatype) { |
|
12123
|
4 |
0 |
if(__privtrans->__datatype == PDL_B) {} |
|
12124
|
4 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
12125
|
4 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
12126
|
4 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
12127
|
4 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
12128
|
4 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
12129
|
4 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
12130
|
0 |
4 |
else if(__privtrans->__datatype == PDL_D) {} |
|
12132
|
0 |
4 |
if(__privtrans->__datatype != u->datatype) { |
|
12134
|
0 |
4 |
}if(__privtrans->__datatype != s->datatype) { |
|
12136
|
0 |
4 |
}if(__privtrans->__datatype != v->datatype) { |
|
12138
|
0 |
4 |
}if(PDL_IND != which->datatype) { |
|
12140
|
4 |
0 |
}if( (vals->state & PDL_NOMYDIMS) && vals->trans == NULL ) { |
|
|
4 |
0 |
}if( (vals->state & PDL_NOMYDIMS) && vals->trans == NULL ) { |
|
12142
|
0 |
0 |
} else if(__privtrans->__datatype != vals->datatype) { |
|
12150
|
0 |
4 |
if (badflag_cache) { |
|
12153
|
4 |
0 |
if (nreturn) { |
|
12154
|
0 |
4 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
12182
|
2 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
2 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
12184
|
2 |
0 |
if (sv_isobject(parent)){ |
|
12186
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
2 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
2 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
12189
|
0 |
2 |
if (items == 6) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
12198
|
2 |
0 |
else if (items == 5) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
12205
|
2 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
12209
|
2 |
0 |
if (bless_stash) vals_SV = sv_bless(vals_SV, bless_stash); |
|
12211
|
0 |
0 |
PUSHMARK(SP); |
|
12212
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
12237
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0); |
|
|
0 |
2 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0); |
|
12238
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
12239
|
2 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype < u->datatype) { |
|
12242
|
0 |
2 |
if(__privtrans->__datatype < s->datatype) { |
|
12245
|
0 |
2 |
if(__privtrans->__datatype < v->datatype) { |
|
12248
|
2 |
0 |
if(!((vals->state & PDL_NOMYDIMS) && |
|
|
0 |
2 |
if(!((vals->state & PDL_NOMYDIMS) && |
|
12249
|
0 |
0 |
vals->trans == NULL) && __privtrans->__datatype < vals->datatype) { |
|
12252
|
2 |
0 |
if(__privtrans->__datatype == PDL_B) {} |
|
12253
|
2 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
12254
|
2 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
12255
|
2 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
12256
|
2 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
12257
|
2 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
12258
|
2 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
12259
|
0 |
2 |
else if(__privtrans->__datatype == PDL_D) {} |
|
12261
|
0 |
2 |
if(__privtrans->__datatype != u->datatype) { |
|
12263
|
0 |
2 |
}if(__privtrans->__datatype != s->datatype) { |
|
12265
|
0 |
2 |
}if(__privtrans->__datatype != v->datatype) { |
|
12267
|
2 |
0 |
}if(PDL_IND != ptr->datatype) { |
|
12269
|
2 |
0 |
}if(PDL_IND != rowids->datatype) { |
|
12271
|
2 |
0 |
}if( (vals->state & PDL_NOMYDIMS) && vals->trans == NULL ) { |
|
|
2 |
0 |
}if( (vals->state & PDL_NOMYDIMS) && vals->trans == NULL ) { |
|
12273
|
0 |
0 |
} else if(__privtrans->__datatype != vals->datatype) { |
|
12282
|
0 |
2 |
if (badflag_cache) { |
|
12285
|
2 |
0 |
if (nreturn) { |
|
12286
|
0 |
2 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
12315
|
2 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
2 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
12317
|
2 |
0 |
if (sv_isobject(parent)){ |
|
12319
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
2 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
2 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
2 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
12322
|
0 |
2 |
if (items == 7) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
12332
|
2 |
0 |
else if (items == 6) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
12340
|
2 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
12344
|
2 |
0 |
if (bless_stash) err_SV = sv_bless(err_SV, bless_stash); |
|
12346
|
0 |
0 |
PUSHMARK(SP); |
|
12347
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
12372
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
|
0 |
2 |
badflag_cache = ((u->state & PDL_BADVAL) > 0) || ((s->state & PDL_BADVAL) > 0) || ((v->state & PDL_BADVAL) > 0) || ((ptr->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((nzvals->state & PDL_BADVAL) > 0); |
|
12373
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
12374
|
2 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype < u->datatype) { |
|
12377
|
0 |
2 |
if(__privtrans->__datatype < s->datatype) { |
|
12380
|
0 |
2 |
if(__privtrans->__datatype < v->datatype) { |
|
12383
|
0 |
2 |
if(__privtrans->__datatype < nzvals->datatype) { |
|
12386
|
2 |
0 |
if(!((err->state & PDL_NOMYDIMS) && |
|
|
0 |
2 |
if(!((err->state & PDL_NOMYDIMS) && |
|
12387
|
0 |
0 |
err->trans == NULL) && __privtrans->__datatype < err->datatype) { |
|
12390
|
2 |
0 |
if(__privtrans->__datatype == PDL_B) {} |
|
12391
|
2 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
12392
|
2 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
12393
|
2 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
12394
|
2 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
12395
|
2 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
12396
|
2 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
12397
|
0 |
2 |
else if(__privtrans->__datatype == PDL_D) {} |
|
12399
|
0 |
2 |
if(__privtrans->__datatype != u->datatype) { |
|
12401
|
0 |
2 |
}if(__privtrans->__datatype != s->datatype) { |
|
12403
|
0 |
2 |
}if(__privtrans->__datatype != v->datatype) { |
|
12405
|
2 |
0 |
}if(PDL_IND != ptr->datatype) { |
|
12407
|
2 |
0 |
}if(PDL_IND != rowids->datatype) { |
|
12409
|
0 |
2 |
}if(__privtrans->__datatype != nzvals->datatype) { |
|
12411
|
2 |
0 |
}if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) { |
|
|
2 |
0 |
}if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) { |
|
12413
|
0 |
0 |
} else if(__privtrans->__datatype != err->datatype) { |
|
12423
|
0 |
2 |
if (badflag_cache) { |
|
12426
|
2 |
0 |
if (nreturn) { |
|
12427
|
0 |
2 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
|
0 |
0 |
if (nreturn - items > 0) EXTEND (SP, nreturn - items); |
|
12445
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
2 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
2 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
2 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
2 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
2 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
12447
|
0 |
2 |
if (CoreSV==NULL) |
|
12449
|
2 |
0 |
PDL = INT2PTR(Core*,SvIV( CoreSV )); /* Core* value */ |
|
12450
|
0 |
2 |
if (PDL->Version != PDL_CORE_VERSION) |