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) |