Branch Coverage

SVDLIBC.xs
Criterion Covered Total %
branch 919 7476 12.2


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)