| line |
true |
false |
branch |
|
44
|
0 |
0 |
for (i=0; i
|
|
46
|
0 |
0 |
for (j=0; j
|
|
61
|
25 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
25 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
0 |
25 |
if (!(p && nrows && ncols)) return NULL; |
|
62
|
0 |
25 |
if (!matrix) matrix = (double **)pp_alloc(nrows); |
|
63
|
190 |
25 |
for (i=0; i < nrows; i++) { |
|
74
|
30 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
30 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
0 |
30 |
if (!(p && nrows && ncols)) return NULL; |
|
75
|
0 |
30 |
if (!matrix) matrix = (int **)pp_alloc(nrows); |
|
76
|
200 |
30 |
for (i=0; i < nrows; i++) { |
|
85
|
2 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
2 |
0 |
if (!(p && nrows && ncols)) return NULL; |
|
|
0 |
2 |
if (!(p && nrows && ncols)) return NULL; |
|
86
|
0 |
2 |
if (!matrix) matrix = (double **)pp_alloc(nrows); |
|
87
|
24 |
2 |
for (i=0; i < nrows; i++) { |
|
96
|
1 |
0 |
if (!(pp && nrows && ncols)) return; |
|
|
1 |
0 |
if (!(pp && nrows && ncols)) return; |
|
|
0 |
1 |
if (!(pp && nrows && ncols)) return; |
|
97
|
4 |
1 |
for (i=0; i
|
|
98
|
6 |
4 |
for (j=0; j
|
|
109
|
0 |
0 |
if (!(pp && nrows && ncols)) return; |
|
|
0 |
0 |
if (!(pp && nrows && ncols)) return; |
|
|
0 |
0 |
if (!(pp && nrows && ncols)) return; |
|
110
|
0 |
0 |
for (i=0; i
|
|
111
|
0 |
0 |
for (j=0; j
|
|
121
|
0 |
0 |
if (!(nnodes && (tree || lnkdist))) return NULL; |
|
|
0 |
0 |
if (!(nnodes && (tree || lnkdist))) return NULL; |
|
|
0 |
0 |
if (!(nnodes && (tree || lnkdist))) return NULL; |
|
123
|
0 |
0 |
for (i=0; i < nnodes; ++i) { |
|
124
|
0 |
0 |
nod[i].left = tree ? tree[i*2+0] : 0; |
|
125
|
0 |
0 |
nod[i].right = tree ? tree[i*2+1] : 0; |
|
126
|
0 |
0 |
nod[i].distance = lnkdist ? lnkdist[i] : 0; |
|
134
|
8 |
0 |
if (!(nnodes && nod && (tree || lnkdist))) return; |
|
|
8 |
0 |
if (!(nnodes && nod && (tree || lnkdist))) return; |
|
|
0 |
8 |
if (!(nnodes && nod && (tree || lnkdist))) return; |
|
|
0 |
0 |
if (!(nnodes && nod && (tree || lnkdist))) return; |
|
135
|
60 |
8 |
for (i=0; i < nnodes; ++i) { |
|
136
|
60 |
0 |
if (tree) { |
|
140
|
60 |
0 |
if (lnkdist) { |
|
162
|
2 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
2 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
168
|
0 |
2 |
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])))); |
|
171
|
0 |
2 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
195
|
0 |
2 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
196
|
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; |
|
198
|
0 |
2 |
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)) { |
|
200
|
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]) { |
|
201
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
206
|
2 |
0 |
if(!__creating[1]) { |
|
215
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
216
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
222
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
223
|
0 |
0 |
!__creating[1] && |
|
224
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
230
|
0 |
2 |
if (hdrp) { |
|
231
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
239
|
0 |
0 |
PUSHMARK(SP) ; |
|
240
|
0 |
0 |
XPUSHs( hdrp ); |
|
244
|
0 |
0 |
if(count != 1) |
|
249
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
253
|
0 |
0 |
FREETMPS ; |
|
259
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
260
|
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) |
|
262
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
266
|
0 |
0 |
if(propagate_hdrcpy) |
|
269
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
273
|
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) |
|
295
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
299
|
0 |
0 |
if(__copy->__ddone) { |
|
316
|
0 |
2 |
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])))); |
|
319
|
0 |
2 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
324
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
336
|
2 |
2 |
for( __tind2 = 0 ; |
|
343
|
2 |
2 |
for( __tind1 = 0 ; |
|
358
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
375
|
2 |
0 |
if(__privtrans->__ddone) { |
|
410
|
2 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
2 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
416
|
0 |
2 |
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])))); |
|
419
|
0 |
2 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
443
|
0 |
2 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
444
|
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; |
|
446
|
0 |
2 |
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)) { |
|
448
|
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]) { |
|
449
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
454
|
2 |
0 |
if(!__creating[1]) { |
|
463
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
464
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
470
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
471
|
0 |
0 |
!__creating[1] && |
|
472
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
478
|
0 |
2 |
if (hdrp) { |
|
479
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
487
|
0 |
0 |
PUSHMARK(SP) ; |
|
488
|
0 |
0 |
XPUSHs( hdrp ); |
|
492
|
0 |
0 |
if(count != 1) |
|
497
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
501
|
0 |
0 |
FREETMPS ; |
|
507
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
508
|
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) |
|
510
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
514
|
0 |
0 |
if(propagate_hdrcpy) |
|
517
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
521
|
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) |
|
543
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
547
|
0 |
0 |
if(__copy->__ddone) { |
|
564
|
0 |
2 |
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])))); |
|
567
|
0 |
2 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * b_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
572
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
584
|
2 |
2 |
for( __tind2 = 0 ; |
|
591
|
2 |
2 |
for( __tind1 = 0 ; |
|
606
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
623
|
2 |
0 |
if(__privtrans->__ddone) { |
|
663
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
669
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
672
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
675
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
678
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
681
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
684
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
696
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
699
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
702
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
705
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
708
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
711
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
723
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
726
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
729
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
732
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
735
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
738
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
750
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
753
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
756
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
759
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
762
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
765
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
777
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
780
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
783
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
786
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
789
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
792
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
804
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
807
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
810
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
813
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
816
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
819
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
831
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
834
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
837
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
840
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
843
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
846
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
858
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
861
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
864
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
867
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
870
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
873
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
902
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
903
|
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; |
|
904
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
906
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
908
|
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]) { |
|
909
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
913
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
915
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
916
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
921
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
922
|
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; |
|
923
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
925
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
927
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
928
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
932
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
934
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
935
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
940
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
941
|
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; |
|
943
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
945
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
946
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
951
|
0 |
0 |
if(!__creating[5]) { |
|
952
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
953
|
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; |
|
955
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
957
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
958
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
970
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
971
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
977
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
978
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
984
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
985
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
991
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
992
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
998
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
999
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
1005
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
1006
|
0 |
0 |
!__creating[5] && |
|
1007
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
1013
|
0 |
0 |
if (hdrp) { |
|
1014
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
1022
|
0 |
0 |
PUSHMARK(SP) ; |
|
1023
|
0 |
0 |
XPUSHs( hdrp ); |
|
1027
|
0 |
0 |
if(count != 1) |
|
1032
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
1036
|
0 |
0 |
FREETMPS ; |
|
1042
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
1043
|
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) |
|
1045
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
1049
|
0 |
0 |
if(propagate_hdrcpy) |
|
1052
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
1056
|
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) |
|
1058
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
1060
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
1062
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
1064
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
1066
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
1068
|
0 |
0 |
__privtrans->__inc_oweights_d = PDL_REPRINC(__privtrans->pdls[5],0); __privtrans->__ddone = 1; |
|
1088
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
1092
|
0 |
0 |
if(__copy->__ddone) { |
|
1110
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1113
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1116
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1119
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1122
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1125
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1143
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1167
|
0 |
0 |
for( __tind2 = 0 ; |
|
1178
|
0 |
0 |
for( __tind1 = 0 ; |
|
1194
|
0 |
0 |
if (owp) { |
|
1196
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1197
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1211
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1213
|
0 |
0 |
if (datapp) free(datapp); |
|
1214
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1217
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1220
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1223
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1226
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1229
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1232
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1250
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1274
|
0 |
0 |
for( __tind2 = 0 ; |
|
1285
|
0 |
0 |
for( __tind1 = 0 ; |
|
1301
|
0 |
0 |
if (owp) { |
|
1303
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1304
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1318
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1320
|
0 |
0 |
if (datapp) free(datapp); |
|
1321
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1324
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1327
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1330
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1333
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1336
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1339
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1357
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1381
|
0 |
0 |
for( __tind2 = 0 ; |
|
1392
|
0 |
0 |
for( __tind1 = 0 ; |
|
1408
|
0 |
0 |
if (owp) { |
|
1410
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1411
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1425
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1427
|
0 |
0 |
if (datapp) free(datapp); |
|
1428
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1431
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1434
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1437
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1440
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1443
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1446
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1464
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1488
|
0 |
0 |
for( __tind2 = 0 ; |
|
1499
|
0 |
0 |
for( __tind1 = 0 ; |
|
1515
|
0 |
0 |
if (owp) { |
|
1517
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1518
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1532
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1534
|
0 |
0 |
if (datapp) free(datapp); |
|
1535
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1538
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1541
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1544
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1547
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1550
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1553
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1571
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1595
|
0 |
0 |
for( __tind2 = 0 ; |
|
1606
|
0 |
0 |
for( __tind1 = 0 ; |
|
1622
|
0 |
0 |
if (owp) { |
|
1624
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1625
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1639
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1641
|
0 |
0 |
if (datapp) free(datapp); |
|
1642
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1645
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1648
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1651
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1654
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1657
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1660
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1678
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1702
|
0 |
0 |
for( __tind2 = 0 ; |
|
1713
|
0 |
0 |
for( __tind1 = 0 ; |
|
1729
|
0 |
0 |
if (owp) { |
|
1731
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1732
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1746
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1748
|
0 |
0 |
if (datapp) free(datapp); |
|
1749
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1752
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1755
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1758
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1761
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1764
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1767
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1785
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1809
|
0 |
0 |
for( __tind2 = 0 ; |
|
1820
|
0 |
0 |
for( __tind1 = 0 ; |
|
1836
|
0 |
0 |
if (owp) { |
|
1838
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1839
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1853
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1855
|
0 |
0 |
if (datapp) free(datapp); |
|
1856
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1859
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
1862
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
1865
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
1868
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cutoff_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
1871
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * exponent_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
1874
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * oweights_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
1892
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
1916
|
0 |
0 |
for( __tind2 = 0 ; |
|
1927
|
0 |
0 |
for( __tind1 = 0 ; |
|
1943
|
0 |
0 |
if (owp) { |
|
1945
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
1946
|
0 |
0 |
(oweights_datap)[0+(__inc_oweights_d*PP_INDTERM(__privtrans->__d_size, d))] PDL_COMMENT("ACCESS()") = owp[d]; |
|
1960
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
1962
|
0 |
0 |
if (datapp) free(datapp); |
|
1963
|
0 |
0 |
if (maskpp) free(maskpp); |
|
1982
|
0 |
0 |
if(__privtrans->__ddone) { |
|
2026
|
6 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
6 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
2032
|
0 |
6 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2035
|
0 |
6 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2038
|
0 |
6 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2041
|
0 |
6 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2044
|
0 |
6 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2047
|
0 |
6 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2050
|
0 |
6 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2053
|
0 |
6 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2066
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2069
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2072
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2075
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2078
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2081
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2084
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2087
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2100
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2103
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2106
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2109
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2112
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2115
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2118
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2121
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2134
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2137
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2140
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2143
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2146
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2149
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2152
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2155
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2168
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2171
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2174
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2177
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2180
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2183
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2186
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2189
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2202
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2205
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2208
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2211
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2214
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2217
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2220
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2223
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2236
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2239
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2242
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2245
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2248
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2251
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2254
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2257
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2270
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2273
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2276
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2279
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2282
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2285
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2288
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2291
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2321
|
0 |
6 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
2322
|
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; |
|
2323
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
2325
|
0 |
6 |
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)) { |
|
2327
|
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]) { |
|
2328
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
2332
|
0 |
6 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
2334
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
2335
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
2340
|
0 |
6 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
2341
|
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; |
|
2342
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
2344
|
6 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
6 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
6 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
2346
|
6 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
6 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
2347
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
2351
|
6 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
6 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
6 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
2353
|
6 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
6 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
2354
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
2359
|
0 |
6 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
2360
|
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; |
|
2362
|
6 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
6 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
6 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
2364
|
6 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
6 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
2365
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
2370
|
0 |
6 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
2371
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n1_size <= 1) __privtrans->__n1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n1_size <= 1) __privtrans->__n1_size = 1; |
|
2373
|
0 |
6 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n1_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n1_size == 1)) { |
|
2375
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n1_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n1_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
2376
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
2381
|
0 |
6 |
if(((__privtrans->pdls[6]))->ndims < 1) { |
|
2382
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__n2_size <= 1) __privtrans->__n2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__n2_size <= 1) __privtrans->__n2_size = 1; |
|
2384
|
0 |
6 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
2386
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__n2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
2387
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
2392
|
6 |
0 |
if(!__creating[7]) { |
|
2401
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2402
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
2408
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2409
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
2415
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2416
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
2422
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2423
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
2429
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2430
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
2436
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2437
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
2443
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2444
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
2450
|
6 |
0 |
if(!hdrp && |
|
|
0 |
6 |
if(!hdrp && |
|
2451
|
0 |
0 |
!__creating[7] && |
|
2452
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
2458
|
0 |
6 |
if (hdrp) { |
|
2459
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
2467
|
0 |
0 |
PUSHMARK(SP) ; |
|
2468
|
0 |
0 |
XPUSHs( hdrp ); |
|
2472
|
0 |
0 |
if(count != 1) |
|
2477
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
2481
|
0 |
0 |
FREETMPS ; |
|
2487
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
2488
|
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) |
|
2490
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
2494
|
0 |
0 |
if(propagate_hdrcpy) |
|
2497
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
2501
|
6 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
6 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
2503
|
6 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
6 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
2505
|
6 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
6 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
2507
|
6 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
6 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
2509
|
6 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
6 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
2511
|
6 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
2 |
4 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
2513
|
6 |
0 |
__privtrans->__inc_index1_n1 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
4 |
2 |
__privtrans->__inc_index1_n1 = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
2535
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
2539
|
0 |
0 |
if(__copy->__ddone) { |
|
2556
|
0 |
6 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2559
|
0 |
6 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2562
|
0 |
6 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2565
|
0 |
6 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2568
|
0 |
6 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2571
|
0 |
6 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2574
|
0 |
6 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2577
|
0 |
6 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2596
|
0 |
6 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2626
|
6 |
6 |
for( __tind2 = 0 ; |
|
2639
|
6 |
6 |
for( __tind1 = 0 ; |
|
2670
|
0 |
6 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
2673
|
6 |
0 |
if (datapp) free(datapp); |
|
2674
|
6 |
0 |
if (maskpp) free(maskpp); |
|
2677
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2680
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2683
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2686
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2689
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2692
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2695
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2698
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2717
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2747
|
0 |
0 |
for( __tind2 = 0 ; |
|
2760
|
0 |
0 |
for( __tind1 = 0 ; |
|
2791
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
2794
|
0 |
0 |
if (datapp) free(datapp); |
|
2795
|
0 |
0 |
if (maskpp) free(maskpp); |
|
2798
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2801
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2804
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2807
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2810
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2813
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2816
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2819
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2838
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2868
|
0 |
0 |
for( __tind2 = 0 ; |
|
2881
|
0 |
0 |
for( __tind1 = 0 ; |
|
2912
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
2915
|
0 |
0 |
if (datapp) free(datapp); |
|
2916
|
0 |
0 |
if (maskpp) free(maskpp); |
|
2919
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
2922
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
2925
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
2928
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
2931
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
2934
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
2937
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
2940
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
2959
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
2989
|
0 |
0 |
for( __tind2 = 0 ; |
|
3002
|
0 |
0 |
for( __tind1 = 0 ; |
|
3033
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
3036
|
0 |
0 |
if (datapp) free(datapp); |
|
3037
|
0 |
0 |
if (maskpp) free(maskpp); |
|
3040
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3043
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3046
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3049
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3052
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3055
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3058
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3061
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3080
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3110
|
0 |
0 |
for( __tind2 = 0 ; |
|
3123
|
0 |
0 |
for( __tind1 = 0 ; |
|
3154
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
3157
|
0 |
0 |
if (datapp) free(datapp); |
|
3158
|
0 |
0 |
if (maskpp) free(maskpp); |
|
3161
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3164
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3167
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3170
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3173
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3176
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3179
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3182
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3201
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3231
|
0 |
0 |
for( __tind2 = 0 ; |
|
3244
|
0 |
0 |
for( __tind1 = 0 ; |
|
3275
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
3278
|
0 |
0 |
if (datapp) free(datapp); |
|
3279
|
0 |
0 |
if (maskpp) free(maskpp); |
|
3282
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3285
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3288
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3291
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3294
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3297
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3300
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3303
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3322
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3352
|
0 |
0 |
for( __tind2 = 0 ; |
|
3365
|
0 |
0 |
for( __tind1 = 0 ; |
|
3396
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
3399
|
0 |
0 |
if (datapp) free(datapp); |
|
3400
|
0 |
0 |
if (maskpp) free(maskpp); |
|
3403
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3406
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3409
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3412
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * n1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3415
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * n2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
3418
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * index1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
3421
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
3424
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
3443
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
3473
|
0 |
0 |
for( __tind2 = 0 ; |
|
3486
|
0 |
0 |
for( __tind1 = 0 ; |
|
3517
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
3520
|
0 |
0 |
if (datapp) free(datapp); |
|
3521
|
0 |
0 |
if (maskpp) free(maskpp); |
|
3540
|
6 |
0 |
if(__privtrans->__ddone) { |
|
3578
|
1 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
1 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
3584
|
0 |
1 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3587
|
0 |
1 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3590
|
0 |
1 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3593
|
0 |
1 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3606
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3609
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3612
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3615
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3628
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3631
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3634
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3637
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3650
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3653
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3656
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3659
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3672
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3675
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3678
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3681
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3694
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3697
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3700
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3703
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3716
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3719
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3722
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3725
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3738
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3741
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3744
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3747
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
3777
|
0 |
1 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
3778
|
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; |
|
3779
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
3781
|
0 |
1 |
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)) { |
|
3783
|
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]) { |
|
3784
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
3788
|
0 |
1 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
3790
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
3791
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
3796
|
0 |
1 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
3797
|
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; |
|
3798
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
3800
|
1 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
1 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
1 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
3802
|
1 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
1 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
3803
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
3807
|
1 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
1 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
1 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
3809
|
1 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
1 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
3810
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
3815
|
0 |
1 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
3816
|
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; |
|
3818
|
1 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
1 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
1 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
3820
|
1 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
1 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
3821
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
3826
|
0 |
1 |
if(!__creating[3]) { |
|
3827
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
3828
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
3829
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
3831
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
3833
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
3834
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
3838
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
3840
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
3841
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
3854
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
3855
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
3861
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
3862
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
3868
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
3869
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
3875
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
3876
|
0 |
0 |
!__creating[3] && |
|
3877
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
3883
|
0 |
1 |
if (hdrp) { |
|
3884
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
3892
|
0 |
0 |
PUSHMARK(SP) ; |
|
3893
|
0 |
0 |
XPUSHs( hdrp ); |
|
3897
|
0 |
0 |
if(count != 1) |
|
3902
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
3906
|
0 |
0 |
FREETMPS ; |
|
3912
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
3913
|
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) |
|
3915
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
3919
|
0 |
0 |
if(propagate_hdrcpy) |
|
3922
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
3926
|
1 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
1 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
3928
|
1 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
3930
|
1 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
3932
|
1 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
3934
|
1 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
3936
|
1 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
3938
|
1 |
0 |
__privtrans->__inc_dists_n0 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_dists_n0 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
3960
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
3964
|
0 |
0 |
if(__copy->__ddone) { |
|
3981
|
0 |
1 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
3984
|
0 |
1 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
3987
|
0 |
1 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
3990
|
0 |
1 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4008
|
0 |
1 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4026
|
1 |
1 |
for( __tind2 = 0 ; |
|
4035
|
1 |
1 |
for( __tind1 = 0 ; |
|
4048
|
0 |
1 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4050
|
1 |
0 |
if (retval) free(retval); |
|
4059
|
0 |
1 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4061
|
1 |
0 |
if (datapp) free(datapp); |
|
4062
|
1 |
0 |
if (maskpp) free(maskpp); |
|
4065
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4068
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4071
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4074
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4092
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4110
|
0 |
0 |
for( __tind2 = 0 ; |
|
4119
|
0 |
0 |
for( __tind1 = 0 ; |
|
4132
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4134
|
0 |
0 |
if (retval) free(retval); |
|
4143
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4145
|
0 |
0 |
if (datapp) free(datapp); |
|
4146
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4149
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4152
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4155
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4158
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4176
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4194
|
0 |
0 |
for( __tind2 = 0 ; |
|
4203
|
0 |
0 |
for( __tind1 = 0 ; |
|
4216
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4218
|
0 |
0 |
if (retval) free(retval); |
|
4227
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4229
|
0 |
0 |
if (datapp) free(datapp); |
|
4230
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4233
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4236
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4239
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4242
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4260
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4278
|
0 |
0 |
for( __tind2 = 0 ; |
|
4287
|
0 |
0 |
for( __tind1 = 0 ; |
|
4300
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4302
|
0 |
0 |
if (retval) free(retval); |
|
4311
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4313
|
0 |
0 |
if (datapp) free(datapp); |
|
4314
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4317
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4320
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4323
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4326
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4344
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4362
|
0 |
0 |
for( __tind2 = 0 ; |
|
4371
|
0 |
0 |
for( __tind1 = 0 ; |
|
4384
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4386
|
0 |
0 |
if (retval) free(retval); |
|
4395
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4397
|
0 |
0 |
if (datapp) free(datapp); |
|
4398
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4401
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4404
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4407
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4410
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4428
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4446
|
0 |
0 |
for( __tind2 = 0 ; |
|
4455
|
0 |
0 |
for( __tind1 = 0 ; |
|
4468
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4470
|
0 |
0 |
if (retval) free(retval); |
|
4479
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4481
|
0 |
0 |
if (datapp) free(datapp); |
|
4482
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4485
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4488
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4491
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4494
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4512
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4530
|
0 |
0 |
for( __tind2 = 0 ; |
|
4539
|
0 |
0 |
for( __tind1 = 0 ; |
|
4552
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4554
|
0 |
0 |
if (retval) free(retval); |
|
4563
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4565
|
0 |
0 |
if (datapp) free(datapp); |
|
4566
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4569
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4572
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4575
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4578
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4596
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
4614
|
0 |
0 |
for( __tind2 = 0 ; |
|
4623
|
0 |
0 |
for( __tind1 = 0 ; |
|
4636
|
0 |
0 |
if (!retval) barf("Cluster matrix allocation failed!"); |
|
4638
|
0 |
0 |
if (retval) free(retval); |
|
4647
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
4649
|
0 |
0 |
if (datapp) free(datapp); |
|
4650
|
0 |
0 |
if (maskpp) free(maskpp); |
|
4669
|
1 |
0 |
if(__privtrans->__ddone) { |
|
4708
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
4709
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
4715
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4718
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4721
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4724
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4727
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4742
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4745
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4748
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4751
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4754
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4769
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4772
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4775
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4778
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4781
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4796
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4799
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4802
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4805
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4808
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4823
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4826
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4829
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4832
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4835
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4850
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4853
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4856
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4859
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4862
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4877
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4880
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4883
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4886
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4889
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4904
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
4907
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
4910
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
4913
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
4916
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
4948
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
4949
|
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; |
|
4950
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
4952
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
4954
|
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]) { |
|
4955
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
4959
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
4961
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
4962
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
4967
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
4968
|
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; |
|
4969
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
4971
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
4973
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
4974
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
4978
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
4980
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
4981
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
4986
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
4987
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
4989
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
4991
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
4992
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
4997
|
0 |
0 |
if(!__creating[3]) { |
|
4998
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
4999
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
5000
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
5002
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
5004
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
5005
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
5009
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
5011
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
5012
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
5020
|
0 |
0 |
}if(!__creating[4]) { |
|
5021
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 2) { |
|
5022
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
5023
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
5025
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
5027
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
5028
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
5032
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
5034
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
5035
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[1] != 1) { |
|
5048
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
5049
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
5055
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
5056
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
5062
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
5063
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
5069
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
5070
|
0 |
0 |
!__creating[3] && |
|
5071
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
5077
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
5078
|
0 |
0 |
!__creating[4] && |
|
5079
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
5085
|
0 |
0 |
if (hdrp) { |
|
5086
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
5094
|
0 |
0 |
PUSHMARK(SP) ; |
|
5095
|
0 |
0 |
XPUSHs( hdrp ); |
|
5099
|
0 |
0 |
if(count != 1) |
|
5104
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
5108
|
0 |
0 |
FREETMPS ; |
|
5114
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
5115
|
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) |
|
5117
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
5121
|
0 |
0 |
if(propagate_hdrcpy) |
|
5123
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
5124
|
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) |
|
5126
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
5130
|
0 |
0 |
if(propagate_hdrcpy) |
|
5133
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
5137
|
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) |
|
5139
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
5141
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
5143
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
5145
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
5147
|
0 |
0 |
__privtrans->__inc_clusterids_n = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_n = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
5149
|
0 |
0 |
__privtrans->__inc_cdata_d = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_d = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
5151
|
0 |
0 |
__privtrans->__inc_cdata_k = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_k = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
5153
|
0 |
0 |
__privtrans->__inc_cmask_d = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cmask_d = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
5175
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
5179
|
0 |
0 |
if(__copy->__ddone) { |
|
5196
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5199
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5202
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5205
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5208
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5230
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5251
|
0 |
0 |
for( __tind2 = 0 ; |
|
5261
|
0 |
0 |
for( __tind1 = 0 ; |
|
5287
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5290
|
0 |
0 |
if (datapp) free(datapp); |
|
5291
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5292
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5293
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5296
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5299
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5302
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5305
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5308
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5330
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5351
|
0 |
0 |
for( __tind2 = 0 ; |
|
5361
|
0 |
0 |
for( __tind1 = 0 ; |
|
5387
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5390
|
0 |
0 |
if (datapp) free(datapp); |
|
5391
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5392
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5393
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5396
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5399
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5402
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5405
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5408
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5430
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5451
|
0 |
0 |
for( __tind2 = 0 ; |
|
5461
|
0 |
0 |
for( __tind1 = 0 ; |
|
5487
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5490
|
0 |
0 |
if (datapp) free(datapp); |
|
5491
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5492
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5493
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5496
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5499
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5502
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5505
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5508
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5530
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5551
|
0 |
0 |
for( __tind2 = 0 ; |
|
5561
|
0 |
0 |
for( __tind1 = 0 ; |
|
5587
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5590
|
0 |
0 |
if (datapp) free(datapp); |
|
5591
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5592
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5593
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5596
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5599
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5602
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5605
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5608
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5630
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5651
|
0 |
0 |
for( __tind2 = 0 ; |
|
5661
|
0 |
0 |
for( __tind1 = 0 ; |
|
5687
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5690
|
0 |
0 |
if (datapp) free(datapp); |
|
5691
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5692
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5693
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5696
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5699
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5702
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5705
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5708
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5730
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5751
|
0 |
0 |
for( __tind2 = 0 ; |
|
5761
|
0 |
0 |
for( __tind1 = 0 ; |
|
5787
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5790
|
0 |
0 |
if (datapp) free(datapp); |
|
5791
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5792
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5793
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5796
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5799
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5802
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5805
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5808
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5830
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5851
|
0 |
0 |
for( __tind2 = 0 ; |
|
5861
|
0 |
0 |
for( __tind1 = 0 ; |
|
5887
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5890
|
0 |
0 |
if (datapp) free(datapp); |
|
5891
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5892
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5893
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
5896
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
5899
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
5902
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
5905
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
5908
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
5930
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
5951
|
0 |
0 |
for( __tind2 = 0 ; |
|
5961
|
0 |
0 |
for( __tind1 = 0 ; |
|
5987
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
5990
|
0 |
0 |
if (datapp) free(datapp); |
|
5991
|
0 |
0 |
if (maskpp) free(maskpp); |
|
5992
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
5993
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
6012
|
0 |
0 |
if(__privtrans->__ddone) { |
|
6049
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
6050
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
6056
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6059
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6062
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6065
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6076
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6079
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6082
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6085
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6096
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6099
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6102
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6105
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6116
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6119
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6122
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6125
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6136
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6139
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6142
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6145
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6156
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6159
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6162
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6165
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6176
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6179
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6182
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6185
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6196
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6199
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6202
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6205
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6233
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
6234
|
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; |
|
6235
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
6237
|
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)) { |
|
6239
|
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]) { |
|
6240
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
6244
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
6246
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
6247
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
6252
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
6253
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
6255
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
6257
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
6258
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
6263
|
0 |
0 |
if(!__creating[2]) { |
|
6264
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
6265
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
6267
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
6269
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
6270
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
6278
|
0 |
0 |
}if(!__creating[3]) { |
|
6279
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
6280
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
6282
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
6284
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
6285
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
6298
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
6299
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
6305
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
6306
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
6312
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
6313
|
0 |
0 |
!__creating[2] && |
|
6314
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
6320
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
6321
|
0 |
0 |
!__creating[3] && |
|
6322
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
6328
|
0 |
0 |
if (hdrp) { |
|
6329
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
6337
|
0 |
0 |
PUSHMARK(SP) ; |
|
6338
|
0 |
0 |
XPUSHs( hdrp ); |
|
6342
|
0 |
0 |
if(count != 1) |
|
6347
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
6351
|
0 |
0 |
FREETMPS ; |
|
6357
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
6358
|
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) |
|
6360
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
6364
|
0 |
0 |
if(propagate_hdrcpy) |
|
6366
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
6367
|
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) |
|
6369
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
6373
|
0 |
0 |
if(propagate_hdrcpy) |
|
6376
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
6380
|
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) |
|
6382
|
0 |
0 |
__privtrans->__inc_distance_n0 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_distance_n0 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
6384
|
0 |
0 |
__privtrans->__inc_distance_n1 = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_distance_n1 = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
6386
|
0 |
0 |
__privtrans->__inc_clusterids_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
6388
|
0 |
0 |
__privtrans->__inc_centroids_k = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_centroids_k = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
6410
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
6414
|
0 |
0 |
if(__copy->__ddone) { |
|
6431
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6434
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6437
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6440
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6453
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6471
|
0 |
0 |
for( __tind2 = 0 ; |
|
6480
|
0 |
0 |
for( __tind1 = 0 ; |
|
6500
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6502
|
0 |
0 |
if (distpp) free(distpp); |
|
6505
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6508
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6511
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6514
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6527
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6545
|
0 |
0 |
for( __tind2 = 0 ; |
|
6554
|
0 |
0 |
for( __tind1 = 0 ; |
|
6574
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6576
|
0 |
0 |
if (distpp) free(distpp); |
|
6579
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6582
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6585
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6588
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6601
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6619
|
0 |
0 |
for( __tind2 = 0 ; |
|
6628
|
0 |
0 |
for( __tind1 = 0 ; |
|
6648
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6650
|
0 |
0 |
if (distpp) free(distpp); |
|
6653
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6656
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6659
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6662
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6675
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6693
|
0 |
0 |
for( __tind2 = 0 ; |
|
6702
|
0 |
0 |
for( __tind1 = 0 ; |
|
6722
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6724
|
0 |
0 |
if (distpp) free(distpp); |
|
6727
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6730
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6733
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6736
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6749
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6767
|
0 |
0 |
for( __tind2 = 0 ; |
|
6776
|
0 |
0 |
for( __tind1 = 0 ; |
|
6796
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6798
|
0 |
0 |
if (distpp) free(distpp); |
|
6801
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6804
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6807
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6810
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6823
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6841
|
0 |
0 |
for( __tind2 = 0 ; |
|
6850
|
0 |
0 |
for( __tind1 = 0 ; |
|
6870
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6872
|
0 |
0 |
if (distpp) free(distpp); |
|
6875
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6878
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6881
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6884
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6897
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6915
|
0 |
0 |
for( __tind2 = 0 ; |
|
6924
|
0 |
0 |
for( __tind1 = 0 ; |
|
6944
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
6946
|
0 |
0 |
if (distpp) free(distpp); |
|
6949
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
6952
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
6955
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * centroids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
6958
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * errors_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
6971
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
6989
|
0 |
0 |
for( __tind2 = 0 ; |
|
6998
|
0 |
0 |
for( __tind1 = 0 ; |
|
7018
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
7020
|
0 |
0 |
if (distpp) free(distpp); |
|
7039
|
0 |
0 |
if(__privtrans->__ddone) { |
|
7079
|
3 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
2 |
1 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
7080
|
3 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
|
3 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
7081
|
3 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
3 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
7087
|
0 |
3 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7090
|
0 |
3 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7093
|
0 |
3 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7096
|
0 |
3 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7099
|
0 |
3 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7102
|
0 |
3 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7105
|
0 |
3 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7108
|
0 |
3 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7120
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7123
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7126
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7129
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7132
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7135
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7138
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7141
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7153
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7156
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7159
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7162
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7165
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7168
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7171
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7174
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7186
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7189
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7192
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7195
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7198
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7201
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7204
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7207
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7219
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7222
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7225
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7228
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7231
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7234
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7237
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7240
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7252
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7255
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7258
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7261
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7264
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7267
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7270
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7273
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7285
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7288
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7291
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7294
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7297
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7300
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7303
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7306
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7318
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7321
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7324
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7327
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7330
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7333
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7336
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7339
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7368
|
0 |
3 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
7369
|
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; |
|
7370
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
7372
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7374
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
7375
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
7379
|
0 |
3 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
7381
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
7382
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
7387
|
0 |
3 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
7388
|
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; |
|
7389
|
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; |
|
7391
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7393
|
3 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
7394
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
7398
|
3 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
7400
|
3 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
7401
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
7406
|
0 |
3 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
7407
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
7409
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
3 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
3 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
7411
|
3 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
3 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
7412
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
7417
|
1 |
2 |
if(!__creating[5]) { |
|
7418
|
0 |
1 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
7419
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
7421
|
1 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
1 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
1 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
7423
|
1 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
1 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
7424
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
7432
|
0 |
3 |
}if(!__creating[6]) { |
|
7437
|
0 |
3 |
}if(!__creating[7]) { |
|
7447
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7448
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
7454
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7455
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
7461
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7462
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
7468
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7469
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
7475
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7476
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
7482
|
3 |
0 |
if(!hdrp && |
|
|
1 |
2 |
if(!hdrp && |
|
7483
|
0 |
1 |
!__creating[5] && |
|
7484
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
7490
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7491
|
0 |
0 |
!__creating[6] && |
|
7492
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
7498
|
3 |
0 |
if(!hdrp && |
|
|
0 |
3 |
if(!hdrp && |
|
7499
|
0 |
0 |
!__creating[7] && |
|
7500
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
7506
|
0 |
3 |
if (hdrp) { |
|
7507
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
7515
|
0 |
0 |
PUSHMARK(SP) ; |
|
7516
|
0 |
0 |
XPUSHs( hdrp ); |
|
7520
|
0 |
0 |
if(count != 1) |
|
7525
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
7529
|
0 |
0 |
FREETMPS ; |
|
7535
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
7536
|
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) |
|
7538
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
7542
|
0 |
0 |
if(propagate_hdrcpy) |
|
7544
|
0 |
0 |
if ( __privtrans->pdls[6]->hdrsv != hdrp ){ |
|
7545
|
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) |
|
7547
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
7551
|
0 |
0 |
if(propagate_hdrcpy) |
|
7553
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
7554
|
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) |
|
7556
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
7560
|
0 |
0 |
if(propagate_hdrcpy) |
|
7563
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
7567
|
3 |
0 |
if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
3 |
if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
7569
|
3 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_data_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
7571
|
3 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_data_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
7573
|
3 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_mask_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
7575
|
3 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[2]->dimincs[1];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_mask_n = __privtrans->pdls[2]->dimincs[1];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
7577
|
3 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
3 |
__privtrans->__inc_weight_d = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
7599
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
7603
|
0 |
0 |
if(__copy->__ddone) { |
|
7620
|
0 |
3 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7623
|
0 |
3 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7626
|
0 |
3 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7629
|
0 |
3 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7632
|
0 |
3 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7635
|
0 |
3 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7638
|
0 |
3 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7641
|
0 |
3 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7657
|
0 |
3 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7687
|
3 |
3 |
for( __tind2 = 0 ; |
|
7700
|
3 |
3 |
for( __tind1 = 0 ; |
|
7730
|
0 |
3 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
7732
|
3 |
0 |
if (datapp) free(datapp); |
|
7733
|
3 |
0 |
if (maskpp) free(maskpp); |
|
7736
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7739
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7742
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7745
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7748
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7751
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7754
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7757
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7773
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7803
|
0 |
0 |
for( __tind2 = 0 ; |
|
7816
|
0 |
0 |
for( __tind1 = 0 ; |
|
7846
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
7848
|
0 |
0 |
if (datapp) free(datapp); |
|
7849
|
0 |
0 |
if (maskpp) free(maskpp); |
|
7852
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7855
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7858
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7861
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7864
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7867
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7870
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7873
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
7889
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
7919
|
0 |
0 |
for( __tind2 = 0 ; |
|
7932
|
0 |
0 |
for( __tind1 = 0 ; |
|
7962
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
7964
|
0 |
0 |
if (datapp) free(datapp); |
|
7965
|
0 |
0 |
if (maskpp) free(maskpp); |
|
7968
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
7971
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
7974
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
7977
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
7980
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
7983
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
7986
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
7989
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
8005
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8035
|
0 |
0 |
for( __tind2 = 0 ; |
|
8048
|
0 |
0 |
for( __tind1 = 0 ; |
|
8078
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
8080
|
0 |
0 |
if (datapp) free(datapp); |
|
8081
|
0 |
0 |
if (maskpp) free(maskpp); |
|
8084
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8087
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8090
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8093
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8096
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8099
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8102
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
8105
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
8121
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8151
|
0 |
0 |
for( __tind2 = 0 ; |
|
8164
|
0 |
0 |
for( __tind1 = 0 ; |
|
8194
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
8196
|
0 |
0 |
if (datapp) free(datapp); |
|
8197
|
0 |
0 |
if (maskpp) free(maskpp); |
|
8200
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8203
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8206
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8209
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8212
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8215
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8218
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
8221
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
8237
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8267
|
0 |
0 |
for( __tind2 = 0 ; |
|
8280
|
0 |
0 |
for( __tind1 = 0 ; |
|
8310
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
8312
|
0 |
0 |
if (datapp) free(datapp); |
|
8313
|
0 |
0 |
if (maskpp) free(maskpp); |
|
8316
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8319
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8322
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8325
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8328
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8331
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8334
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
8337
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
8353
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8383
|
0 |
0 |
for( __tind2 = 0 ; |
|
8396
|
0 |
0 |
for( __tind1 = 0 ; |
|
8426
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
8428
|
0 |
0 |
if (datapp) free(datapp); |
|
8429
|
0 |
0 |
if (maskpp) free(maskpp); |
|
8432
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8435
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8438
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8441
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8444
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8447
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8450
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
8453
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
8469
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
8499
|
0 |
0 |
for( __tind2 = 0 ; |
|
8512
|
0 |
0 |
for( __tind1 = 0 ; |
|
8542
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
8544
|
0 |
0 |
if (datapp) free(datapp); |
|
8545
|
0 |
0 |
if (maskpp) free(maskpp); |
|
8564
|
3 |
0 |
if(__privtrans->__ddone) { |
|
8601
|
0 |
2 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
8602
|
0 |
2 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
8603
|
2 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
2 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
8609
|
0 |
2 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8612
|
2 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
2 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8615
|
0 |
2 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8618
|
0 |
2 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8621
|
0 |
2 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8624
|
0 |
2 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8633
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8636
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8639
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8642
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8645
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8648
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8657
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8660
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8663
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8666
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8669
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8672
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8681
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8684
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8687
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8690
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8693
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8696
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8705
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8708
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8711
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8714
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8717
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8720
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8729
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8732
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8735
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8738
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8741
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8744
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8753
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8756
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8759
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8762
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8765
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8768
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8777
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
8780
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
8783
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
8786
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
8789
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
8792
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
8818
|
0 |
2 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
8819
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
8820
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
8822
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
8824
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
8825
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
8829
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
8831
|
2 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
8832
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
8837
|
2 |
0 |
if(!__creating[3]) { |
|
8838
|
0 |
2 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
8839
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
8841
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
8843
|
2 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
8844
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
8852
|
2 |
0 |
}if(!__creating[4]) { |
|
8857
|
2 |
0 |
}if(!__creating[5]) { |
|
8867
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8868
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
8874
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8875
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
8881
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
8882
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
8888
|
2 |
0 |
if(!hdrp && |
|
|
2 |
0 |
if(!hdrp && |
|
8889
|
0 |
2 |
!__creating[3] && |
|
8890
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
8896
|
2 |
0 |
if(!hdrp && |
|
|
2 |
0 |
if(!hdrp && |
|
8897
|
0 |
2 |
!__creating[4] && |
|
8898
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
8904
|
2 |
0 |
if(!hdrp && |
|
|
2 |
0 |
if(!hdrp && |
|
8905
|
0 |
2 |
!__creating[5] && |
|
8906
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
8912
|
0 |
2 |
if (hdrp) { |
|
8913
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
8921
|
0 |
0 |
PUSHMARK(SP) ; |
|
8922
|
0 |
0 |
XPUSHs( hdrp ); |
|
8926
|
0 |
0 |
if(count != 1) |
|
8931
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
8935
|
0 |
0 |
FREETMPS ; |
|
8941
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
8942
|
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) |
|
8944
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
8948
|
0 |
0 |
if(propagate_hdrcpy) |
|
8950
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
8951
|
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) |
|
8953
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
8957
|
0 |
0 |
if(propagate_hdrcpy) |
|
8959
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
8960
|
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) |
|
8962
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
8966
|
0 |
0 |
if(propagate_hdrcpy) |
|
8969
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
8973
|
2 |
0 |
if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
2 |
if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
8975
|
2 |
0 |
__privtrans->__inc_distance_n0 = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_distance_n0 = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
8977
|
2 |
0 |
__privtrans->__inc_distance_n1 = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_distance_n1 = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
8999
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
9003
|
0 |
0 |
if(__copy->__ddone) { |
|
9020
|
0 |
2 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9023
|
2 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
2 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9026
|
0 |
2 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9029
|
0 |
2 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9032
|
0 |
2 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9035
|
0 |
2 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9046
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9070
|
2 |
2 |
for( __tind2 = 0 ; |
|
9081
|
2 |
2 |
for( __tind1 = 0 ; |
|
9105
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9107
|
2 |
0 |
if (distpp) free(distpp); |
|
9110
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9113
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9116
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9119
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9122
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9125
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9136
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9160
|
0 |
0 |
for( __tind2 = 0 ; |
|
9171
|
0 |
0 |
for( __tind1 = 0 ; |
|
9195
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9197
|
0 |
0 |
if (distpp) free(distpp); |
|
9200
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9203
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9206
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9209
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9212
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9215
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9226
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9250
|
0 |
0 |
for( __tind2 = 0 ; |
|
9261
|
0 |
0 |
for( __tind1 = 0 ; |
|
9285
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9287
|
0 |
0 |
if (distpp) free(distpp); |
|
9290
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9293
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9296
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9299
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9302
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9305
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9316
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9340
|
0 |
0 |
for( __tind2 = 0 ; |
|
9351
|
0 |
0 |
for( __tind1 = 0 ; |
|
9375
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9377
|
0 |
0 |
if (distpp) free(distpp); |
|
9380
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9383
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9386
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9389
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9392
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9395
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9406
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9430
|
0 |
0 |
for( __tind2 = 0 ; |
|
9441
|
0 |
0 |
for( __tind1 = 0 ; |
|
9465
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9467
|
0 |
0 |
if (distpp) free(distpp); |
|
9470
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9473
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9476
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9479
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9482
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9485
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9496
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9520
|
0 |
0 |
for( __tind2 = 0 ; |
|
9531
|
0 |
0 |
for( __tind1 = 0 ; |
|
9555
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9557
|
0 |
0 |
if (distpp) free(distpp); |
|
9560
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9563
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9566
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9569
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9572
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9575
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9586
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9610
|
0 |
0 |
for( __tind2 = 0 ; |
|
9621
|
0 |
0 |
for( __tind1 = 0 ; |
|
9645
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9647
|
0 |
0 |
if (distpp) free(distpp); |
|
9650
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9653
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * distance_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9656
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * npass_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9659
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9662
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * error_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9665
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * nfound_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
9676
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
9700
|
0 |
0 |
for( __tind2 = 0 ; |
|
9711
|
0 |
0 |
for( __tind1 = 0 ; |
|
9735
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
9737
|
0 |
0 |
if (distpp) free(distpp); |
|
9756
|
2 |
0 |
if(__privtrans->__ddone) { |
|
9795
|
0 |
8 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
9796
|
0 |
8 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
9802
|
0 |
8 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9805
|
0 |
8 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9808
|
0 |
8 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9811
|
0 |
8 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9814
|
0 |
8 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9828
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9831
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9834
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9837
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9840
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9854
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9857
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9860
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9863
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9866
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9880
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9883
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9886
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9889
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9892
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9906
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9909
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9912
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9915
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9918
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9932
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9935
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9938
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9941
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9944
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9958
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9961
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9964
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9967
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9970
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
9984
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
9987
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
9990
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
9993
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
9996
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10027
|
0 |
8 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
10028
|
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; |
|
10029
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
10031
|
0 |
8 |
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)) { |
|
10033
|
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]) { |
|
10034
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
10038
|
0 |
8 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
10040
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
10041
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
10046
|
0 |
8 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
10047
|
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; |
|
10048
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
10050
|
8 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
8 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
8 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
10052
|
8 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
8 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
10053
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
10057
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
8 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
10059
|
8 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
8 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
10060
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
10065
|
0 |
8 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
10066
|
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; |
|
10068
|
8 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
8 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
8 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
10070
|
8 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
8 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
10071
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
10076
|
8 |
0 |
if(!__creating[3]) { |
|
10077
|
0 |
8 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
10078
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
10079
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
10081
|
0 |
8 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
10083
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
10084
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
10088
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
8 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
10090
|
8 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
8 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
10091
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
10099
|
8 |
0 |
}if(!__creating[4]) { |
|
10100
|
0 |
8 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
10101
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
10103
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
8 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
8 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
10105
|
8 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
8 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
10106
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
10119
|
8 |
0 |
if(!hdrp && |
|
|
0 |
8 |
if(!hdrp && |
|
10120
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
10126
|
8 |
0 |
if(!hdrp && |
|
|
0 |
8 |
if(!hdrp && |
|
10127
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
10133
|
8 |
0 |
if(!hdrp && |
|
|
0 |
8 |
if(!hdrp && |
|
10134
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
10140
|
8 |
0 |
if(!hdrp && |
|
|
8 |
0 |
if(!hdrp && |
|
10141
|
0 |
8 |
!__creating[3] && |
|
10142
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
10148
|
8 |
0 |
if(!hdrp && |
|
|
8 |
0 |
if(!hdrp && |
|
10149
|
0 |
8 |
!__creating[4] && |
|
10150
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
10156
|
0 |
8 |
if (hdrp) { |
|
10157
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
10165
|
0 |
0 |
PUSHMARK(SP) ; |
|
10166
|
0 |
0 |
XPUSHs( hdrp ); |
|
10170
|
0 |
0 |
if(count != 1) |
|
10175
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
10179
|
0 |
0 |
FREETMPS ; |
|
10185
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
10186
|
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) |
|
10188
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
10192
|
0 |
0 |
if(propagate_hdrcpy) |
|
10194
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
10195
|
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) |
|
10197
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
10201
|
0 |
0 |
if(propagate_hdrcpy) |
|
10204
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
10208
|
8 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
8 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
10210
|
8 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
10212
|
8 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
10214
|
8 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
10216
|
8 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
10218
|
8 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
10220
|
8 |
0 |
__privtrans->__inc_tree_2 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_tree_2 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
10222
|
8 |
0 |
__privtrans->__inc_tree_n = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
8 |
__privtrans->__inc_tree_n = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
10244
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
10248
|
0 |
0 |
if(__copy->__ddone) { |
|
10265
|
0 |
8 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10268
|
0 |
8 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10271
|
0 |
8 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10274
|
0 |
8 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10277
|
0 |
8 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10298
|
0 |
8 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10319
|
8 |
8 |
for( __tind2 = 0 ; |
|
10329
|
8 |
8 |
for( __tind1 = 0 ; |
|
10346
|
0 |
8 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
8 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10347
|
0 |
8 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
8 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10348
|
0 |
8 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10358
|
0 |
8 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10360
|
8 |
0 |
if (datapp) free(datapp); |
|
10361
|
8 |
0 |
if (maskpp) free(maskpp); |
|
10362
|
8 |
0 |
if (nod) free(nod); |
|
10365
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10368
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10371
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10374
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10377
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10398
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10419
|
0 |
0 |
for( __tind2 = 0 ; |
|
10429
|
0 |
0 |
for( __tind1 = 0 ; |
|
10446
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10447
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10448
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10458
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10460
|
0 |
0 |
if (datapp) free(datapp); |
|
10461
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10462
|
0 |
0 |
if (nod) free(nod); |
|
10465
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10468
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10471
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10474
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10477
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10498
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10519
|
0 |
0 |
for( __tind2 = 0 ; |
|
10529
|
0 |
0 |
for( __tind1 = 0 ; |
|
10546
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10547
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10548
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10558
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10560
|
0 |
0 |
if (datapp) free(datapp); |
|
10561
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10562
|
0 |
0 |
if (nod) free(nod); |
|
10565
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10568
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10571
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10574
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10577
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10598
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10619
|
0 |
0 |
for( __tind2 = 0 ; |
|
10629
|
0 |
0 |
for( __tind1 = 0 ; |
|
10646
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10647
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10648
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10658
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10660
|
0 |
0 |
if (datapp) free(datapp); |
|
10661
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10662
|
0 |
0 |
if (nod) free(nod); |
|
10665
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10668
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10671
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10674
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10677
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10698
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10719
|
0 |
0 |
for( __tind2 = 0 ; |
|
10729
|
0 |
0 |
for( __tind1 = 0 ; |
|
10746
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10747
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10748
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10758
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10760
|
0 |
0 |
if (datapp) free(datapp); |
|
10761
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10762
|
0 |
0 |
if (nod) free(nod); |
|
10765
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10768
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10771
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10774
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10777
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10798
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10819
|
0 |
0 |
for( __tind2 = 0 ; |
|
10829
|
0 |
0 |
for( __tind1 = 0 ; |
|
10846
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10847
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10848
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10858
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10860
|
0 |
0 |
if (datapp) free(datapp); |
|
10861
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10862
|
0 |
0 |
if (nod) free(nod); |
|
10865
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10868
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10871
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10874
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10877
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10898
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
10919
|
0 |
0 |
for( __tind2 = 0 ; |
|
10929
|
0 |
0 |
for( __tind1 = 0 ; |
|
10946
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10947
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10948
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
10958
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
10960
|
0 |
0 |
if (datapp) free(datapp); |
|
10961
|
0 |
0 |
if (maskpp) free(maskpp); |
|
10962
|
0 |
0 |
if (nod) free(nod); |
|
10965
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
10968
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
10971
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
10974
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
10977
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
10998
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11019
|
0 |
0 |
for( __tind2 = 0 ; |
|
11029
|
0 |
0 |
for( __tind1 = 0 ; |
|
11046
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11047
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11048
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11058
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
11060
|
0 |
0 |
if (datapp) free(datapp); |
|
11061
|
0 |
0 |
if (maskpp) free(maskpp); |
|
11062
|
0 |
0 |
if (nod) free(nod); |
|
11081
|
8 |
0 |
if(__privtrans->__ddone) { |
|
11121
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
11122
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
11128
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11131
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11134
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11137
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11140
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11143
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11159
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11162
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11165
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11168
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11171
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11174
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11190
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11193
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11196
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11199
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11202
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11205
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11221
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11224
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11227
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11230
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11233
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11236
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11252
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11255
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11258
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11261
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11264
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11267
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11283
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11286
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11289
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11292
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11295
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11298
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11314
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11317
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11320
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11323
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11326
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11329
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11345
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11348
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11351
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11354
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11357
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11360
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11393
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
11394
|
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; |
|
11395
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11397
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
11399
|
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]) { |
|
11400
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
11404
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
11406
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
11407
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
11412
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
11413
|
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; |
|
11414
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11416
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
11418
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
11419
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
11423
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
11425
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
11426
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
11431
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
11432
|
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; |
|
11434
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
11436
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
11437
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
11442
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
11443
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11444
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11446
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
11448
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
11449
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
11453
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
11455
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
11456
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
11461
|
0 |
0 |
if(!__creating[4]) { |
|
11462
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 2) { |
|
11463
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
11464
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11466
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
11468
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
11469
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
11473
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
11475
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
11476
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[1] != 1) { |
|
11484
|
0 |
0 |
}if(!__creating[5]) { |
|
11485
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
11486
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
11488
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
11490
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
11491
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
11504
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11505
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
11511
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11512
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
11518
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11519
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
11525
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11526
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
11532
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11533
|
0 |
0 |
!__creating[4] && |
|
11534
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
11540
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
11541
|
0 |
0 |
!__creating[5] && |
|
11542
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
11548
|
0 |
0 |
if (hdrp) { |
|
11549
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
11557
|
0 |
0 |
PUSHMARK(SP) ; |
|
11558
|
0 |
0 |
XPUSHs( hdrp ); |
|
11562
|
0 |
0 |
if(count != 1) |
|
11567
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
11571
|
0 |
0 |
FREETMPS ; |
|
11577
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
11578
|
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) |
|
11580
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
11584
|
0 |
0 |
if(propagate_hdrcpy) |
|
11586
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
11587
|
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) |
|
11589
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
11593
|
0 |
0 |
if(propagate_hdrcpy) |
|
11596
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
11600
|
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) |
|
11602
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
11604
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
11606
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
11608
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
11610
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
11612
|
0 |
0 |
__privtrans->__inc_distances_n0 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_distances_n0 = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
11614
|
0 |
0 |
__privtrans->__inc_distances_n1 = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_distances_n1 = __privtrans->pdls[3]->dimincs[1];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
11616
|
0 |
0 |
__privtrans->__inc_tree_2 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_tree_2 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
11618
|
0 |
0 |
__privtrans->__inc_tree_n = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_tree_n = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
11640
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
11644
|
0 |
0 |
if(__copy->__ddone) { |
|
11661
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11664
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11667
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11670
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11673
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11676
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11699
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11723
|
0 |
0 |
for( __tind2 = 0 ; |
|
11734
|
0 |
0 |
for( __tind1 = 0 ; |
|
11753
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11754
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11755
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11766
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
11768
|
0 |
0 |
if (datapp) free(datapp); |
|
11769
|
0 |
0 |
if (maskpp) free(maskpp); |
|
11770
|
0 |
0 |
if (distpp) free(distpp); |
|
11771
|
0 |
0 |
if (nod) free(nod); |
|
11774
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11777
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11780
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11783
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11786
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11789
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11812
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11836
|
0 |
0 |
for( __tind2 = 0 ; |
|
11847
|
0 |
0 |
for( __tind1 = 0 ; |
|
11866
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11867
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11868
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11879
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
11881
|
0 |
0 |
if (datapp) free(datapp); |
|
11882
|
0 |
0 |
if (maskpp) free(maskpp); |
|
11883
|
0 |
0 |
if (distpp) free(distpp); |
|
11884
|
0 |
0 |
if (nod) free(nod); |
|
11887
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
11890
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
11893
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
11896
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
11899
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
11902
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
11925
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
11949
|
0 |
0 |
for( __tind2 = 0 ; |
|
11960
|
0 |
0 |
for( __tind1 = 0 ; |
|
11979
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11980
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11981
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
11992
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
11994
|
0 |
0 |
if (datapp) free(datapp); |
|
11995
|
0 |
0 |
if (maskpp) free(maskpp); |
|
11996
|
0 |
0 |
if (distpp) free(distpp); |
|
11997
|
0 |
0 |
if (nod) free(nod); |
|
12000
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12003
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12006
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12009
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
12012
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
12015
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
12038
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12062
|
0 |
0 |
for( __tind2 = 0 ; |
|
12073
|
0 |
0 |
for( __tind1 = 0 ; |
|
12092
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12093
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12094
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12105
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
12107
|
0 |
0 |
if (datapp) free(datapp); |
|
12108
|
0 |
0 |
if (maskpp) free(maskpp); |
|
12109
|
0 |
0 |
if (distpp) free(distpp); |
|
12110
|
0 |
0 |
if (nod) free(nod); |
|
12113
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12116
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12119
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12122
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
12125
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
12128
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
12151
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12175
|
0 |
0 |
for( __tind2 = 0 ; |
|
12186
|
0 |
0 |
for( __tind1 = 0 ; |
|
12205
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12206
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12207
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12218
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
12220
|
0 |
0 |
if (datapp) free(datapp); |
|
12221
|
0 |
0 |
if (maskpp) free(maskpp); |
|
12222
|
0 |
0 |
if (distpp) free(distpp); |
|
12223
|
0 |
0 |
if (nod) free(nod); |
|
12226
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12229
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12232
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12235
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
12238
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
12241
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
12264
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12288
|
0 |
0 |
for( __tind2 = 0 ; |
|
12299
|
0 |
0 |
for( __tind1 = 0 ; |
|
12318
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12319
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12320
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12331
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
12333
|
0 |
0 |
if (datapp) free(datapp); |
|
12334
|
0 |
0 |
if (maskpp) free(maskpp); |
|
12335
|
0 |
0 |
if (distpp) free(distpp); |
|
12336
|
0 |
0 |
if (nod) free(nod); |
|
12339
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12342
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12345
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12348
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
12351
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
12354
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
12377
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12401
|
0 |
0 |
for( __tind2 = 0 ; |
|
12412
|
0 |
0 |
for( __tind1 = 0 ; |
|
12431
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12432
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12433
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12444
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
12446
|
0 |
0 |
if (datapp) free(datapp); |
|
12447
|
0 |
0 |
if (maskpp) free(maskpp); |
|
12448
|
0 |
0 |
if (distpp) free(distpp); |
|
12449
|
0 |
0 |
if (nod) free(nod); |
|
12452
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12455
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12458
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12461
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * distances_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
12464
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
12467
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * lnkdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
12490
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12514
|
0 |
0 |
for( __tind2 = 0 ; |
|
12525
|
0 |
0 |
for( __tind1 = 0 ; |
|
12544
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 0))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12545
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
|
0 |
0 |
(tree_datap)[0+(__inc_tree_2*PP_INDTERM(__privtrans->__2_size, 1))+(__inc_tree_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12546
|
0 |
0 |
(lnkdist_datap)[0+(__inc_lnkdist_n*PP_INDTERM(__privtrans->__n_size, nmax))] PDL_COMMENT("ACCESS()") = 0; |
|
12557
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
12559
|
0 |
0 |
if (datapp) free(datapp); |
|
12560
|
0 |
0 |
if (maskpp) free(maskpp); |
|
12561
|
0 |
0 |
if (distpp) free(distpp); |
|
12562
|
0 |
0 |
if (nod) free(nod); |
|
12581
|
0 |
0 |
if(__privtrans->__ddone) { |
|
12618
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
12624
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12627
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12630
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12639
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12642
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12645
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12654
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12657
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12660
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12669
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12672
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12675
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12684
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12687
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12690
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12699
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12702
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12705
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12714
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12717
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12720
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12729
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12732
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12735
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12761
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
12762
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
12763
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
12765
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
12767
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
12768
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
12772
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
12774
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
12775
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
12780
|
0 |
0 |
if(!__creating[2]) { |
|
12781
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
12782
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
12784
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
12786
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
12787
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
12800
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
12801
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
12807
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
12808
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
12814
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
12815
|
0 |
0 |
!__creating[2] && |
|
12816
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
12822
|
0 |
0 |
if (hdrp) { |
|
12823
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
12831
|
0 |
0 |
PUSHMARK(SP) ; |
|
12832
|
0 |
0 |
XPUSHs( hdrp ); |
|
12836
|
0 |
0 |
if(count != 1) |
|
12841
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
12845
|
0 |
0 |
FREETMPS ; |
|
12851
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
12852
|
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) |
|
12854
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
12858
|
0 |
0 |
if(propagate_hdrcpy) |
|
12861
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
12865
|
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) |
|
12867
|
0 |
0 |
__privtrans->__inc_tree_2 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_tree_2 = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
12869
|
0 |
0 |
__privtrans->__inc_tree_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_tree_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
12891
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
12895
|
0 |
0 |
if(__copy->__ddone) { |
|
12912
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12915
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12918
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12923
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12938
|
0 |
0 |
for( __tind2 = 0 ; |
|
12946
|
0 |
0 |
for( __tind1 = 0 ; |
|
12960
|
0 |
0 |
if (nod) free(nod); |
|
12969
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
12970
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
12973
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
12976
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
12981
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
12996
|
0 |
0 |
for( __tind2 = 0 ; |
|
13004
|
0 |
0 |
for( __tind1 = 0 ; |
|
13018
|
0 |
0 |
if (nod) free(nod); |
|
13027
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
13028
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13031
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13034
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13039
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13054
|
0 |
0 |
for( __tind2 = 0 ; |
|
13062
|
0 |
0 |
for( __tind1 = 0 ; |
|
13076
|
0 |
0 |
if (nod) free(nod); |
|
13085
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
13086
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13089
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13092
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13097
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13112
|
0 |
0 |
for( __tind2 = 0 ; |
|
13120
|
0 |
0 |
for( __tind1 = 0 ; |
|
13134
|
0 |
0 |
if (nod) free(nod); |
|
13143
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
13144
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13147
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13150
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13155
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13170
|
0 |
0 |
for( __tind2 = 0 ; |
|
13178
|
0 |
0 |
for( __tind1 = 0 ; |
|
13192
|
0 |
0 |
if (nod) free(nod); |
|
13201
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
13202
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13205
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13208
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13213
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13228
|
0 |
0 |
for( __tind2 = 0 ; |
|
13236
|
0 |
0 |
for( __tind1 = 0 ; |
|
13250
|
0 |
0 |
if (nod) free(nod); |
|
13259
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
13260
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13263
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13266
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13271
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13286
|
0 |
0 |
for( __tind2 = 0 ; |
|
13294
|
0 |
0 |
for( __tind1 = 0 ; |
|
13308
|
0 |
0 |
if (nod) free(nod); |
|
13317
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
13318
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * tree_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13321
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * nclusters_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13324
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13329
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
13344
|
0 |
0 |
for( __tind2 = 0 ; |
|
13352
|
0 |
0 |
for( __tind1 = 0 ; |
|
13366
|
0 |
0 |
if (nod) free(nod); |
|
13375
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
13392
|
0 |
0 |
if(__privtrans->__ddone) { |
|
13435
|
0 |
2 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
13441
|
0 |
2 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13444
|
0 |
2 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13447
|
0 |
2 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13450
|
0 |
2 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13453
|
0 |
2 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13456
|
0 |
2 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13459
|
0 |
2 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13462
|
0 |
2 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13475
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13478
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13481
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13484
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13487
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13490
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13493
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13496
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13509
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13512
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13515
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13518
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13521
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13524
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13527
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13530
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13543
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13546
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13549
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13552
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13555
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13558
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13561
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13564
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13577
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13580
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13583
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13586
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13589
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13592
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13595
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13598
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13611
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13614
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13617
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13620
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13623
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13626
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13629
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13632
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13645
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13648
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13651
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13654
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13657
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13660
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13663
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13666
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13679
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13682
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13685
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13688
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13691
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13694
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13697
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13700
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
13730
|
0 |
2 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
13731
|
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; |
|
13732
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
13734
|
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)) { |
|
13736
|
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]) { |
|
13737
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
13741
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
13743
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
13744
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
13749
|
0 |
2 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
13750
|
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; |
|
13751
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
13753
|
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)) { |
|
13755
|
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]) { |
|
13756
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
13760
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
13762
|
2 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
13763
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
13768
|
0 |
2 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
13769
|
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; |
|
13771
|
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)) { |
|
13773
|
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]) { |
|
13774
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
13779
|
2 |
0 |
if(!__creating[7]) { |
|
13780
|
0 |
2 |
if(((__privtrans->pdls[7]))->ndims < 2) { |
|
13781
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__2_size <= 1) __privtrans->__2_size = 1; |
|
13782
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
13784
|
0 |
2 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__2_size == 1)) { |
|
13786
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__2_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
13787
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
13791
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
2 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
2 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
13793
|
2 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
|
0 |
2 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
13794
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[1] != 1) { |
|
13807
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13808
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
13814
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13815
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
13821
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13822
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
13828
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13829
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
13835
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13836
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
13842
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13843
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
13849
|
2 |
0 |
if(!hdrp && |
|
|
0 |
2 |
if(!hdrp && |
|
13850
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
13856
|
2 |
0 |
if(!hdrp && |
|
|
2 |
0 |
if(!hdrp && |
|
13857
|
0 |
2 |
!__creating[7] && |
|
13858
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
13864
|
0 |
2 |
if (hdrp) { |
|
13865
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
13873
|
0 |
0 |
PUSHMARK(SP) ; |
|
13874
|
0 |
0 |
XPUSHs( hdrp ); |
|
13878
|
0 |
0 |
if(count != 1) |
|
13883
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
13887
|
0 |
0 |
FREETMPS ; |
|
13893
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
13894
|
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) |
|
13896
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
13900
|
0 |
0 |
if(propagate_hdrcpy) |
|
13903
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
13907
|
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) |
|
13909
|
2 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
13911
|
2 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
13913
|
2 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
13915
|
2 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
13917
|
2 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
13919
|
2 |
0 |
__privtrans->__inc_clusterids_2 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
|
0 |
2 |
__privtrans->__inc_clusterids_2 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
13941
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
13945
|
0 |
0 |
if(__copy->__ddone) { |
|
13962
|
0 |
2 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
13965
|
0 |
2 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
13968
|
0 |
2 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
13971
|
0 |
2 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
13974
|
0 |
2 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
13977
|
0 |
2 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
13980
|
0 |
2 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
13983
|
0 |
2 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14000
|
0 |
2 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14030
|
2 |
2 |
for( __tind2 = 0 ; |
|
14043
|
2 |
2 |
for( __tind1 = 0 ; |
|
14074
|
0 |
2 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14076
|
2 |
0 |
if (datapp) free(datapp); |
|
14077
|
2 |
0 |
if (maskpp) free(maskpp); |
|
14080
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14083
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14086
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14089
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14092
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14095
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14098
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14101
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14118
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14148
|
0 |
0 |
for( __tind2 = 0 ; |
|
14161
|
0 |
0 |
for( __tind1 = 0 ; |
|
14192
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14194
|
0 |
0 |
if (datapp) free(datapp); |
|
14195
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14198
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14201
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14204
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14207
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14210
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14213
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14216
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14219
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14236
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14266
|
0 |
0 |
for( __tind2 = 0 ; |
|
14279
|
0 |
0 |
for( __tind1 = 0 ; |
|
14310
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14312
|
0 |
0 |
if (datapp) free(datapp); |
|
14313
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14316
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14319
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14322
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14325
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14328
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14331
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14334
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14337
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14354
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14384
|
0 |
0 |
for( __tind2 = 0 ; |
|
14397
|
0 |
0 |
for( __tind1 = 0 ; |
|
14428
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14430
|
0 |
0 |
if (datapp) free(datapp); |
|
14431
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14434
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14437
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14440
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14443
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14446
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14449
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14452
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14455
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14472
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14502
|
0 |
0 |
for( __tind2 = 0 ; |
|
14515
|
0 |
0 |
for( __tind1 = 0 ; |
|
14546
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14548
|
0 |
0 |
if (datapp) free(datapp); |
|
14549
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14552
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14555
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14558
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14561
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14564
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14567
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14570
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14573
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14590
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14620
|
0 |
0 |
for( __tind2 = 0 ; |
|
14633
|
0 |
0 |
for( __tind1 = 0 ; |
|
14664
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14666
|
0 |
0 |
if (datapp) free(datapp); |
|
14667
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14670
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14673
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14676
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14679
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14682
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14685
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14688
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14691
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14708
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14738
|
0 |
0 |
for( __tind2 = 0 ; |
|
14751
|
0 |
0 |
for( __tind1 = 0 ; |
|
14782
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14784
|
0 |
0 |
if (datapp) free(datapp); |
|
14785
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14788
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14791
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14794
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14797
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * nxnodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
14800
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * nynodes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
14803
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * inittau_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
14806
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * niter_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
14809
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
14826
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
14856
|
0 |
0 |
for( __tind2 = 0 ; |
|
14869
|
0 |
0 |
for( __tind1 = 0 ; |
|
14900
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
14902
|
0 |
0 |
if (datapp) free(datapp); |
|
14903
|
0 |
0 |
if (maskpp) free(maskpp); |
|
14922
|
2 |
0 |
if(__privtrans->__ddone) { |
|
14957
|
0 |
0 |
__creating[0] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[0]); |
|
|
0 |
0 |
__creating[0] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[0]); |
|
14958
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
14959
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
14965
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14968
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14971
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14982
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
14985
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
14988
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
14999
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15002
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15005
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15016
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15019
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15022
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15033
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15036
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15039
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15050
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15053
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15056
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15067
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15070
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15073
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15084
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15087
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15090
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15118
|
0 |
0 |
if(!__creating[0]) { |
|
15119
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
15120
|
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; |
|
15121
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
15123
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
15125
|
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]) { |
|
15126
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
15130
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
15132
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
15133
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
15141
|
0 |
0 |
}if(!__creating[1]) { |
|
15142
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
15143
|
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; |
|
15145
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
15147
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
15148
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
15156
|
0 |
0 |
}if(!__creating[2]) { |
|
15157
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
15158
|
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; |
|
15159
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
15161
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
15163
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
15164
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
15168
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__d_size == 1)) { |
|
15170
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
15171
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
15184
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
15185
|
0 |
0 |
!__creating[0] && |
|
15186
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
15192
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
15193
|
0 |
0 |
!__creating[1] && |
|
15194
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
15200
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
15201
|
0 |
0 |
!__creating[2] && |
|
15202
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
15208
|
0 |
0 |
if (hdrp) { |
|
15209
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
15217
|
0 |
0 |
PUSHMARK(SP) ; |
|
15218
|
0 |
0 |
XPUSHs( hdrp ); |
|
15222
|
0 |
0 |
if(count != 1) |
|
15227
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
15231
|
0 |
0 |
FREETMPS ; |
|
15237
|
0 |
0 |
if ( __privtrans->pdls[0]->hdrsv != hdrp ){ |
|
15238
|
0 |
0 |
if( __privtrans->pdls[0]->hdrsv && __privtrans->pdls[0]->hdrsv != &PL_sv_undef) |
|
|
0 |
0 |
if( __privtrans->pdls[0]->hdrsv && __privtrans->pdls[0]->hdrsv != &PL_sv_undef) |
|
15240
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
15244
|
0 |
0 |
if(propagate_hdrcpy) |
|
15246
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
15247
|
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) |
|
15249
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
15253
|
0 |
0 |
if(propagate_hdrcpy) |
|
15255
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
15256
|
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) |
|
15258
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
15262
|
0 |
0 |
if(propagate_hdrcpy) |
|
15265
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
15269
|
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) |
|
15271
|
0 |
0 |
__privtrans->__inc_U_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_U_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
15273
|
0 |
0 |
__privtrans->__inc_U_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_U_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
15275
|
0 |
0 |
__privtrans->__inc_S_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_S_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
15277
|
0 |
0 |
__privtrans->__inc_V_d0 = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_V_d0 = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
15299
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
15303
|
0 |
0 |
if(__copy->__ddone) { |
|
15320
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15323
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15326
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15338
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15343
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15358
|
0 |
0 |
for( __tind2 = 0 ; |
|
15366
|
0 |
0 |
for( __tind1 = 0 ; |
|
15384
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15386
|
0 |
0 |
if (Upp) free(Upp); |
|
15387
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15390
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15393
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15396
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15408
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15413
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15428
|
0 |
0 |
for( __tind2 = 0 ; |
|
15436
|
0 |
0 |
for( __tind1 = 0 ; |
|
15454
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15456
|
0 |
0 |
if (Upp) free(Upp); |
|
15457
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15460
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15463
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15466
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15478
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15483
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15498
|
0 |
0 |
for( __tind2 = 0 ; |
|
15506
|
0 |
0 |
for( __tind1 = 0 ; |
|
15524
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15526
|
0 |
0 |
if (Upp) free(Upp); |
|
15527
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15530
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15533
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15536
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15548
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15553
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15568
|
0 |
0 |
for( __tind2 = 0 ; |
|
15576
|
0 |
0 |
for( __tind1 = 0 ; |
|
15594
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15596
|
0 |
0 |
if (Upp) free(Upp); |
|
15597
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15600
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15603
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15606
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15618
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15623
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15638
|
0 |
0 |
for( __tind2 = 0 ; |
|
15646
|
0 |
0 |
for( __tind1 = 0 ; |
|
15664
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15666
|
0 |
0 |
if (Upp) free(Upp); |
|
15667
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15670
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15673
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15676
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15688
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15693
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15708
|
0 |
0 |
for( __tind2 = 0 ; |
|
15716
|
0 |
0 |
for( __tind1 = 0 ; |
|
15734
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15736
|
0 |
0 |
if (Upp) free(Upp); |
|
15737
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15740
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15743
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15746
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15758
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15763
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15778
|
0 |
0 |
for( __tind2 = 0 ; |
|
15786
|
0 |
0 |
for( __tind1 = 0 ; |
|
15804
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15806
|
0 |
0 |
if (Upp) free(Upp); |
|
15807
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15810
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * U_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15813
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Double * S_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15816
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * V_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15828
|
0 |
0 |
if (__privtrans->__n_size < __privtrans->__d_size) { |
|
15833
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
15848
|
0 |
0 |
for( __tind2 = 0 ; |
|
15856
|
0 |
0 |
for( __tind1 = 0 ; |
|
15874
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
15876
|
0 |
0 |
if (Upp) free(Upp); |
|
15877
|
0 |
0 |
if (Vpp) free(Vpp); |
|
15896
|
0 |
0 |
if(__privtrans->__ddone) { |
|
15937
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
15943
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15946
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15949
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15952
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
15955
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
15958
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
15972
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
15975
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
15978
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
15981
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
15984
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
15987
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16001
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16004
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16007
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16010
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16013
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16016
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16030
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16033
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16036
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16039
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16042
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16045
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16059
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16062
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16065
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16068
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16071
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16074
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16088
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16091
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16094
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16097
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16100
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16103
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16117
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16120
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16123
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16126
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16129
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16132
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16146
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16149
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16152
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16155
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16158
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16161
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16192
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
16193
|
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; |
|
16194
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
16196
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
16198
|
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]) { |
|
16199
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
16203
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
16205
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
16206
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
16211
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
16212
|
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; |
|
16213
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
16215
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
16217
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
16218
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
16222
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
16224
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
16225
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
16230
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
16231
|
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; |
|
16233
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
16235
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
16236
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
16241
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
16242
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
16244
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
16246
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
16247
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
16251
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
16252
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
16254
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
16256
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
16257
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
16261
|
0 |
0 |
if(!__creating[5]) { |
|
16262
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
16263
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
16265
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
16267
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
16268
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
16280
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16281
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
16287
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16288
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
16294
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16295
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
16301
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16302
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
16308
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16309
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
16315
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
16316
|
0 |
0 |
!__creating[5] && |
|
16317
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
16323
|
0 |
0 |
if (hdrp) { |
|
16324
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
16332
|
0 |
0 |
PUSHMARK(SP) ; |
|
16333
|
0 |
0 |
XPUSHs( hdrp ); |
|
16337
|
0 |
0 |
if(count != 1) |
|
16342
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
16346
|
0 |
0 |
FREETMPS ; |
|
16352
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
16353
|
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) |
|
16355
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
16359
|
0 |
0 |
if(propagate_hdrcpy) |
|
16362
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
16366
|
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) |
|
16368
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
16370
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
16372
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
16374
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
16376
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
16378
|
0 |
0 |
__privtrans->__inc_rowids1_ncmps = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids1_ncmps = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids1_ncmps = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
16380
|
0 |
0 |
__privtrans->__inc_rowids2_ncmps = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids2_ncmps = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids2_ncmps = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
16382
|
0 |
0 |
__privtrans->__inc_dist_ncmps = PDL_REPRINC(__privtrans->pdls[5],0); __privtrans->__ddone = 1; |
|
16402
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
16406
|
0 |
0 |
if(__copy->__ddone) { |
|
16424
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16427
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16430
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16433
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16436
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16439
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16459
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
16483
|
0 |
0 |
for( __tind2 = 0 ; |
|
16494
|
0 |
0 |
for( __tind1 = 0 ; |
|
16508
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
16509
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16510
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16511
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
16526
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
16528
|
0 |
0 |
if (datapp) free(datapp); |
|
16529
|
0 |
0 |
if (maskpp) free(maskpp); |
|
16532
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16535
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16538
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16541
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16544
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16547
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16567
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
16591
|
0 |
0 |
for( __tind2 = 0 ; |
|
16602
|
0 |
0 |
for( __tind1 = 0 ; |
|
16616
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
16617
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16618
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16619
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
16634
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
16636
|
0 |
0 |
if (datapp) free(datapp); |
|
16637
|
0 |
0 |
if (maskpp) free(maskpp); |
|
16640
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16643
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16646
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16649
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16652
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16655
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16675
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
16699
|
0 |
0 |
for( __tind2 = 0 ; |
|
16710
|
0 |
0 |
for( __tind1 = 0 ; |
|
16724
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
16725
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16726
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16727
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
16742
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
16744
|
0 |
0 |
if (datapp) free(datapp); |
|
16745
|
0 |
0 |
if (maskpp) free(maskpp); |
|
16748
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16751
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16754
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16757
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16760
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16763
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16783
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
16807
|
0 |
0 |
for( __tind2 = 0 ; |
|
16818
|
0 |
0 |
for( __tind1 = 0 ; |
|
16832
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
16833
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16834
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16835
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
16850
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
16852
|
0 |
0 |
if (datapp) free(datapp); |
|
16853
|
0 |
0 |
if (maskpp) free(maskpp); |
|
16856
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16859
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16862
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16865
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16868
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16871
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16891
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
16915
|
0 |
0 |
for( __tind2 = 0 ; |
|
16926
|
0 |
0 |
for( __tind1 = 0 ; |
|
16940
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
16941
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16942
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
16943
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
16958
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
16960
|
0 |
0 |
if (datapp) free(datapp); |
|
16961
|
0 |
0 |
if (maskpp) free(maskpp); |
|
16964
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
16967
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
16970
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
16973
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
16976
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
16979
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
16999
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
17023
|
0 |
0 |
for( __tind2 = 0 ; |
|
17034
|
0 |
0 |
for( __tind1 = 0 ; |
|
17048
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
17049
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17050
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17051
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
17066
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
17068
|
0 |
0 |
if (datapp) free(datapp); |
|
17069
|
0 |
0 |
if (maskpp) free(maskpp); |
|
17072
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17075
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17078
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17081
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17084
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17087
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17107
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
17131
|
0 |
0 |
for( __tind2 = 0 ; |
|
17142
|
0 |
0 |
for( __tind1 = 0 ; |
|
17156
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
17157
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17158
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17159
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
17174
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
17176
|
0 |
0 |
if (datapp) free(datapp); |
|
17177
|
0 |
0 |
if (maskpp) free(maskpp); |
|
17180
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17183
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17186
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17189
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17192
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * rowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17195
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17215
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
17239
|
0 |
0 |
for( __tind2 = 0 ; |
|
17250
|
0 |
0 |
for( __tind1 = 0 ; |
|
17264
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
17265
|
0 |
0 |
rowid1 = (rowids1_datap)[0+(__inc_rowids1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17266
|
0 |
0 |
rowid2 = (rowids2_datap)[0+(__inc_rowids2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
17267
|
0 |
0 |
(dist_datap)[0+(__inc_dist_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
17282
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
17284
|
0 |
0 |
if (datapp) free(datapp); |
|
17285
|
0 |
0 |
if (maskpp) free(maskpp); |
|
17304
|
0 |
0 |
if(__privtrans->__ddone) { |
|
17346
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
|
0 |
0 |
__creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]); |
|
17352
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17355
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17358
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17361
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17364
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17367
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17381
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17384
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17387
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17390
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17393
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17396
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17410
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17413
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17416
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17419
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17422
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17425
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17439
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17442
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17445
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17448
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17451
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17454
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17468
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17471
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17474
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17477
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17480
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17483
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17497
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17500
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17503
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17506
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17509
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17512
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17526
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17529
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17532
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17535
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17538
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17541
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17555
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17558
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17561
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17564
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17567
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17570
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17601
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
17602
|
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; |
|
17603
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
17605
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
17607
|
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]) { |
|
17608
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
17612
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
17614
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
17615
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
17620
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
17621
|
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; |
|
17622
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
17624
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
17626
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
17627
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
17631
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
17633
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
17634
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
17639
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
17640
|
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; |
|
17642
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
17644
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
17645
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
17650
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
17651
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
17653
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
17655
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
17656
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
17660
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
17661
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__n2_size <= 1) __privtrans->__n2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__n2_size <= 1) __privtrans->__n2_size = 1; |
|
17663
|
0 |
0 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n2_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n2_size == 1)) { |
|
17665
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n2_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__n2_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
17666
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
17671
|
0 |
0 |
if(!__creating[5]) { |
|
17672
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
17673
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
17675
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
17677
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
17678
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
17690
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17691
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
17697
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17698
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
17704
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17705
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
17711
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17712
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
17718
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17719
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
17725
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
17726
|
0 |
0 |
!__creating[5] && |
|
17727
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
17733
|
0 |
0 |
if (hdrp) { |
|
17734
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
17742
|
0 |
0 |
PUSHMARK(SP) ; |
|
17743
|
0 |
0 |
XPUSHs( hdrp ); |
|
17747
|
0 |
0 |
if(count != 1) |
|
17752
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
17756
|
0 |
0 |
FREETMPS ; |
|
17762
|
0 |
0 |
if ( __privtrans->pdls[5]->hdrsv != hdrp ){ |
|
17763
|
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) |
|
17765
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
17769
|
0 |
0 |
if(propagate_hdrcpy) |
|
17772
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
17776
|
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) |
|
17778
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
17780
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
17782
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
17784
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
17786
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
17788
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
17790
|
0 |
0 |
__privtrans->__inc_index2_n2 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_index2_n2 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
17792
|
0 |
0 |
__privtrans->__inc_dist_nr = PDL_REPRINC(__privtrans->pdls[5],0); __privtrans->__ddone = 1; |
|
17812
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
17816
|
0 |
0 |
if(__copy->__ddone) { |
|
17834
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17837
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17840
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17843
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17846
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17849
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17867
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
17891
|
0 |
0 |
for( __tind2 = 0 ; |
|
17902
|
0 |
0 |
for( __tind1 = 0 ; |
|
17916
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
17917
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
17918
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
17931
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
17933
|
0 |
0 |
if (datapp) free(datapp); |
|
17934
|
0 |
0 |
if (maskpp) free(maskpp); |
|
17937
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
17940
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
17943
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
17946
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
17949
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
17952
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
17970
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
17994
|
0 |
0 |
for( __tind2 = 0 ; |
|
18005
|
0 |
0 |
for( __tind1 = 0 ; |
|
18019
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18020
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18021
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18034
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18036
|
0 |
0 |
if (datapp) free(datapp); |
|
18037
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18040
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18043
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18046
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18049
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18052
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18055
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18073
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18097
|
0 |
0 |
for( __tind2 = 0 ; |
|
18108
|
0 |
0 |
for( __tind1 = 0 ; |
|
18122
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18123
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18124
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18137
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18139
|
0 |
0 |
if (datapp) free(datapp); |
|
18140
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18143
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18146
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18149
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18152
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18155
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18158
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18176
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18200
|
0 |
0 |
for( __tind2 = 0 ; |
|
18211
|
0 |
0 |
for( __tind1 = 0 ; |
|
18225
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18226
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18227
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18240
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18242
|
0 |
0 |
if (datapp) free(datapp); |
|
18243
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18246
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18249
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18252
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18255
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18258
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18261
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18279
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18303
|
0 |
0 |
for( __tind2 = 0 ; |
|
18314
|
0 |
0 |
for( __tind1 = 0 ; |
|
18328
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18329
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18330
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18343
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18345
|
0 |
0 |
if (datapp) free(datapp); |
|
18346
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18349
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18352
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18355
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18358
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18361
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18364
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18382
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18406
|
0 |
0 |
for( __tind2 = 0 ; |
|
18417
|
0 |
0 |
for( __tind1 = 0 ; |
|
18431
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18432
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18433
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18446
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18448
|
0 |
0 |
if (datapp) free(datapp); |
|
18449
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18452
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18455
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18458
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18461
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18464
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18467
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18485
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18509
|
0 |
0 |
for( __tind2 = 0 ; |
|
18520
|
0 |
0 |
for( __tind1 = 0 ; |
|
18534
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18535
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18536
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18549
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18551
|
0 |
0 |
if (datapp) free(datapp); |
|
18552
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18555
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18558
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18561
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
18564
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
18567
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * index2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
18570
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
18588
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
18612
|
0 |
0 |
for( __tind2 = 0 ; |
|
18623
|
0 |
0 |
for( __tind1 = 0 ; |
|
18637
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
18638
|
0 |
0 |
(dist_datap)[0+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
18639
|
0 |
0 |
1, __privtrans->__n2_size, &((rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ), index2_datap, |
|
18652
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
18654
|
0 |
0 |
if (datapp) free(datapp); |
|
18655
|
0 |
0 |
if (maskpp) free(maskpp); |
|
18674
|
0 |
0 |
if(__privtrans->__ddone) { |
|
18710
|
0 |
1 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
18716
|
0 |
1 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18722
|
0 |
1 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18733
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18739
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18750
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18756
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18767
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18773
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18784
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18790
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18801
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18807
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18818
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18824
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18835
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
18841
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
18869
|
0 |
1 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
18870
|
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; |
|
18872
|
0 |
1 |
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)) { |
|
18874
|
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]) { |
|
18875
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
18879
|
1 |
0 |
if(!__creating[1]) { |
|
18880
|
0 |
1 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
18881
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
18883
|
0 |
1 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
18885
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
18886
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
18898
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
18899
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
18905
|
1 |
0 |
if(!hdrp && |
|
|
1 |
0 |
if(!hdrp && |
|
18906
|
0 |
1 |
!__creating[1] && |
|
18907
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
18913
|
0 |
1 |
if (hdrp) { |
|
18914
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
18922
|
0 |
0 |
PUSHMARK(SP) ; |
|
18923
|
0 |
0 |
XPUSHs( hdrp ); |
|
18927
|
0 |
0 |
if(count != 1) |
|
18932
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
18936
|
0 |
0 |
FREETMPS ; |
|
18942
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
18943
|
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) |
|
18945
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
18949
|
0 |
0 |
if(propagate_hdrcpy) |
|
18952
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
18956
|
1 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
1 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
18958
|
0 |
1 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
1 |
0 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
18960
|
0 |
1 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[1],0); __privtrans->__ddone = 1; |
|
18980
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
18984
|
0 |
0 |
if(__copy->__ddone) { |
|
19003
|
0 |
1 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19009
|
0 |
1 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19017
|
0 |
1 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19029
|
1 |
1 |
for( __tind2 = 0 ; |
|
19036
|
1 |
1 |
for( __tind1 = 0 ; |
|
19048
|
0 |
2 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
2 |
1 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19050
|
4 |
1 |
for(n=0; n<(__n_size); n++) { |
|
19051
|
0 |
4 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19052
|
4 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
4 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
4 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19053
|
0 |
4 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19062
|
0 |
1 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
19063
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19069
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19077
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19089
|
0 |
0 |
for( __tind2 = 0 ; |
|
19096
|
0 |
0 |
for( __tind1 = 0 ; |
|
19108
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19110
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19111
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19112
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19113
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19122
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
19123
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19129
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19137
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19149
|
0 |
0 |
for( __tind2 = 0 ; |
|
19156
|
0 |
0 |
for( __tind1 = 0 ; |
|
19168
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19170
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19171
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19172
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19173
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19182
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
19183
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19189
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19197
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19209
|
0 |
0 |
for( __tind2 = 0 ; |
|
19216
|
0 |
0 |
for( __tind1 = 0 ; |
|
19228
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19230
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19231
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19232
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19233
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19242
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
19243
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19249
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19257
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19269
|
0 |
0 |
for( __tind2 = 0 ; |
|
19276
|
0 |
0 |
for( __tind1 = 0 ; |
|
19288
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19290
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19291
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19292
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19293
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19302
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
19303
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19309
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19317
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19329
|
0 |
0 |
for( __tind2 = 0 ; |
|
19336
|
0 |
0 |
for( __tind1 = 0 ; |
|
19348
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19350
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19351
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19352
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19353
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19362
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
19363
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19369
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19377
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19389
|
0 |
0 |
for( __tind2 = 0 ; |
|
19396
|
0 |
0 |
for( __tind1 = 0 ; |
|
19408
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19410
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19411
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19412
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19413
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19422
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
19423
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19429
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19437
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19449
|
0 |
0 |
for( __tind2 = 0 ; |
|
19456
|
0 |
0 |
for( __tind1 = 0 ; |
|
19468
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19470
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19471
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19472
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
|
0 |
0 |
if (cid < 0 || cid >= __privtrans->__k_size || cid == clusterids_badval) continue; /*-- sanity check --*/ |
|
19473
|
0 |
0 |
(clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19482
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
19499
|
1 |
0 |
if(__privtrans->__ddone) { |
|
19536
|
0 |
1 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
19537
|
1 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
1 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
19543
|
0 |
1 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19546
|
0 |
1 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19549
|
0 |
1 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19559
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19562
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19565
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19575
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19578
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19581
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19591
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19594
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19597
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19607
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19610
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19613
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19623
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19626
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19629
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19639
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19642
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19645
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19655
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19658
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19661
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19688
|
0 |
1 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
19689
|
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; |
|
19691
|
0 |
1 |
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)) { |
|
19693
|
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]) { |
|
19694
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
19698
|
1 |
0 |
if(!__creating[1]) { |
|
19699
|
0 |
1 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
19700
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
19702
|
0 |
1 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
19704
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
19705
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
19712
|
1 |
0 |
}if(!__creating[2]) { |
|
19713
|
0 |
1 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
19714
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__mcsize_size <= 1) __privtrans->__mcsize_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__mcsize_size <= 1) __privtrans->__mcsize_size = 1; |
|
19715
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
19717
|
0 |
1 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
19719
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__mcsize_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__mcsize_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
19720
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
19724
|
1 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
1 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
1 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
19726
|
1 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
|
0 |
1 |
} else if(((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[1]) { |
|
19727
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
19739
|
1 |
0 |
if(!hdrp && |
|
|
0 |
1 |
if(!hdrp && |
|
19740
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
19746
|
1 |
0 |
if(!hdrp && |
|
|
1 |
0 |
if(!hdrp && |
|
19747
|
0 |
1 |
!__creating[1] && |
|
19748
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
19754
|
1 |
0 |
if(!hdrp && |
|
|
1 |
0 |
if(!hdrp && |
|
19755
|
0 |
1 |
!__creating[2] && |
|
19756
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
19762
|
0 |
1 |
if (hdrp) { |
|
19763
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
19771
|
0 |
0 |
PUSHMARK(SP) ; |
|
19772
|
0 |
0 |
XPUSHs( hdrp ); |
|
19776
|
0 |
0 |
if(count != 1) |
|
19781
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
19785
|
0 |
0 |
FREETMPS ; |
|
19791
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
19792
|
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) |
|
19794
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
19798
|
0 |
0 |
if(propagate_hdrcpy) |
|
19800
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
19801
|
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) |
|
19803
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
19807
|
0 |
0 |
if(propagate_hdrcpy) |
|
19810
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
19814
|
1 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
1 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
19816
|
0 |
1 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
1 |
0 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
19818
|
0 |
1 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
1 |
0 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
19820
|
0 |
1 |
__privtrans->__inc_eltids_mcsize = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
1 |
0 |
__privtrans->__inc_eltids_mcsize = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
1 |
__privtrans->__inc_eltids_mcsize = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
19822
|
0 |
1 |
__privtrans->__inc_eltids_k = PDL_REPRINC(__privtrans->pdls[2],1); __privtrans->__ddone = 1; |
|
19842
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
19846
|
0 |
0 |
if(__copy->__ddone) { |
|
19865
|
0 |
1 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19868
|
0 |
1 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19871
|
0 |
1 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19876
|
0 |
1 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19891
|
1 |
1 |
for( __tind2 = 0 ; |
|
19899
|
1 |
1 |
for( __tind1 = 0 ; |
|
19914
|
0 |
2 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
2 |
1 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19916
|
4 |
1 |
for(n=0; n<(__n_size); n++) { |
|
19917
|
0 |
4 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19918
|
0 |
4 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19919
|
0 |
4 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
4 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
19929
|
0 |
1 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
19930
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19933
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
19936
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
19941
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
19956
|
0 |
0 |
for( __tind2 = 0 ; |
|
19964
|
0 |
0 |
for( __tind1 = 0 ; |
|
19979
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
19981
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
19982
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
19983
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
19984
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
19994
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
19995
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
19998
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20001
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20006
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20021
|
0 |
0 |
for( __tind2 = 0 ; |
|
20029
|
0 |
0 |
for( __tind1 = 0 ; |
|
20044
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20046
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20047
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20048
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20049
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20059
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
20060
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20063
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20066
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20071
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20086
|
0 |
0 |
for( __tind2 = 0 ; |
|
20094
|
0 |
0 |
for( __tind1 = 0 ; |
|
20109
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20111
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20112
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20113
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20114
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20124
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
20125
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20128
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20131
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20136
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20151
|
0 |
0 |
for( __tind2 = 0 ; |
|
20159
|
0 |
0 |
for( __tind1 = 0 ; |
|
20174
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20176
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20177
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20178
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20179
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20189
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
20190
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20193
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20196
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20201
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20216
|
0 |
0 |
for( __tind2 = 0 ; |
|
20224
|
0 |
0 |
for( __tind1 = 0 ; |
|
20239
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20241
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20242
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20243
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20244
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20254
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
20255
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20258
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20261
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20266
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20281
|
0 |
0 |
for( __tind2 = 0 ; |
|
20289
|
0 |
0 |
for( __tind1 = 0 ; |
|
20304
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20306
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20307
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20308
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20309
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20319
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
20320
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20323
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20326
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
20331
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20346
|
0 |
0 |
for( __tind2 = 0 ; |
|
20354
|
0 |
0 |
for( __tind1 = 0 ; |
|
20369
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
20371
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20372
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20373
|
0 |
0 |
csize = (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") ++; |
|
20374
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
|
0 |
0 |
(eltids_datap)[0+(__inc_eltids_mcsize*PP_INDTERM(__privtrans->__mcsize_size, csize))+(__inc_eltids_k*PP_INDTERM(__privtrans->__k_size, cid))] PDL_COMMENT("ACCESS()") = n; |
|
20384
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
20401
|
1 |
0 |
if(__privtrans->__ddone) { |
|
20437
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
20443
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20446
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20455
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20458
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20467
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20470
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20479
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20482
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20491
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20494
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20503
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20506
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20515
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20518
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20527
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20530
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20556
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
20557
|
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; |
|
20559
|
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)) { |
|
20561
|
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]) { |
|
20562
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
20566
|
0 |
0 |
if(!__creating[1]) { |
|
20567
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
20568
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
20569
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
20571
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
20573
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
20574
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
20578
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
20580
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
20581
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
20593
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
20594
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
20600
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
20601
|
0 |
0 |
!__creating[1] && |
|
20602
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
20608
|
0 |
0 |
if (hdrp) { |
|
20609
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
20617
|
0 |
0 |
PUSHMARK(SP) ; |
|
20618
|
0 |
0 |
XPUSHs( hdrp ); |
|
20622
|
0 |
0 |
if(count != 1) |
|
20627
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
20631
|
0 |
0 |
FREETMPS ; |
|
20637
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
20638
|
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) |
|
20640
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
20644
|
0 |
0 |
if(propagate_hdrcpy) |
|
20647
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
20651
|
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) |
|
20653
|
0 |
0 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
20655
|
0 |
0 |
__privtrans->__inc_eltmask_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_eltmask_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_eltmask_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
20657
|
0 |
0 |
__privtrans->__inc_eltmask_n = PDL_REPRINC(__privtrans->pdls[1],1); __privtrans->__ddone = 1; |
|
20677
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
20681
|
0 |
0 |
if(__copy->__ddone) { |
|
20699
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20702
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20707
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20719
|
0 |
0 |
for( __tind2 = 0 ; |
|
20726
|
0 |
0 |
for( __tind1 = 0 ; |
|
20739
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20740
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20741
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
20750
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
20751
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20754
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20759
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20771
|
0 |
0 |
for( __tind2 = 0 ; |
|
20778
|
0 |
0 |
for( __tind1 = 0 ; |
|
20791
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20792
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20793
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
20802
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
20803
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20806
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20811
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20823
|
0 |
0 |
for( __tind2 = 0 ; |
|
20830
|
0 |
0 |
for( __tind1 = 0 ; |
|
20843
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20844
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20845
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
20854
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
20855
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20858
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20863
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20875
|
0 |
0 |
for( __tind2 = 0 ; |
|
20882
|
0 |
0 |
for( __tind1 = 0 ; |
|
20895
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20896
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20897
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
20906
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
20907
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20910
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20915
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20927
|
0 |
0 |
for( __tind2 = 0 ; |
|
20934
|
0 |
0 |
for( __tind1 = 0 ; |
|
20947
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
20948
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
20949
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
20958
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
20959
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
20962
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
20967
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
20979
|
0 |
0 |
for( __tind2 = 0 ; |
|
20986
|
0 |
0 |
for( __tind1 = 0 ; |
|
20999
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
21000
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
21001
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
21010
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
21011
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21014
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21019
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
21031
|
0 |
0 |
for( __tind2 = 0 ; |
|
21038
|
0 |
0 |
for( __tind1 = 0 ; |
|
21051
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
21052
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
21053
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
21062
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
21063
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21066
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * eltmask_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21071
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
21083
|
0 |
0 |
for( __tind2 = 0 ; |
|
21090
|
0 |
0 |
for( __tind1 = 0 ; |
|
21103
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
21104
|
0 |
0 |
cid = (clusterids_datap)[0+(__inc_clusterids_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
21105
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
|
0 |
0 |
(eltmask_datap)[0+(__inc_eltmask_k*PP_INDTERM(__privtrans->__k_size, cid))+(__inc_eltmask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 1; |
|
21114
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
21131
|
0 |
0 |
if(__privtrans->__ddone) { |
|
21175
|
0 |
5 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
|
0 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
21181
|
0 |
5 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21184
|
0 |
5 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21187
|
0 |
5 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21190
|
0 |
5 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21193
|
0 |
5 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21196
|
0 |
5 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21199
|
0 |
5 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21216
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21219
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21222
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21225
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21228
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21231
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21234
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21251
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21254
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21257
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21260
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21263
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21266
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21269
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21286
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21289
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21292
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21295
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21298
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21301
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21304
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21321
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21324
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21327
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21330
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21333
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21336
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21339
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21356
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21359
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21362
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21365
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21368
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21371
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21374
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21391
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21394
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21397
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21400
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21403
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21406
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21409
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21426
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21429
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21432
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21435
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21438
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21441
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21444
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21478
|
0 |
5 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
21479
|
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; |
|
21480
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
21482
|
0 |
5 |
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)) { |
|
21484
|
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]) { |
|
21485
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
21489
|
0 |
5 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
21491
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
21492
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
21497
|
0 |
5 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
21498
|
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; |
|
21499
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
21501
|
5 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
21503
|
5 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
21504
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
21508
|
5 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
21510
|
5 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
21511
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
21516
|
0 |
5 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
21517
|
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; |
|
21519
|
5 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
21521
|
5 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
21522
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
21527
|
0 |
5 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
21528
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
21530
|
0 |
5 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
21532
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
21533
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
21537
|
0 |
5 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
21538
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
21540
|
0 |
5 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
21542
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
21543
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
21547
|
0 |
5 |
if(((__privtrans->pdls[5]))->ndims < 2) { |
|
21548
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__mcsize_size <= 1) __privtrans->__mcsize_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__mcsize_size <= 1) __privtrans->__mcsize_size = 1; |
|
21549
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
21551
|
0 |
5 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__mcsize_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__mcsize_size == 1)) { |
|
21553
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__mcsize_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__mcsize_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
21554
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
21558
|
5 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
21560
|
5 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[5]))->dims[1]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[5]))->dims[1]) { |
|
21561
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[1] != 1) { |
|
21566
|
5 |
0 |
if(!__creating[6]) { |
|
21567
|
0 |
5 |
if(((__privtrans->pdls[6]))->ndims < 2) { |
|
21568
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
21569
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
21571
|
5 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
21573
|
5 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
21574
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
21578
|
5 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__nr_size == 1)) { |
|
|
5 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__nr_size == 1)) { |
|
|
0 |
5 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__nr_size == 1)) { |
|
21580
|
5 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__nr_size != ((__privtrans->pdls[6]))->dims[1]) { |
|
|
0 |
5 |
} else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__nr_size != ((__privtrans->pdls[6]))->dims[1]) { |
|
21581
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[1] != 1) { |
|
21593
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21594
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
21600
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21601
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
21607
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21608
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
21614
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21615
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
21621
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21622
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
21628
|
5 |
0 |
if(!hdrp && |
|
|
0 |
5 |
if(!hdrp && |
|
21629
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
21635
|
5 |
0 |
if(!hdrp && |
|
|
5 |
0 |
if(!hdrp && |
|
21636
|
0 |
5 |
!__creating[6] && |
|
21637
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
21643
|
0 |
5 |
if (hdrp) { |
|
21644
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
21652
|
0 |
0 |
PUSHMARK(SP) ; |
|
21653
|
0 |
0 |
XPUSHs( hdrp ); |
|
21657
|
0 |
0 |
if(count != 1) |
|
21662
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
21666
|
0 |
0 |
FREETMPS ; |
|
21672
|
0 |
0 |
if ( __privtrans->pdls[6]->hdrsv != hdrp ){ |
|
21673
|
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) |
|
21675
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
21679
|
0 |
0 |
if(propagate_hdrcpy) |
|
21682
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
21686
|
5 |
0 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
|
0 |
5 |
if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1) |
|
21688
|
5 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
21690
|
5 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
21692
|
5 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
21694
|
5 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
21696
|
5 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
21698
|
0 |
5 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
5 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
21700
|
0 |
5 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
5 |
0 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_clustersizes_k = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
21702
|
5 |
0 |
__privtrans->__inc_eltids_mcsize = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 1 || __privtrans->pdls[5]->dims[1] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_eltids_mcsize = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 1 || __privtrans->pdls[5]->dims[1] <= 1) |
|
21704
|
5 |
0 |
__privtrans->__inc_eltids_k = __privtrans->pdls[5]->dimincs[1];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_eltids_k = __privtrans->pdls[5]->dimincs[1];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
21706
|
0 |
5 |
__privtrans->__inc_dist_k = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1) |
|
|
5 |
0 |
__privtrans->__inc_dist_k = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1) |
|
|
0 |
5 |
__privtrans->__inc_dist_k = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1) |
|
21708
|
0 |
5 |
__privtrans->__inc_dist_nr = PDL_REPRINC(__privtrans->pdls[6],1); __privtrans->__ddone = 1; |
|
21728
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
21732
|
0 |
0 |
if(__copy->__ddone) { |
|
21751
|
0 |
5 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21754
|
0 |
5 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21757
|
0 |
5 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21760
|
0 |
5 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21763
|
0 |
5 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21766
|
0 |
5 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21769
|
0 |
5 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21792
|
0 |
5 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
21819
|
5 |
5 |
for( __tind2 = 0 ; |
|
21831
|
5 |
5 |
for( __tind1 = 0 ; |
|
21847
|
20 |
5 |
for(nr=0; nr<(__nr_size); nr++) { |
|
21848
|
0 |
20 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
21850
|
40 |
20 |
for(k=0; k<(__k_size); k++) { |
|
21851
|
0 |
40 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
40 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
21852
|
0 |
40 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
21868
|
0 |
5 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
21870
|
5 |
0 |
if (datapp) free(datapp); |
|
21871
|
5 |
0 |
if (maskpp) free(maskpp); |
|
21872
|
5 |
0 |
if (eltidspp) free(eltidspp); |
|
21875
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
21878
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
21881
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
21884
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
21887
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
21890
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
21893
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
21916
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
21943
|
0 |
0 |
for( __tind2 = 0 ; |
|
21955
|
0 |
0 |
for( __tind1 = 0 ; |
|
21971
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
21972
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
21974
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
21975
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
21976
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
21992
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
21994
|
0 |
0 |
if (datapp) free(datapp); |
|
21995
|
0 |
0 |
if (maskpp) free(maskpp); |
|
21996
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
21999
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22002
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22005
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22008
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22011
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22014
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22017
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22040
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22067
|
0 |
0 |
for( __tind2 = 0 ; |
|
22079
|
0 |
0 |
for( __tind1 = 0 ; |
|
22095
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22096
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22098
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22099
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22100
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22116
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22118
|
0 |
0 |
if (datapp) free(datapp); |
|
22119
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22120
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22123
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22126
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22129
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22132
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22135
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22138
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22141
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22164
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22191
|
0 |
0 |
for( __tind2 = 0 ; |
|
22203
|
0 |
0 |
for( __tind1 = 0 ; |
|
22219
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22220
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22222
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22223
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22224
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22240
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22242
|
0 |
0 |
if (datapp) free(datapp); |
|
22243
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22244
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22247
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22250
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22253
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22256
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22259
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22262
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22265
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22288
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22315
|
0 |
0 |
for( __tind2 = 0 ; |
|
22327
|
0 |
0 |
for( __tind1 = 0 ; |
|
22343
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22344
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22346
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22347
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22348
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22364
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22366
|
0 |
0 |
if (datapp) free(datapp); |
|
22367
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22368
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22371
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22374
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22377
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22380
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22383
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22386
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22389
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22412
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22439
|
0 |
0 |
for( __tind2 = 0 ; |
|
22451
|
0 |
0 |
for( __tind1 = 0 ; |
|
22467
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22468
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22470
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22471
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22472
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22488
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22490
|
0 |
0 |
if (datapp) free(datapp); |
|
22491
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22492
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22495
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22498
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22501
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22504
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22507
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22510
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22513
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22536
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22563
|
0 |
0 |
for( __tind2 = 0 ; |
|
22575
|
0 |
0 |
for( __tind1 = 0 ; |
|
22591
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22592
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22594
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22595
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22596
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22612
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22614
|
0 |
0 |
if (datapp) free(datapp); |
|
22615
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22616
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22619
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22622
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22625
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22628
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22631
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * clustersizes_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22634
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * eltids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22637
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22660
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
22687
|
0 |
0 |
for( __tind2 = 0 ; |
|
22699
|
0 |
0 |
for( __tind1 = 0 ; |
|
22715
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
22716
|
0 |
0 |
rowid = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
22718
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
22719
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_dist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
22720
|
0 |
0 |
1, (clustersizes_datap)[0+(__inc_clustersizes_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") , |
|
22736
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
22738
|
0 |
0 |
if (datapp) free(datapp); |
|
22739
|
0 |
0 |
if (maskpp) free(maskpp); |
|
22740
|
0 |
0 |
if (eltidspp) free(eltidspp); |
|
22759
|
5 |
0 |
if(__privtrans->__ddone) { |
|
22805
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
22811
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22814
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22817
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22820
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22823
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22826
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22829
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22832
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
22849
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22852
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22855
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22858
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22861
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22864
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22867
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22870
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
22887
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22890
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22893
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22896
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22899
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22902
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22905
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22908
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
22925
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22928
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22931
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22934
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22937
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22940
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22943
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22946
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
22963
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
22966
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
22969
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
22972
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
22975
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
22978
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
22981
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
22984
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23001
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23004
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23007
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23010
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23013
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23016
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23019
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23022
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23039
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23042
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23045
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23048
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23051
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23054
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23057
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23060
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23077
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23080
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23083
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23086
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23089
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23092
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23095
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23098
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23132
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
23133
|
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; |
|
23134
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
23136
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
23138
|
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]) { |
|
23139
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
23143
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
23145
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
23146
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
23151
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
23152
|
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; |
|
23153
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
23155
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
23157
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
23158
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
23162
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
23164
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
23165
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
23170
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
23171
|
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; |
|
23173
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
23175
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
23176
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
23181
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
23182
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
23184
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
23186
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
23187
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
23191
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
23192
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nc1_size <= 1) __privtrans->__nc1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nc1_size <= 1) __privtrans->__nc1_size = 1; |
|
23194
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
23196
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
23197
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
23202
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
23203
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
23205
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
23207
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__k2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__k2_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
23208
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
23212
|
0 |
0 |
if(((__privtrans->pdls[6]))->ndims < 1) { |
|
23213
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nc2_size <= 1) __privtrans->__nc2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nc2_size <= 1) __privtrans->__nc2_size = 1; |
|
23215
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
23217
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nc2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nc2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
23218
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
23223
|
0 |
0 |
if(!__creating[7]) { |
|
23224
|
0 |
0 |
if(((__privtrans->pdls[7]))->ndims < 2) { |
|
23225
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
23226
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
23228
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
23230
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
23231
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
23235
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__k2_size == 1)) { |
|
23237
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__k2_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__k2_size != ((__privtrans->pdls[7]))->dims[1]) { |
|
23238
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[1] != 1) { |
|
23250
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23251
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
23257
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23258
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
23264
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23265
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
23271
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23272
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
23278
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23279
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
23285
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23286
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
23292
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23293
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
23299
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
23300
|
0 |
0 |
!__creating[7] && |
|
23301
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
23307
|
0 |
0 |
if (hdrp) { |
|
23308
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
23316
|
0 |
0 |
PUSHMARK(SP) ; |
|
23317
|
0 |
0 |
XPUSHs( hdrp ); |
|
23321
|
0 |
0 |
if(count != 1) |
|
23326
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
23330
|
0 |
0 |
FREETMPS ; |
|
23336
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
23337
|
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) |
|
23339
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
23343
|
0 |
0 |
if(propagate_hdrcpy) |
|
23346
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
23350
|
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) |
|
23352
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
23354
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
23356
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
23358
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
23360
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
23362
|
0 |
0 |
__privtrans->__inc_clens1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clens1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clens1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
23364
|
0 |
0 |
__privtrans->__inc_crowids1_nc1 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_crowids1_nc1 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
23366
|
0 |
0 |
__privtrans->__inc_clens2_k2 = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clens2_k2 = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clens2_k2 = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
23368
|
0 |
0 |
__privtrans->__inc_crowids2_nc2 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_crowids2_nc2 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
23370
|
0 |
0 |
__privtrans->__inc_dist_k1 = PDL_REPRINC(__privtrans->pdls[7],0);if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_dist_k1 = PDL_REPRINC(__privtrans->pdls[7],0);if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_dist_k1 = PDL_REPRINC(__privtrans->pdls[7],0);if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1) |
|
23372
|
0 |
0 |
__privtrans->__inc_dist_k2 = PDL_REPRINC(__privtrans->pdls[7],1); __privtrans->__ddone = 1; |
|
23392
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
23396
|
0 |
0 |
if(__copy->__ddone) { |
|
23415
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23418
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23421
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23424
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23427
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23430
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23433
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23436
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23458
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
23488
|
0 |
0 |
for( __tind2 = 0 ; |
|
23501
|
0 |
0 |
for( __tind1 = 0 ; |
|
23518
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
23521
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
23522
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
23523
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
23526
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
23528
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
23542
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
23544
|
0 |
0 |
if (datapp) free(datapp); |
|
23545
|
0 |
0 |
if (maskpp) free(maskpp); |
|
23548
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23551
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23554
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23557
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23560
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23563
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23566
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23569
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23591
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
23621
|
0 |
0 |
for( __tind2 = 0 ; |
|
23634
|
0 |
0 |
for( __tind1 = 0 ; |
|
23651
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
23654
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
23655
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
23656
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
23659
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
23661
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
23675
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
23677
|
0 |
0 |
if (datapp) free(datapp); |
|
23678
|
0 |
0 |
if (maskpp) free(maskpp); |
|
23681
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23684
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23687
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23690
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23693
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23696
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23699
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23702
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23724
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
23754
|
0 |
0 |
for( __tind2 = 0 ; |
|
23767
|
0 |
0 |
for( __tind1 = 0 ; |
|
23784
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
23787
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
23788
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
23789
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
23792
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
23794
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
23808
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
23810
|
0 |
0 |
if (datapp) free(datapp); |
|
23811
|
0 |
0 |
if (maskpp) free(maskpp); |
|
23814
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23817
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23820
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23823
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23826
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23829
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23832
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23835
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23857
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
23887
|
0 |
0 |
for( __tind2 = 0 ; |
|
23900
|
0 |
0 |
for( __tind1 = 0 ; |
|
23917
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
23920
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
23921
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
23922
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
23925
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
23927
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
23941
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
23943
|
0 |
0 |
if (datapp) free(datapp); |
|
23944
|
0 |
0 |
if (maskpp) free(maskpp); |
|
23947
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
23950
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
23953
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
23956
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
23959
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
23962
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
23965
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
23968
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
23990
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
24020
|
0 |
0 |
for( __tind2 = 0 ; |
|
24033
|
0 |
0 |
for( __tind1 = 0 ; |
|
24050
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
24053
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
24054
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
24055
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
24058
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
24060
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
24074
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
24076
|
0 |
0 |
if (datapp) free(datapp); |
|
24077
|
0 |
0 |
if (maskpp) free(maskpp); |
|
24080
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24083
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24086
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24089
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24092
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24095
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24098
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24101
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24123
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
24153
|
0 |
0 |
for( __tind2 = 0 ; |
|
24166
|
0 |
0 |
for( __tind1 = 0 ; |
|
24183
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
24186
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
24187
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
24188
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
24191
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
24193
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
24207
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
24209
|
0 |
0 |
if (datapp) free(datapp); |
|
24210
|
0 |
0 |
if (maskpp) free(maskpp); |
|
24213
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24216
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24219
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24222
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24225
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24228
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24231
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24234
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24256
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
24286
|
0 |
0 |
for( __tind2 = 0 ; |
|
24299
|
0 |
0 |
for( __tind1 = 0 ; |
|
24316
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
24319
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
24320
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
24321
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
24324
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
24326
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
24340
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
24342
|
0 |
0 |
if (datapp) free(datapp); |
|
24343
|
0 |
0 |
if (maskpp) free(maskpp); |
|
24346
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24349
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24352
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24355
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * clens1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24358
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24361
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * clens2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24364
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24367
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * dist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24389
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
24419
|
0 |
0 |
for( __tind2 = 0 ; |
|
24432
|
0 |
0 |
for( __tind1 = 0 ; |
|
24449
|
0 |
0 |
for(k1=0; k1<(__k1_size); k1++) { |
|
24452
|
0 |
0 |
for(k2=0; k2<(__k2_size); k2++) { |
|
24453
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
|
0 |
0 |
(dist_datap)[0+(__inc_dist_k1*PP_INDTERM(__privtrans->__k1_size, k1))+(__inc_dist_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
24454
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
|
0 |
0 |
(clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") , (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") , |
|
24457
|
0 |
0 |
crowids2p += (clens2_datap)[0+(__inc_clens2_k2*PP_INDTERM(__privtrans->__k2_size, k2))] PDL_COMMENT("ACCESS()") ; |
|
24459
|
0 |
0 |
crowids1p += (clens1_datap)[0+(__inc_clens1_k1*PP_INDTERM(__privtrans->__k1_size, k1))] PDL_COMMENT("ACCESS()") ; |
|
24473
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
24475
|
0 |
0 |
if (datapp) free(datapp); |
|
24476
|
0 |
0 |
if (maskpp) free(maskpp); |
|
24495
|
0 |
0 |
if(__privtrans->__ddone) { |
|
24544
|
0 |
0 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
|
0 |
0 |
__creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]); |
|
24550
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24553
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24556
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24559
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24562
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24565
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24568
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24571
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24574
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24577
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24595
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24598
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24601
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24604
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24607
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24610
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24613
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24616
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24619
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24622
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24640
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24643
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24646
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24649
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24652
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24655
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24658
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24661
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24664
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24667
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24685
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24688
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24691
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24694
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24697
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24700
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24703
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24706
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24709
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24712
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24730
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24733
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24736
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24739
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24742
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24745
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24748
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24751
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24754
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24757
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24775
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24778
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24781
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24784
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24787
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24790
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24793
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24796
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24799
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24802
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24820
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24823
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24826
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24829
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24832
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24835
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24838
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24841
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24844
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24847
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24865
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
24868
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
24871
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
24874
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
24877
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
24880
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
24883
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
24886
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
24889
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
24892
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
24927
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
24928
|
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; |
|
24929
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
24931
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
24933
|
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]) { |
|
24934
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
24938
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
24940
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
24941
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
24946
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
24947
|
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; |
|
24948
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
24950
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
24952
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
24953
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
24957
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
24959
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
24960
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
24965
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
24966
|
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; |
|
24968
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
24970
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
24971
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
24976
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
24977
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__k1_size <= 1) __privtrans->__k1_size = 1; |
|
24979
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k1_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size == 1)) { |
|
24981
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__k1_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
24982
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
24986
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 1) { |
|
24987
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nc1_size <= 1) __privtrans->__nc1_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nc1_size <= 1) __privtrans->__nc1_size = 1; |
|
24989
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc1_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size == 1)) { |
|
24991
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nc1_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
24992
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
24997
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 1) { |
|
24998
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
25000
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
25002
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
25003
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
25007
|
0 |
0 |
if(((__privtrans->pdls[6]))->ndims < 1) { |
|
25008
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__k2_size <= 1) __privtrans->__k2_size = 1; |
|
25010
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k2_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k2_size == 1)) { |
|
25012
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__k2_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
25013
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
25017
|
0 |
0 |
if(((__privtrans->pdls[7]))->ndims < 1) { |
|
25018
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__nc2_size <= 1) __privtrans->__nc2_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__nc2_size <= 1) __privtrans->__nc2_size = 1; |
|
25020
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nc2_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nc2_size == 1)) { |
|
25022
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nc2_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nc2_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
25023
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
25028
|
0 |
0 |
if(((__privtrans->pdls[8]))->ndims < 1) { |
|
25029
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
25031
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
25033
|
0 |
0 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[8]))->dims[0]) { |
|
25034
|
0 |
0 |
if(((__privtrans->pdls[8]))->dims[0] != 1) { |
|
25038
|
0 |
0 |
if(!__creating[9]) { |
|
25039
|
0 |
0 |
if(((__privtrans->pdls[9]))->ndims < 1) { |
|
25040
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__ncmps_size <= 1) __privtrans->__ncmps_size = 1; |
|
25042
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__ncmps_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__ncmps_size == 1)) { |
|
25044
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__ncmps_size != ((__privtrans->pdls[9]))->dims[0]) { |
|
25045
|
0 |
0 |
if(((__privtrans->pdls[9]))->dims[0] != 1) { |
|
25057
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25058
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
25064
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25065
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
25071
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25072
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
25078
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25079
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
25085
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25086
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
25092
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25093
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
25099
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25100
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
25106
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25107
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
25113
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25114
|
0 |
0 |
__privtrans->pdls[8]->hdrsv && |
|
25120
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
25121
|
0 |
0 |
!__creating[9] && |
|
25122
|
0 |
0 |
__privtrans->pdls[9]->hdrsv && |
|
25128
|
0 |
0 |
if (hdrp) { |
|
25129
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
25137
|
0 |
0 |
PUSHMARK(SP) ; |
|
25138
|
0 |
0 |
XPUSHs( hdrp ); |
|
25142
|
0 |
0 |
if(count != 1) |
|
25147
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
25151
|
0 |
0 |
FREETMPS ; |
|
25157
|
0 |
0 |
if ( __privtrans->pdls[9]->hdrsv != hdrp ){ |
|
25158
|
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) |
|
25160
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
25164
|
0 |
0 |
if(propagate_hdrcpy) |
|
25167
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
25171
|
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) |
|
25173
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
25175
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
25177
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
25179
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
25181
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
25183
|
0 |
0 |
__privtrans->__inc_coffsets1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_coffsets1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_coffsets1_k1 = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
25185
|
0 |
0 |
__privtrans->__inc_crowids1_nc1 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_crowids1_nc1 = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
25187
|
0 |
0 |
__privtrans->__inc_cwhich1_ncmps = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cwhich1_ncmps = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cwhich1_ncmps = PDL_REPRINC(__privtrans->pdls[5],0);if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
25189
|
0 |
0 |
__privtrans->__inc_coffsets2_k2 = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_coffsets2_k2 = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_coffsets2_k2 = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
25191
|
0 |
0 |
__privtrans->__inc_crowids2_nc2 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_crowids2_nc2 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1) |
|
25193
|
0 |
0 |
__privtrans->__inc_cwhich2_ncmps = PDL_REPRINC(__privtrans->pdls[8],0);if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cwhich2_ncmps = PDL_REPRINC(__privtrans->pdls[8],0);if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cwhich2_ncmps = PDL_REPRINC(__privtrans->pdls[8],0);if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1) |
|
25195
|
0 |
0 |
__privtrans->__inc_dists_ncmps = PDL_REPRINC(__privtrans->pdls[9],0); __privtrans->__ddone = 1; |
|
25215
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
25219
|
0 |
0 |
if(__copy->__ddone) { |
|
25237
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
25240
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
25243
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
25246
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
25249
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
25252
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
25255
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
25258
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
25261
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
25264
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
25286
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
25322
|
0 |
0 |
for( __tind2 = 0 ; |
|
25337
|
0 |
0 |
for( __tind1 = 0 ; |
|
25355
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
25356
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25357
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25360
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
25361
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
25362
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
25363
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
25367
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
25386
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
25388
|
0 |
0 |
if (datapp) free(datapp); |
|
25389
|
0 |
0 |
if (maskpp) free(maskpp); |
|
25392
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
25395
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
25398
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
25401
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
25404
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
25407
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
25410
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
25413
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
25416
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
25419
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
25441
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
25477
|
0 |
0 |
for( __tind2 = 0 ; |
|
25492
|
0 |
0 |
for( __tind1 = 0 ; |
|
25510
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
25511
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25512
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25515
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
25516
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
25517
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
25518
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
25522
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
25541
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
25543
|
0 |
0 |
if (datapp) free(datapp); |
|
25544
|
0 |
0 |
if (maskpp) free(maskpp); |
|
25547
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
25550
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
25553
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
25556
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
25559
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
25562
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
25565
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
25568
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
25571
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
25574
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
25596
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
25632
|
0 |
0 |
for( __tind2 = 0 ; |
|
25647
|
0 |
0 |
for( __tind1 = 0 ; |
|
25665
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
25666
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25667
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25670
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
25671
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
25672
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
25673
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
25677
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
25696
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
25698
|
0 |
0 |
if (datapp) free(datapp); |
|
25699
|
0 |
0 |
if (maskpp) free(maskpp); |
|
25702
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
25705
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
25708
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
25711
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
25714
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
25717
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
25720
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
25723
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
25726
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
25729
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
25751
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
25787
|
0 |
0 |
for( __tind2 = 0 ; |
|
25802
|
0 |
0 |
for( __tind1 = 0 ; |
|
25820
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
25821
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25822
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25825
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
25826
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
25827
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
25828
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
25832
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
25851
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
25853
|
0 |
0 |
if (datapp) free(datapp); |
|
25854
|
0 |
0 |
if (maskpp) free(maskpp); |
|
25857
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
25860
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
25863
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
25866
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
25869
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
25872
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
25875
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
25878
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
25881
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
25884
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
25906
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
25942
|
0 |
0 |
for( __tind2 = 0 ; |
|
25957
|
0 |
0 |
for( __tind1 = 0 ; |
|
25975
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
25976
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25977
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
25980
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
25981
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
25982
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
25983
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
25987
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
26006
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
26008
|
0 |
0 |
if (datapp) free(datapp); |
|
26009
|
0 |
0 |
if (maskpp) free(maskpp); |
|
26012
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26015
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26018
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26021
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26024
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26027
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
26030
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
26033
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
26036
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
26039
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
26061
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
26097
|
0 |
0 |
for( __tind2 = 0 ; |
|
26112
|
0 |
0 |
for( __tind1 = 0 ; |
|
26130
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
26131
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26132
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26135
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
26136
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
26137
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
26138
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
26142
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
26161
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
26163
|
0 |
0 |
if (datapp) free(datapp); |
|
26164
|
0 |
0 |
if (maskpp) free(maskpp); |
|
26167
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26170
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26173
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26176
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26179
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26182
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
26185
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
26188
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
26191
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
26194
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
26216
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
26252
|
0 |
0 |
for( __tind2 = 0 ; |
|
26267
|
0 |
0 |
for( __tind1 = 0 ; |
|
26285
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
26286
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26287
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26290
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
26291
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
26292
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
26293
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
26297
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
26316
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
26318
|
0 |
0 |
if (datapp) free(datapp); |
|
26319
|
0 |
0 |
if (maskpp) free(maskpp); |
|
26322
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26325
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26328
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26331
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * coffsets1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26334
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * crowids1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26337
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cwhich1_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
26340
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * coffsets2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
26343
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Long * crowids2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
26346
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
|
0 |
0 |
PDL_Long * cwhich2_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8])))); |
|
26349
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
|
0 |
0 |
PDL_Double * dists_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9])))); |
|
26371
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
26407
|
0 |
0 |
for( __tind2 = 0 ; |
|
26422
|
0 |
0 |
for( __tind1 = 0 ; |
|
26440
|
0 |
0 |
for(ncmps=0; ncmps<(__ncmps_size); ncmps++) { |
|
26441
|
0 |
0 |
int c1 = (cwhich1_datap)[0+(__inc_cwhich1_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26442
|
0 |
0 |
int c2 = (cwhich2_datap)[0+(__inc_cwhich2_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") ; |
|
26445
|
0 |
0 |
int beg1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, c1))] PDL_COMMENT("ACCESS()") ; |
|
26446
|
0 |
0 |
int beg2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, c2))] PDL_COMMENT("ACCESS()") ; |
|
26447
|
0 |
0 |
int len1 = (coffsets1_datap)[0+(__inc_coffsets1_k1*PP_INDTERM(__privtrans->__k1_size, succ_c1))] PDL_COMMENT("ACCESS()") - beg1; |
|
26448
|
0 |
0 |
int len2 = (coffsets2_datap)[0+(__inc_coffsets2_k2*PP_INDTERM(__privtrans->__k2_size, succ_c2))] PDL_COMMENT("ACCESS()") - beg2; |
|
26452
|
0 |
0 |
(dists_datap)[0+(__inc_dists_ncmps*PP_INDTERM(__privtrans->__ncmps_size, ncmps))] PDL_COMMENT("ACCESS()") = clusterdistance(__privtrans->__n_size, __privtrans->__d_size, datapp, maskpp, weight_datap, |
|
26471
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
26473
|
0 |
0 |
if (datapp) free(datapp); |
|
26474
|
0 |
0 |
if (maskpp) free(maskpp); |
|
26493
|
0 |
0 |
if(__privtrans->__ddone) { |
|
26532
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
|
0 |
0 |
__creating[3] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[3]); |
|
26533
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
|
0 |
0 |
__creating[4] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[4]); |
|
26539
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26542
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26545
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26548
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26551
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26567
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26570
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26573
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26576
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26579
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26595
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26598
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26601
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26604
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26607
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26623
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26626
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26629
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26632
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26635
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26651
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26654
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26657
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26660
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26663
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26679
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26682
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26685
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26688
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26691
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26707
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26710
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26713
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26716
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26719
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26735
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
26738
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
26741
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
26744
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
26747
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
26780
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
26781
|
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; |
|
26782
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
26784
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
26786
|
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]) { |
|
26787
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
26791
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
26793
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
26794
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
26798
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
26799
|
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; |
|
26800
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
26802
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
26804
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
26805
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
26809
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
26811
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
26812
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
26816
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 2) { |
|
26817
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
26818
|
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; |
|
26820
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
26822
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
26823
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
26827
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
26829
|
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]) { |
|
26830
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[1] != 1) { |
|
26834
|
0 |
0 |
if(!__creating[3]) { |
|
26835
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 2) { |
|
26836
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
26837
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
26839
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
26841
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
26842
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
26846
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
26848
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[3]))->dims[1]) { |
|
26849
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[1] != 1) { |
|
26856
|
0 |
0 |
}if(!__creating[4]) { |
|
26857
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 2) { |
|
26858
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
26859
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
26861
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
26863
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
26864
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
26868
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
26870
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
26871
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[1] != 1) { |
|
26883
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
26884
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
26890
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
26891
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
26897
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
26898
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
26904
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
26905
|
0 |
0 |
!__creating[3] && |
|
26906
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
26912
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
26913
|
0 |
0 |
!__creating[4] && |
|
26914
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
26920
|
0 |
0 |
if (hdrp) { |
|
26921
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
26929
|
0 |
0 |
PUSHMARK(SP) ; |
|
26930
|
0 |
0 |
XPUSHs( hdrp ); |
|
26934
|
0 |
0 |
if(count != 1) |
|
26939
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
26943
|
0 |
0 |
FREETMPS ; |
|
26949
|
0 |
0 |
if ( __privtrans->pdls[3]->hdrsv != hdrp ){ |
|
26950
|
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) |
|
26952
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
26956
|
0 |
0 |
if(propagate_hdrcpy) |
|
26958
|
0 |
0 |
if ( __privtrans->pdls[4]->hdrsv != hdrp ){ |
|
26959
|
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) |
|
26961
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
26965
|
0 |
0 |
if(propagate_hdrcpy) |
|
26968
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
26972
|
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) |
|
26974
|
0 |
0 |
__privtrans->__inc_data_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
26976
|
0 |
0 |
__privtrans->__inc_data_n = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = PDL_REPRINC(__privtrans->pdls[0],1);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
26978
|
0 |
0 |
__privtrans->__inc_mask_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
26980
|
0 |
0 |
__privtrans->__inc_mask_n = PDL_REPRINC(__privtrans->pdls[1],1);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = PDL_REPRINC(__privtrans->pdls[1],1);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = PDL_REPRINC(__privtrans->pdls[1],1);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
26982
|
0 |
0 |
__privtrans->__inc_clusterwts_k = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterwts_k = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterwts_k = PDL_REPRINC(__privtrans->pdls[2],0);if(__privtrans->pdls[2]->ndims <= 1 || __privtrans->pdls[2]->dims[1] <= 1) |
|
26984
|
0 |
0 |
__privtrans->__inc_clusterwts_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterwts_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterwts_n = PDL_REPRINC(__privtrans->pdls[2],1);if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
26986
|
0 |
0 |
__privtrans->__inc_cdata_d = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_d = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_d = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[3]->ndims <= 1 || __privtrans->pdls[3]->dims[1] <= 1) |
|
26988
|
0 |
0 |
__privtrans->__inc_cdata_k = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_k = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_k = PDL_REPRINC(__privtrans->pdls[3],1);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
26990
|
0 |
0 |
__privtrans->__inc_cmask_d = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cmask_d = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cmask_d = PDL_REPRINC(__privtrans->pdls[4],0);if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
26992
|
0 |
0 |
__privtrans->__inc_cmask_k = PDL_REPRINC(__privtrans->pdls[4],1); __privtrans->__ddone = 1; |
|
27012
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
27016
|
0 |
0 |
if(__copy->__ddone) { |
|
27036
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27039
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27042
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27045
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27048
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27053
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27074
|
0 |
0 |
for( __tind2 = 0 ; |
|
27084
|
0 |
0 |
for( __tind1 = 0 ; |
|
27107
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27109
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27112
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27113
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27115
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27118
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27131
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_S: { |
|
27132
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27135
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27138
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27141
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27144
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27149
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27170
|
0 |
0 |
for( __tind2 = 0 ; |
|
27180
|
0 |
0 |
for( __tind1 = 0 ; |
|
27203
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27205
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27208
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27209
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27211
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27214
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27227
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_US: { |
|
27228
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27231
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27234
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27237
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27240
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27245
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27266
|
0 |
0 |
for( __tind2 = 0 ; |
|
27276
|
0 |
0 |
for( __tind1 = 0 ; |
|
27299
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27301
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27304
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27305
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27307
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27310
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27323
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_L: { |
|
27324
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27327
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27330
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27333
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27336
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27341
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27362
|
0 |
0 |
for( __tind2 = 0 ; |
|
27372
|
0 |
0 |
for( __tind1 = 0 ; |
|
27395
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27397
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27400
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27401
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27403
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27406
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27419
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_IND: { |
|
27420
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27423
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27426
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27429
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27432
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27437
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27458
|
0 |
0 |
for( __tind2 = 0 ; |
|
27468
|
0 |
0 |
for( __tind1 = 0 ; |
|
27491
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27493
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27496
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27497
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27499
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27502
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27515
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_LL: { |
|
27516
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27519
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27522
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27525
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27528
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27533
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27554
|
0 |
0 |
for( __tind2 = 0 ; |
|
27564
|
0 |
0 |
for( __tind1 = 0 ; |
|
27587
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27589
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27592
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27593
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27595
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27598
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27611
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_F: { |
|
27612
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27615
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27618
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27621
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27624
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27629
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27650
|
0 |
0 |
for( __tind2 = 0 ; |
|
27660
|
0 |
0 |
for( __tind1 = 0 ; |
|
27683
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27685
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27688
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27689
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27691
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27694
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27707
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: { |
|
27708
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27711
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27714
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * clusterwts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27717
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27720
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27725
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
27746
|
0 |
0 |
for( __tind2 = 0 ; |
|
27756
|
0 |
0 |
for( __tind1 = 0 ; |
|
27779
|
0 |
0 |
for(d=0; d<(__d_size); d++) { |
|
27781
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
27784
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
27785
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if ((mask_datap)[0+(__inc_mask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_mask_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ) { |
|
27787
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
|
0 |
0 |
(cdata_datap)[0+(__inc_cdata_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cdata_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") += (clusterwts_datap)[0+(__inc_clusterwts_k*PP_INDTERM(__privtrans->__k_size, k))+(__inc_clusterwts_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") * (data_datap)[0+(__inc_data_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_data_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
27790
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
|
0 |
0 |
(cmask_datap)[0+(__inc_cmask_d*PP_INDTERM(__privtrans->__d_size, d))+(__inc_cmask_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = cmaskdk; |
|
27803
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;} |
|
27820
|
0 |
0 |
if(__privtrans->__ddone) { |
|
27863
|
0 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
|
0 |
0 |
__creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]); |
|
27864
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
|
0 |
0 |
__creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]); |
|
27870
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27873
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27876
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27879
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27882
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27885
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
27888
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
27891
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
27909
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27912
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27915
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27918
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27921
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27924
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
27927
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
27930
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
27948
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27951
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27954
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27957
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27960
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
27963
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
27966
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
27969
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
27987
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
27990
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
27993
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
27996
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
27999
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28002
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28005
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28008
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28026
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28029
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28032
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28035
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28038
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28041
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28044
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28047
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28065
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28068
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28071
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28074
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28077
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28080
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28083
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28086
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28104
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28107
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28110
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28113
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28116
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28119
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28122
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28125
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28143
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28146
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28149
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28152
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28155
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28158
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28161
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28164
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28199
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 2) { |
|
28200
|
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; |
|
28201
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
28203
|
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)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
28205
|
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]) { |
|
28206
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
28210
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
28212
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[0]))->dims[1]) { |
|
28213
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[1] != 1) { |
|
28218
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 2) { |
|
28219
|
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; |
|
28220
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 2 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
28222
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
28224
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
28225
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
28229
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size == 1)) { |
|
28231
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 1 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[1]) { |
|
28232
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[1] != 1) { |
|
28237
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
28238
|
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; |
|
28240
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
28242
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
28243
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
28248
|
0 |
0 |
if(((__privtrans->pdls[3]))->ndims < 1) { |
|
28249
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
28251
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
28253
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[3]))->dims[0]) { |
|
28254
|
0 |
0 |
if(((__privtrans->pdls[3]))->dims[0] != 1) { |
|
28258
|
0 |
0 |
if(((__privtrans->pdls[4]))->ndims < 2) { |
|
28259
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__d_size <= 1) __privtrans->__d_size = 1; |
|
28260
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[4]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
28262
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
28264
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[4]))->dims[0]) { |
|
28265
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[0] != 1) { |
|
28269
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
28271
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[4]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[4]))->dims[1]) { |
|
28272
|
0 |
0 |
if(((__privtrans->pdls[4]))->dims[1] != 1) { |
|
28277
|
0 |
0 |
if(((__privtrans->pdls[5]))->ndims < 2) { |
|
28278
|
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; |
|
28279
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[5]))->ndims < 2 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
28281
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__d_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size == 1)) { |
|
28283
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__d_size != ((__privtrans->pdls[5]))->dims[0]) { |
|
28284
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[0] != 1) { |
|
28288
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size == 1)) { |
|
28290
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[5]))->dims[1]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[5]))->ndims > 1 && __privtrans->__k_size != ((__privtrans->pdls[5]))->dims[1]) { |
|
28291
|
0 |
0 |
if(((__privtrans->pdls[5]))->dims[1] != 1) { |
|
28296
|
0 |
0 |
if(!__creating[6]) { |
|
28297
|
0 |
0 |
if(((__privtrans->pdls[6]))->ndims < 1) { |
|
28298
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
28300
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
28302
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[6]))->dims[0]) { |
|
28303
|
0 |
0 |
if(((__privtrans->pdls[6]))->dims[0] != 1) { |
|
28310
|
0 |
0 |
}if(!__creating[7]) { |
|
28311
|
0 |
0 |
if(((__privtrans->pdls[7]))->ndims < 1) { |
|
28312
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__nr_size <= 1) __privtrans->__nr_size = 1; |
|
28314
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__nr_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nr_size == 1)) { |
|
28316
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__nr_size != ((__privtrans->pdls[7]))->dims[0]) { |
|
28317
|
0 |
0 |
if(((__privtrans->pdls[7]))->dims[0] != 1) { |
|
28329
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28330
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
28336
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28337
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
28343
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28344
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
28350
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28351
|
0 |
0 |
__privtrans->pdls[3]->hdrsv && |
|
28357
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28358
|
0 |
0 |
__privtrans->pdls[4]->hdrsv && |
|
28364
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28365
|
0 |
0 |
__privtrans->pdls[5]->hdrsv && |
|
28371
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28372
|
0 |
0 |
!__creating[6] && |
|
28373
|
0 |
0 |
__privtrans->pdls[6]->hdrsv && |
|
28379
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
28380
|
0 |
0 |
!__creating[7] && |
|
28381
|
0 |
0 |
__privtrans->pdls[7]->hdrsv && |
|
28387
|
0 |
0 |
if (hdrp) { |
|
28388
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
28396
|
0 |
0 |
PUSHMARK(SP) ; |
|
28397
|
0 |
0 |
XPUSHs( hdrp ); |
|
28401
|
0 |
0 |
if(count != 1) |
|
28406
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
28410
|
0 |
0 |
FREETMPS ; |
|
28416
|
0 |
0 |
if ( __privtrans->pdls[6]->hdrsv != hdrp ){ |
|
28417
|
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) |
|
28419
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
28423
|
0 |
0 |
if(propagate_hdrcpy) |
|
28425
|
0 |
0 |
if ( __privtrans->pdls[7]->hdrsv != hdrp ){ |
|
28426
|
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) |
|
28428
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
28432
|
0 |
0 |
if(propagate_hdrcpy) |
|
28435
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
28439
|
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) |
|
28441
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_d = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[0]->ndims <= 1 || __privtrans->pdls[0]->dims[1] <= 1) |
|
28443
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_data_n = __privtrans->pdls[0]->dimincs[1];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
28445
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_d = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 1 || __privtrans->pdls[1]->dims[1] <= 1) |
|
28447
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_mask_n = __privtrans->pdls[1]->dimincs[1];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
28449
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_weight_d = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1) |
|
28451
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_rowids_nr = PDL_REPRINC(__privtrans->pdls[3],0);if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1) |
|
28453
|
0 |
0 |
__privtrans->__inc_cdata_d = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_d = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 1 || __privtrans->pdls[4]->dims[1] <= 1) |
|
28455
|
0 |
0 |
__privtrans->__inc_cdata_k = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cdata_k = __privtrans->pdls[4]->dimincs[1];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1) |
|
28457
|
0 |
0 |
__privtrans->__inc_cmask_d = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 1 || __privtrans->pdls[5]->dims[1] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cmask_d = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 1 || __privtrans->pdls[5]->dims[1] <= 1) |
|
28459
|
0 |
0 |
__privtrans->__inc_cmask_k = __privtrans->pdls[5]->dimincs[1];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cmask_k = __privtrans->pdls[5]->dimincs[1];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1) |
|
28461
|
0 |
0 |
__privtrans->__inc_clusterids_nr = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_nr = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_clusterids_nr = PDL_REPRINC(__privtrans->pdls[6],0);if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1) |
|
28463
|
0 |
0 |
__privtrans->__inc_cdist_nr = PDL_REPRINC(__privtrans->pdls[7],0); __privtrans->__ddone = 1; |
|
28483
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
28487
|
0 |
0 |
if(__copy->__ddone) { |
|
28505
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28508
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28511
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28514
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28517
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28520
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28523
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28526
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28552
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
28582
|
0 |
0 |
for( __tind2 = 0 ; |
|
28595
|
0 |
0 |
for( __tind1 = 0 ; |
|
28619
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
28620
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
28631
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
28637
|
0 |
0 |
if (dist < dbest) { |
|
28643
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
28644
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
28658
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
28660
|
0 |
0 |
if (datapp) free(datapp); |
|
28661
|
0 |
0 |
if (maskpp) free(maskpp); |
|
28662
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
28663
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
28666
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28669
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28672
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28675
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28678
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28681
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28684
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28687
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28713
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
28743
|
0 |
0 |
for( __tind2 = 0 ; |
|
28756
|
0 |
0 |
for( __tind1 = 0 ; |
|
28780
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
28781
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
28792
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
28798
|
0 |
0 |
if (dist < dbest) { |
|
28804
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
28805
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
28819
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
28821
|
0 |
0 |
if (datapp) free(datapp); |
|
28822
|
0 |
0 |
if (maskpp) free(maskpp); |
|
28823
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
28824
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
28827
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28830
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28833
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28836
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
28839
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
28842
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
28845
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
28848
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
28874
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
28904
|
0 |
0 |
for( __tind2 = 0 ; |
|
28917
|
0 |
0 |
for( __tind1 = 0 ; |
|
28941
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
28942
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
28953
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
28959
|
0 |
0 |
if (dist < dbest) { |
|
28965
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
28966
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
28980
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
28982
|
0 |
0 |
if (datapp) free(datapp); |
|
28983
|
0 |
0 |
if (maskpp) free(maskpp); |
|
28984
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
28985
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
28988
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
28991
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
28994
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
28997
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
29000
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
29003
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
29006
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
29009
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
29035
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
29065
|
0 |
0 |
for( __tind2 = 0 ; |
|
29078
|
0 |
0 |
for( __tind1 = 0 ; |
|
29102
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
29103
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
29114
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
29120
|
0 |
0 |
if (dist < dbest) { |
|
29126
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
29127
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
29141
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
29143
|
0 |
0 |
if (datapp) free(datapp); |
|
29144
|
0 |
0 |
if (maskpp) free(maskpp); |
|
29145
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
29146
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
29149
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29152
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29155
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29158
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
29161
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
29164
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
29167
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
29170
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
29196
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
29226
|
0 |
0 |
for( __tind2 = 0 ; |
|
29239
|
0 |
0 |
for( __tind1 = 0 ; |
|
29263
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
29264
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
29275
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
29281
|
0 |
0 |
if (dist < dbest) { |
|
29287
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
29288
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
29302
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
29304
|
0 |
0 |
if (datapp) free(datapp); |
|
29305
|
0 |
0 |
if (maskpp) free(maskpp); |
|
29306
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
29307
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
29310
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29313
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29316
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29319
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
29322
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
29325
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
29328
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
29331
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
29357
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
29387
|
0 |
0 |
for( __tind2 = 0 ; |
|
29400
|
0 |
0 |
for( __tind1 = 0 ; |
|
29424
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
29425
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
29436
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
29442
|
0 |
0 |
if (dist < dbest) { |
|
29448
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
29449
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
29463
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
29465
|
0 |
0 |
if (datapp) free(datapp); |
|
29466
|
0 |
0 |
if (maskpp) free(maskpp); |
|
29467
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
29468
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
29471
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29474
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29477
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29480
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
29483
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
29486
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
29489
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
29492
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
29518
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
29548
|
0 |
0 |
for( __tind2 = 0 ; |
|
29561
|
0 |
0 |
for( __tind1 = 0 ; |
|
29585
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
29586
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
29597
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
29603
|
0 |
0 |
if (dist < dbest) { |
|
29609
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
29610
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
29624
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
29626
|
0 |
0 |
if (datapp) free(datapp); |
|
29627
|
0 |
0 |
if (maskpp) free(maskpp); |
|
29628
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
29629
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
29632
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Double * data_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29635
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * mask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29638
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Double * weight_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29641
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
|
0 |
0 |
PDL_Long * rowids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3])))); |
|
29644
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
|
0 |
0 |
PDL_Double * cdata_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4])))); |
|
29647
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
|
0 |
0 |
PDL_Long * cmask_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5])))); |
|
29650
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
|
0 |
0 |
PDL_Long * clusterids_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6])))); |
|
29653
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
|
0 |
0 |
PDL_Double * cdist_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7])))); |
|
29679
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
29709
|
0 |
0 |
for( __tind2 = 0 ; |
|
29722
|
0 |
0 |
for( __tind1 = 0 ; |
|
29746
|
0 |
0 |
for(nr=0; nr<(__nr_size); nr++) { |
|
29747
|
0 |
0 |
ni = (rowids_datap)[0+(__inc_rowids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") ; |
|
29758
|
0 |
0 |
for (ki=1; ki < __privtrans->__k_size; ki++) { |
|
29764
|
0 |
0 |
if (dist < dbest) { |
|
29770
|
0 |
0 |
(clusterids_datap)[0+(__inc_clusterids_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = kbest; |
|
29771
|
0 |
0 |
(cdist_datap)[0+(__inc_cdist_nr*PP_INDTERM(__privtrans->__nr_size, nr))] PDL_COMMENT("ACCESS()") = dbest; |
|
29785
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
29787
|
0 |
0 |
if (datapp) free(datapp); |
|
29788
|
0 |
0 |
if (maskpp) free(maskpp); |
|
29789
|
0 |
0 |
if (cdatapp) free(cdatapp); |
|
29790
|
0 |
0 |
if (cmaskpp) free(cmaskpp); |
|
29809
|
0 |
0 |
if(__privtrans->__ddone) { |
|
29845
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
29846
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
29852
|
0 |
0 |
PDL_Byte * protos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * protos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29855
|
0 |
0 |
PDL_Byte * cprotos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * cprotos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29858
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29867
|
0 |
0 |
PDL_Short * protos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * protos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29870
|
0 |
0 |
PDL_Short * cprotos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * cprotos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29873
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29882
|
0 |
0 |
PDL_Ushort * protos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * protos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29885
|
0 |
0 |
PDL_Ushort * cprotos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * cprotos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29888
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29897
|
0 |
0 |
PDL_Long * protos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * protos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
29900
|
0 |
0 |
PDL_Long * cprotos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * cprotos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
29903
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
29929
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
29930
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
29932
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
29934
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[0]))->dims[0]) { |
|
29935
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
29939
|
0 |
0 |
if(!__creating[1]) { |
|
29940
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
29941
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
29943
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
29945
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
29946
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
29953
|
0 |
0 |
}if(!__creating[2]) { |
|
29954
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
29955
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
29957
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
29959
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
29960
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
29972
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
29973
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
29979
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
29980
|
0 |
0 |
!__creating[1] && |
|
29981
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
29987
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
29988
|
0 |
0 |
!__creating[2] && |
|
29989
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
29995
|
0 |
0 |
if (hdrp) { |
|
29996
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
30004
|
0 |
0 |
PUSHMARK(SP) ; |
|
30005
|
0 |
0 |
XPUSHs( hdrp ); |
|
30009
|
0 |
0 |
if(count != 1) |
|
30014
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
30018
|
0 |
0 |
FREETMPS ; |
|
30024
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
30025
|
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) |
|
30027
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
30031
|
0 |
0 |
if(propagate_hdrcpy) |
|
30033
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
30034
|
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) |
|
30036
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
30040
|
0 |
0 |
if(propagate_hdrcpy) |
|
30043
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
30047
|
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) |
|
30049
|
0 |
0 |
__privtrans->__inc_protos_k = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_protos_k = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_protos_k = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
30051
|
0 |
0 |
__privtrans->__inc_cprotos_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cprotos_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cprotos_k = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
30053
|
0 |
0 |
__privtrans->__inc_otmp_n = PDL_REPRINC(__privtrans->pdls[2],0); __privtrans->__ddone = 1; |
|
30073
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
30077
|
0 |
0 |
if(__copy->__ddone) { |
|
30096
|
0 |
0 |
PDL_Byte * protos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * protos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30099
|
0 |
0 |
PDL_Byte * cprotos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * cprotos_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30102
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30111
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30117
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30132
|
0 |
0 |
for( __tind2 = 0 ; |
|
30140
|
0 |
0 |
for( __tind1 = 0 ; |
|
30149
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
30151
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
30152
|
0 |
0 |
int protoi = (protos_datap)[0+(__inc_protos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") ; |
|
30153
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
30154
|
0 |
0 |
(cprotos_datap)[0+(__inc_cprotos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = protoi; |
|
30155
|
0 |
0 |
(otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") = 1; |
|
30164
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30167
|
0 |
0 |
PDL_Short * protos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * protos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30170
|
0 |
0 |
PDL_Short * cprotos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * cprotos_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30173
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30182
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30188
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30203
|
0 |
0 |
for( __tind2 = 0 ; |
|
30211
|
0 |
0 |
for( __tind1 = 0 ; |
|
30220
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
30222
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
30223
|
0 |
0 |
int protoi = (protos_datap)[0+(__inc_protos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") ; |
|
30224
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
30225
|
0 |
0 |
(cprotos_datap)[0+(__inc_cprotos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = protoi; |
|
30226
|
0 |
0 |
(otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") = 1; |
|
30235
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30238
|
0 |
0 |
PDL_Ushort * protos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * protos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30241
|
0 |
0 |
PDL_Ushort * cprotos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * cprotos_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30244
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30253
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30259
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30274
|
0 |
0 |
for( __tind2 = 0 ; |
|
30282
|
0 |
0 |
for( __tind1 = 0 ; |
|
30291
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
30293
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
30294
|
0 |
0 |
int protoi = (protos_datap)[0+(__inc_protos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") ; |
|
30295
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
30296
|
0 |
0 |
(cprotos_datap)[0+(__inc_cprotos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = protoi; |
|
30297
|
0 |
0 |
(otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") = 1; |
|
30306
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30309
|
0 |
0 |
PDL_Long * protos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * protos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30312
|
0 |
0 |
PDL_Long * cprotos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * cprotos_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30315
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * otmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30324
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30330
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30345
|
0 |
0 |
for( __tind2 = 0 ; |
|
30353
|
0 |
0 |
for( __tind1 = 0 ; |
|
30362
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
|
0 |
0 |
for(n=0; n<(__n_size); n++) { (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close n") |
|
30364
|
0 |
0 |
for(k=0; k<(__k_size); k++) { |
|
30365
|
0 |
0 |
int protoi = (protos_datap)[0+(__inc_protos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") ; |
|
30366
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
|
0 |
0 |
for (; (otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") ; protoi = (protoi+1)%__privtrans->__n_size) { ; } |
|
30367
|
0 |
0 |
(cprotos_datap)[0+(__inc_cprotos_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = protoi; |
|
30368
|
0 |
0 |
(otmp_datap)[0+(__inc_otmp_n*PP_INDTERM(__privtrans->__n_size, protoi))] PDL_COMMENT("ACCESS()") = 1; |
|
30377
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30396
|
0 |
0 |
if(__privtrans->__ddone) { |
|
30432
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
|
0 |
0 |
__creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]); |
|
30433
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
|
0 |
0 |
__creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]); |
|
30439
|
0 |
0 |
PDL_Byte * part_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * part_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30442
|
0 |
0 |
PDL_Byte * cpart_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * cpart_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30445
|
0 |
0 |
PDL_Byte * ptmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * ptmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30454
|
0 |
0 |
PDL_Short * part_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * part_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30457
|
0 |
0 |
PDL_Short * cpart_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * cpart_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30460
|
0 |
0 |
PDL_Short * ptmp_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * ptmp_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30469
|
0 |
0 |
PDL_Ushort * part_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * part_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30472
|
0 |
0 |
PDL_Ushort * cpart_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * cpart_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30475
|
0 |
0 |
PDL_Ushort * ptmp_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * ptmp_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30484
|
0 |
0 |
PDL_Long * part_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * part_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30487
|
0 |
0 |
PDL_Long * cpart_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * cpart_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30490
|
0 |
0 |
PDL_Long * ptmp_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * ptmp_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30516
|
0 |
0 |
if(((__privtrans->pdls[0]))->ndims < 1) { |
|
30517
|
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; |
|
30519
|
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)) { |
|
30521
|
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]) { |
|
30522
|
0 |
0 |
if(((__privtrans->pdls[0]))->dims[0] != 1) { |
|
30526
|
0 |
0 |
if(!__creating[1]) { |
|
30527
|
0 |
0 |
if(((__privtrans->pdls[1]))->ndims < 1) { |
|
30528
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[1]))->ndims < 1 && __privtrans->__n_size <= 1) __privtrans->__n_size = 1; |
|
30530
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__n_size == -1 || (((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size == 1)) { |
|
30532
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[1]))->ndims > 0 && __privtrans->__n_size != ((__privtrans->pdls[1]))->dims[0]) { |
|
30533
|
0 |
0 |
if(((__privtrans->pdls[1]))->dims[0] != 1) { |
|
30540
|
0 |
0 |
}if(!__creating[2]) { |
|
30541
|
0 |
0 |
if(((__privtrans->pdls[2]))->ndims < 1) { |
|
30542
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
|
0 |
0 |
if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__k_size <= 1) __privtrans->__k_size = 1; |
|
30544
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
|
0 |
0 |
if(__privtrans->__k_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size == 1)) { |
|
30546
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
|
0 |
0 |
} else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__k_size != ((__privtrans->pdls[2]))->dims[0]) { |
|
30547
|
0 |
0 |
if(((__privtrans->pdls[2]))->dims[0] != 1) { |
|
30559
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
30560
|
0 |
0 |
__privtrans->pdls[0]->hdrsv && |
|
30566
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
30567
|
0 |
0 |
!__creating[1] && |
|
30568
|
0 |
0 |
__privtrans->pdls[1]->hdrsv && |
|
30574
|
0 |
0 |
if(!hdrp && |
|
|
0 |
0 |
if(!hdrp && |
|
30575
|
0 |
0 |
!__creating[2] && |
|
30576
|
0 |
0 |
__privtrans->pdls[2]->hdrsv && |
|
30582
|
0 |
0 |
if (hdrp) { |
|
30583
|
0 |
0 |
if(hdrp == &PL_sv_undef) |
|
30591
|
0 |
0 |
PUSHMARK(SP) ; |
|
30592
|
0 |
0 |
XPUSHs( hdrp ); |
|
30596
|
0 |
0 |
if(count != 1) |
|
30601
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
|
0 |
0 |
if(hdr_copy && hdr_copy != &PL_sv_undef) { |
|
30605
|
0 |
0 |
FREETMPS ; |
|
30611
|
0 |
0 |
if ( __privtrans->pdls[1]->hdrsv != hdrp ){ |
|
30612
|
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) |
|
30614
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
30618
|
0 |
0 |
if(propagate_hdrcpy) |
|
30620
|
0 |
0 |
if ( __privtrans->pdls[2]->hdrsv != hdrp ){ |
|
30621
|
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) |
|
30623
|
0 |
0 |
if( hdr_copy != &PL_sv_undef ) |
|
30627
|
0 |
0 |
if(propagate_hdrcpy) |
|
30630
|
0 |
0 |
if(hdr_copy != &PL_sv_undef) |
|
30634
|
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) |
|
30636
|
0 |
0 |
__privtrans->__inc_part_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_part_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_part_n = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1) |
|
30638
|
0 |
0 |
__privtrans->__inc_cpart_n = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cpart_n = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
|
0 |
0 |
__privtrans->__inc_cpart_n = PDL_REPRINC(__privtrans->pdls[1],0);if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1) |
|
30640
|
0 |
0 |
__privtrans->__inc_ptmp_k = PDL_REPRINC(__privtrans->pdls[2],0); __privtrans->__ddone = 1; |
|
30660
|
0 |
0 |
for(i=0; i<__copy->vtable->npdls; i++) |
|
30664
|
0 |
0 |
if(__copy->__ddone) { |
|
30683
|
0 |
0 |
PDL_Byte * part_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Byte * part_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30686
|
0 |
0 |
PDL_Byte * cpart_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Byte * cpart_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30689
|
0 |
0 |
PDL_Byte * ptmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Byte * ptmp_datap = ((PDL_Byte *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30698
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30704
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30719
|
0 |
0 |
for( __tind2 = 0 ; |
|
30727
|
0 |
0 |
for( __tind1 = 0 ; |
|
30737
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
30739
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
30740
|
0 |
0 |
ki = (part_datap)[0+(__inc_part_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
30741
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = ki; |
|
30742
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30745
|
0 |
0 |
for (ki=0; ki < __privtrans->__k_size; ki++) { |
|
30746
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
30748
|
0 |
0 |
kj = (cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
30749
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
30751
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") = ki; |
|
30752
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30753
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") -= 1; |
|
30763
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30766
|
0 |
0 |
PDL_Short * part_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Short * part_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30769
|
0 |
0 |
PDL_Short * cpart_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Short * cpart_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30772
|
0 |
0 |
PDL_Short * ptmp_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Short * ptmp_datap = ((PDL_Short *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30781
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30787
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30802
|
0 |
0 |
for( __tind2 = 0 ; |
|
30810
|
0 |
0 |
for( __tind1 = 0 ; |
|
30820
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
30822
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
30823
|
0 |
0 |
ki = (part_datap)[0+(__inc_part_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
30824
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = ki; |
|
30825
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30828
|
0 |
0 |
for (ki=0; ki < __privtrans->__k_size; ki++) { |
|
30829
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
30831
|
0 |
0 |
kj = (cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
30832
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
30834
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") = ki; |
|
30835
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30836
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") -= 1; |
|
30846
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30849
|
0 |
0 |
PDL_Ushort * part_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Ushort * part_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30852
|
0 |
0 |
PDL_Ushort * cpart_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Ushort * cpart_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30855
|
0 |
0 |
PDL_Ushort * ptmp_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Ushort * ptmp_datap = ((PDL_Ushort *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30864
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30870
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30885
|
0 |
0 |
for( __tind2 = 0 ; |
|
30893
|
0 |
0 |
for( __tind1 = 0 ; |
|
30903
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
30905
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
30906
|
0 |
0 |
ki = (part_datap)[0+(__inc_part_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
30907
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = ki; |
|
30908
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30911
|
0 |
0 |
for (ki=0; ki < __privtrans->__k_size; ki++) { |
|
30912
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
30914
|
0 |
0 |
kj = (cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
30915
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
30917
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") = ki; |
|
30918
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30919
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") -= 1; |
|
30929
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
30932
|
0 |
0 |
PDL_Long * part_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
|
0 |
0 |
PDL_Long * part_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0])))); |
|
30935
|
0 |
0 |
PDL_Long * cpart_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
|
0 |
0 |
PDL_Long * cpart_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1])))); |
|
30938
|
0 |
0 |
PDL_Long * ptmp_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
|
0 |
0 |
PDL_Long * ptmp_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2])))); |
|
30947
|
0 |
0 |
if (__privtrans->__k_size > __privtrans->__n_size) { |
|
30953
|
0 |
0 |
if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return; |
|
30968
|
0 |
0 |
for( __tind2 = 0 ; |
|
30976
|
0 |
0 |
for( __tind1 = 0 ; |
|
30986
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
|
0 |
0 |
for(k=0; k<(__k_size); k++) { (ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, k))] PDL_COMMENT("ACCESS()") = 0; }} PDL_COMMENT("Close k") |
|
30988
|
0 |
0 |
for(n=0; n<(__n_size); n++) { |
|
30989
|
0 |
0 |
ki = (part_datap)[0+(__inc_part_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") ; |
|
30990
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, n))] PDL_COMMENT("ACCESS()") = ki; |
|
30991
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
30994
|
0 |
0 |
for (ki=0; ki < __privtrans->__k_size; ki++) { |
|
30995
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
|
0 |
0 |
if (!(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") ) { |
|
30997
|
0 |
0 |
kj = (cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") ; |
|
30998
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
|
0 |
0 |
if ((ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") > 1) break; |
|
31000
|
0 |
0 |
(cpart_datap)[0+(__inc_cpart_n*PP_INDTERM(__privtrans->__n_size, ni))] PDL_COMMENT("ACCESS()") = ki; |
|
31001
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, ki))] PDL_COMMENT("ACCESS()") += 1; |
|
31002
|
0 |
0 |
(ptmp_datap)[0+(__inc_ptmp_k*PP_INDTERM(__privtrans->__k_size, kj))] PDL_COMMENT("ACCESS()") -= 1; |
|
31012
|
0 |
0 |
} while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); |
|
31031
|
0 |
0 |
if(__privtrans->__ddone) { |
|
31111
|
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))) { |
|
31113
|
2 |
0 |
if (sv_isobject(parent)){ |
|
31115
|
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") |
|
31118
|
0 |
2 |
if (items == 2) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31123
|
2 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31126
|
2 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31130
|
2 |
0 |
if (bless_stash) b_SV = sv_bless(b_SV, bless_stash); |
|
31132
|
0 |
0 |
PUSHMARK(SP); |
|
31133
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31159
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31160
|
2 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_D) {} |
|
31162
|
0 |
2 |
if(PDL_D != a->datatype) { |
|
31164
|
2 |
0 |
}if( (b->state & PDL_NOMYDIMS) && b->trans == NULL ) { |
|
|
2 |
0 |
}if( (b->state & PDL_NOMYDIMS) && b->trans == NULL ) { |
|
31166
|
0 |
0 |
} else if(PDL_D != b->datatype) { |
|
31171
|
0 |
2 |
if (badflag_cache) { |
|
31174
|
2 |
0 |
if (nreturn) { |
|
31175
|
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); |
|
31199
|
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))) { |
|
31201
|
2 |
0 |
if (sv_isobject(parent)){ |
|
31203
|
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") |
|
31206
|
0 |
2 |
if (items == 2) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31211
|
2 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31214
|
2 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31218
|
2 |
0 |
if (bless_stash) b_SV = sv_bless(b_SV, bless_stash); |
|
31220
|
0 |
0 |
PUSHMARK(SP); |
|
31221
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31247
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31248
|
2 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_D) {} |
|
31250
|
0 |
2 |
if(PDL_D != a->datatype) { |
|
31252
|
2 |
0 |
}if( (b->state & PDL_NOMYDIMS) && b->trans == NULL ) { |
|
|
2 |
0 |
}if( (b->state & PDL_NOMYDIMS) && b->trans == NULL ) { |
|
31254
|
0 |
0 |
} else if(PDL_D != b->datatype) { |
|
31259
|
0 |
2 |
if (badflag_cache) { |
|
31262
|
2 |
0 |
if (nreturn) { |
|
31263
|
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); |
|
31292
|
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))) { |
|
31294
|
0 |
0 |
if (sv_isobject(parent)){ |
|
31296
|
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") |
|
31299
|
0 |
0 |
if (items == 7) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31307
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
31310
|
0 |
0 |
else if (items == 6) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31317
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(5)) |
|
31319
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31323
|
0 |
0 |
if (bless_stash) oweights_SV = sv_bless(oweights_SV, bless_stash); |
|
31325
|
0 |
0 |
PUSHMARK(SP); |
|
31326
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31351
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((cutoff->state & PDL_BADVAL) > 0) || ((exponent->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((cutoff->state & PDL_BADVAL) > 0) || ((exponent->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((cutoff->state & PDL_BADVAL) > 0) || ((exponent->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((cutoff->state & PDL_BADVAL) > 0) || ((exponent->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((cutoff->state & PDL_BADVAL) > 0) || ((exponent->state & PDL_BADVAL) > 0); |
|
31352
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31353
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
31354
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
31355
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
31356
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
31357
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
31358
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
31359
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
31360
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
31362
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
31364
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
31366
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
31368
|
0 |
0 |
}if(PDL_D != cutoff->datatype) { |
|
31370
|
0 |
0 |
}if(PDL_D != exponent->datatype) { |
|
31372
|
0 |
0 |
}if( (oweights->state & PDL_NOMYDIMS) && oweights->trans == NULL ) { |
|
|
0 |
0 |
}if( (oweights->state & PDL_NOMYDIMS) && oweights->trans == NULL ) { |
|
31374
|
0 |
0 |
} else if(PDL_D != oweights->datatype) { |
|
31383
|
0 |
0 |
if (badflag_cache) { |
|
31386
|
0 |
0 |
if (nreturn) { |
|
31387
|
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); |
|
31419
|
6 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
6 |
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))) { |
|
31421
|
6 |
0 |
if (sv_isobject(parent)){ |
|
31423
|
6 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
6 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
6 |
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") |
|
|
6 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
6 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
31426
|
6 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31436
|
6 |
0 |
distFlag = (char *)SvPV_nolen(ST(8)) |
|
31438
|
6 |
0 |
methodFlag = (char *)SvPV_nolen(ST(9)) |
|
31441
|
0 |
0 |
else if (items == 9) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31450
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(7)) |
|
31452
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(8)) |
|
31454
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31458
|
0 |
0 |
if (bless_stash) dist_SV = sv_bless(dist_SV, bless_stash); |
|
31460
|
0 |
0 |
PUSHMARK(SP); |
|
31461
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31486
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
6 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
0 |
6 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((n1->state & PDL_BADVAL) > 0) || ((n2->state & PDL_BADVAL) > 0) || ((index1->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
31487
|
0 |
6 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31488
|
0 |
6 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
31489
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
31490
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
31491
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
31492
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
31493
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
31494
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
31495
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
31497
|
0 |
6 |
if(PDL_D != data->datatype) { |
|
31499
|
6 |
0 |
}if(PDL_L != mask->datatype) { |
|
31501
|
0 |
6 |
}if(PDL_D != weight->datatype) { |
|
31503
|
6 |
0 |
}if(PDL_L != n1->datatype) { |
|
31505
|
6 |
0 |
}if(PDL_L != n2->datatype) { |
|
31507
|
6 |
0 |
}if(PDL_L != index1->datatype) { |
|
31509
|
6 |
0 |
}if(PDL_L != index2->datatype) { |
|
31511
|
6 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
|
6 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
31513
|
0 |
0 |
} else if(PDL_D != dist->datatype) { |
|
31524
|
0 |
6 |
if (badflag_cache) { |
|
31527
|
0 |
6 |
if (nreturn) { |
|
31528
|
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); |
|
31555
|
1 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
1 |
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))) { |
|
31557
|
1 |
0 |
if (sv_isobject(parent)){ |
|
31559
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
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") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
31562
|
1 |
0 |
if (items == 5) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31568
|
1 |
0 |
distFlag = (char *)SvPV_nolen(ST(4)) |
|
31571
|
0 |
0 |
else if (items == 4) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31576
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(3)) |
|
31578
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31582
|
0 |
0 |
if (bless_stash) dists_SV = sv_bless(dists_SV, bless_stash); |
|
31584
|
0 |
0 |
PUSHMARK(SP); |
|
31585
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31610
|
1 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
|
1 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
|
0 |
1 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
31611
|
0 |
1 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31612
|
0 |
1 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
31613
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
31614
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
31615
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
31616
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
31617
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
31618
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
31619
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
31621
|
0 |
1 |
if(PDL_D != data->datatype) { |
|
31623
|
1 |
0 |
}if(PDL_L != mask->datatype) { |
|
31625
|
0 |
1 |
}if(PDL_D != weight->datatype) { |
|
31627
|
1 |
0 |
}if( (dists->state & PDL_NOMYDIMS) && dists->trans == NULL ) { |
|
|
1 |
0 |
}if( (dists->state & PDL_NOMYDIMS) && dists->trans == NULL ) { |
|
31629
|
0 |
0 |
} else if(PDL_D != dists->datatype) { |
|
31636
|
0 |
1 |
if (badflag_cache) { |
|
31639
|
0 |
1 |
if (nreturn) { |
|
31640
|
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); |
|
31669
|
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))) { |
|
31671
|
0 |
0 |
if (sv_isobject(parent)){ |
|
31673
|
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") |
|
31676
|
0 |
0 |
if (items == 6) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31683
|
0 |
0 |
ctrMethodFlag = (char *)SvPV_nolen(ST(5)) |
|
31686
|
0 |
0 |
else if (items == 4) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31691
|
0 |
0 |
ctrMethodFlag = (char *)SvPV_nolen(ST(3)) |
|
31693
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31697
|
0 |
0 |
if (bless_stash) cdata_SV = sv_bless(cdata_SV, bless_stash); |
|
31699
|
0 |
0 |
PUSHMARK(SP); |
|
31700
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31708
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31712
|
0 |
0 |
if (bless_stash) cmask_SV = sv_bless(cmask_SV, bless_stash); |
|
31714
|
0 |
0 |
PUSHMARK(SP); |
|
31715
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31740
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterids->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterids->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterids->state & PDL_BADVAL) > 0); |
|
31741
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31742
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
31743
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
31744
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
31745
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
31746
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
31747
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
31748
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
31749
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
31751
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
31753
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
31755
|
0 |
0 |
}if(PDL_L != clusterids->datatype) { |
|
31757
|
0 |
0 |
}if( (cdata->state & PDL_NOMYDIMS) && cdata->trans == NULL ) { |
|
|
0 |
0 |
}if( (cdata->state & PDL_NOMYDIMS) && cdata->trans == NULL ) { |
|
31759
|
0 |
0 |
} else if(PDL_D != cdata->datatype) { |
|
31761
|
0 |
0 |
}if( (cmask->state & PDL_NOMYDIMS) && cmask->trans == NULL ) { |
|
|
0 |
0 |
}if( (cmask->state & PDL_NOMYDIMS) && cmask->trans == NULL ) { |
|
31763
|
0 |
0 |
} else if(PDL_L != cmask->datatype) { |
|
31771
|
0 |
0 |
if (badflag_cache) { |
|
31775
|
0 |
0 |
if (nreturn) { |
|
31776
|
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); |
|
31804
|
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))) { |
|
31806
|
0 |
0 |
if (sv_isobject(parent)){ |
|
31808
|
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") |
|
31811
|
0 |
0 |
if (items == 4) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31818
|
0 |
0 |
else if (items == 2) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31822
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31826
|
0 |
0 |
if (bless_stash) centroids_SV = sv_bless(centroids_SV, bless_stash); |
|
31828
|
0 |
0 |
PUSHMARK(SP); |
|
31829
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31837
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31841
|
0 |
0 |
if (bless_stash) errors_SV = sv_bless(errors_SV, bless_stash); |
|
31843
|
0 |
0 |
PUSHMARK(SP); |
|
31844
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31869
|
0 |
0 |
badflag_cache = ((distance->state & PDL_BADVAL) > 0) || ((clusterids->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((distance->state & PDL_BADVAL) > 0) || ((clusterids->state & PDL_BADVAL) > 0); |
|
31870
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
31871
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
31872
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
31873
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
31874
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
31875
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
31876
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
31877
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
31878
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
31880
|
0 |
0 |
if(PDL_D != distance->datatype) { |
|
31882
|
0 |
0 |
}if(PDL_L != clusterids->datatype) { |
|
31884
|
0 |
0 |
}if( (centroids->state & PDL_NOMYDIMS) && centroids->trans == NULL ) { |
|
|
0 |
0 |
}if( (centroids->state & PDL_NOMYDIMS) && centroids->trans == NULL ) { |
|
31886
|
0 |
0 |
} else if(PDL_L != centroids->datatype) { |
|
31888
|
0 |
0 |
}if( (errors->state & PDL_NOMYDIMS) && errors->trans == NULL ) { |
|
|
0 |
0 |
}if( (errors->state & PDL_NOMYDIMS) && errors->trans == NULL ) { |
|
31890
|
0 |
0 |
} else if(PDL_D != errors->datatype) { |
|
31897
|
0 |
0 |
if (badflag_cache) { |
|
31901
|
0 |
0 |
if (nreturn) { |
|
31902
|
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); |
|
31937
|
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))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
31939
|
0 |
0 |
if (sv_isobject(parent)){ |
|
31941
|
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") |
|
31944
|
3 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
31954
|
3 |
0 |
distFlag = (char *)SvPV_nolen(ST(8)) |
|
31956
|
3 |
0 |
ctrMethodFlag = (char *)SvPV_nolen(ST(9)) |
|
31959
|
0 |
0 |
else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
31966
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(5)) |
|
31968
|
0 |
0 |
ctrMethodFlag = (char *)SvPV_nolen(ST(6)) |
|
31970
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31974
|
0 |
0 |
if (bless_stash) clusterids_SV = sv_bless(clusterids_SV, bless_stash); |
|
31976
|
0 |
0 |
PUSHMARK(SP); |
|
31977
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
31985
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
31989
|
0 |
0 |
if (bless_stash) error_SV = sv_bless(error_SV, bless_stash); |
|
31991
|
0 |
0 |
PUSHMARK(SP); |
|
31992
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32000
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32004
|
0 |
0 |
if (bless_stash) nfound_SV = sv_bless(nfound_SV, bless_stash); |
|
32006
|
0 |
0 |
PUSHMARK(SP); |
|
32007
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32032
|
3 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
3 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
0 |
3 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
32033
|
0 |
3 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32034
|
0 |
3 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32035
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32036
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32037
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32038
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32039
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32040
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32041
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32043
|
3 |
0 |
if(PDL_L != nclusters->datatype) { |
|
32045
|
0 |
3 |
}if(PDL_D != data->datatype) { |
|
32047
|
3 |
0 |
}if(PDL_L != mask->datatype) { |
|
32049
|
0 |
3 |
}if(PDL_D != weight->datatype) { |
|
32051
|
3 |
0 |
}if(PDL_L != npass->datatype) { |
|
32053
|
2 |
1 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
|
2 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
32055
|
1 |
0 |
} else if(PDL_L != clusterids->datatype) { |
|
32057
|
3 |
0 |
}if( (error->state & PDL_NOMYDIMS) && error->trans == NULL ) { |
|
|
3 |
0 |
}if( (error->state & PDL_NOMYDIMS) && error->trans == NULL ) { |
|
32059
|
0 |
0 |
} else if(PDL_D != error->datatype) { |
|
32061
|
3 |
0 |
}if( (nfound->state & PDL_NOMYDIMS) && nfound->trans == NULL ) { |
|
|
3 |
0 |
}if( (nfound->state & PDL_NOMYDIMS) && nfound->trans == NULL ) { |
|
32063
|
0 |
0 |
} else if(PDL_L != nfound->datatype) { |
|
32074
|
0 |
3 |
if (badflag_cache) { |
|
32079
|
0 |
3 |
if (nreturn) { |
|
32080
|
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); |
|
32112
|
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))) { |
|
|
0 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
32114
|
0 |
0 |
if (sv_isobject(parent)){ |
|
32116
|
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") |
|
32119
|
2 |
0 |
if (items == 6) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32128
|
0 |
0 |
else if (items == 3) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32133
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32137
|
0 |
0 |
if (bless_stash) clusterids_SV = sv_bless(clusterids_SV, bless_stash); |
|
32139
|
0 |
0 |
PUSHMARK(SP); |
|
32140
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32148
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32152
|
0 |
0 |
if (bless_stash) error_SV = sv_bless(error_SV, bless_stash); |
|
32154
|
0 |
0 |
PUSHMARK(SP); |
|
32155
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32163
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32167
|
0 |
0 |
if (bless_stash) nfound_SV = sv_bless(nfound_SV, bless_stash); |
|
32169
|
0 |
0 |
PUSHMARK(SP); |
|
32170
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32195
|
2 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((distance->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((distance->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
|
0 |
2 |
badflag_cache = ((nclusters->state & PDL_BADVAL) > 0) || ((distance->state & PDL_BADVAL) > 0) || ((npass->state & PDL_BADVAL) > 0); |
|
32196
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32197
|
0 |
2 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32198
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32199
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32200
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32201
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32202
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32203
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32204
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32206
|
2 |
0 |
if(PDL_L != nclusters->datatype) { |
|
32208
|
0 |
2 |
}if(PDL_D != distance->datatype) { |
|
32210
|
2 |
0 |
}if(PDL_L != npass->datatype) { |
|
32212
|
0 |
2 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
32214
|
0 |
2 |
} else if(PDL_L != clusterids->datatype) { |
|
32216
|
0 |
2 |
}if( (error->state & PDL_NOMYDIMS) && error->trans == NULL ) { |
|
|
0 |
0 |
}if( (error->state & PDL_NOMYDIMS) && error->trans == NULL ) { |
|
32218
|
0 |
2 |
} else if(PDL_D != error->datatype) { |
|
32220
|
0 |
2 |
}if( (nfound->state & PDL_NOMYDIMS) && nfound->trans == NULL ) { |
|
|
0 |
0 |
}if( (nfound->state & PDL_NOMYDIMS) && nfound->trans == NULL ) { |
|
32222
|
2 |
0 |
} else if(PDL_L != nfound->datatype) { |
|
32231
|
0 |
2 |
if (badflag_cache) { |
|
32236
|
0 |
2 |
if (nreturn) { |
|
32237
|
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); |
|
32269
|
8 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
8 |
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))) { |
|
32271
|
8 |
0 |
if (sv_isobject(parent)){ |
|
32273
|
8 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
8 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
8 |
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") |
|
|
8 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
8 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
32276
|
8 |
0 |
if (items == 7) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32283
|
8 |
0 |
distFlag = (char *)SvPV_nolen(ST(5)) |
|
32285
|
8 |
0 |
methodFlag = (char *)SvPV_nolen(ST(6)) |
|
32288
|
0 |
0 |
else if (items == 5) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32293
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(3)) |
|
32295
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(4)) |
|
32297
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32301
|
0 |
0 |
if (bless_stash) tree_SV = sv_bless(tree_SV, bless_stash); |
|
32303
|
0 |
0 |
PUSHMARK(SP); |
|
32304
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32312
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32316
|
0 |
0 |
if (bless_stash) lnkdist_SV = sv_bless(lnkdist_SV, bless_stash); |
|
32318
|
0 |
0 |
PUSHMARK(SP); |
|
32319
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32344
|
8 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
|
8 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
|
0 |
8 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0); |
|
32345
|
0 |
8 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32346
|
0 |
8 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32347
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32348
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32349
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32350
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32351
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32352
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32353
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32355
|
0 |
8 |
if(PDL_D != data->datatype) { |
|
32357
|
8 |
0 |
}if(PDL_L != mask->datatype) { |
|
32359
|
0 |
8 |
}if(PDL_D != weight->datatype) { |
|
32361
|
0 |
8 |
}if( (tree->state & PDL_NOMYDIMS) && tree->trans == NULL ) { |
|
|
0 |
0 |
}if( (tree->state & PDL_NOMYDIMS) && tree->trans == NULL ) { |
|
32363
|
0 |
8 |
} else if(PDL_L != tree->datatype) { |
|
32365
|
0 |
8 |
}if( (lnkdist->state & PDL_NOMYDIMS) && lnkdist->trans == NULL ) { |
|
|
0 |
0 |
}if( (lnkdist->state & PDL_NOMYDIMS) && lnkdist->trans == NULL ) { |
|
32367
|
0 |
8 |
} else if(PDL_D != lnkdist->datatype) { |
|
32375
|
0 |
8 |
if (badflag_cache) { |
|
32379
|
0 |
8 |
if (nreturn) { |
|
32380
|
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); |
|
32412
|
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))) { |
|
32414
|
0 |
0 |
if (sv_isobject(parent)){ |
|
32416
|
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") |
|
32419
|
0 |
0 |
if (items == 8) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32427
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
32429
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(7)) |
|
32432
|
0 |
0 |
else if (items == 6) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32438
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(4)) |
|
32440
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(5)) |
|
32442
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32446
|
0 |
0 |
if (bless_stash) tree_SV = sv_bless(tree_SV, bless_stash); |
|
32448
|
0 |
0 |
PUSHMARK(SP); |
|
32449
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32457
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32461
|
0 |
0 |
if (bless_stash) lnkdist_SV = sv_bless(lnkdist_SV, bless_stash); |
|
32463
|
0 |
0 |
PUSHMARK(SP); |
|
32464
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32489
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((distances->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((distances->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((distances->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((distances->state & PDL_BADVAL) > 0); |
|
32490
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32491
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32492
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32493
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32494
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32495
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32496
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32497
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32498
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32500
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
32502
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
32504
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
32506
|
0 |
0 |
}if(PDL_D != distances->datatype) { |
|
32508
|
0 |
0 |
}if( (tree->state & PDL_NOMYDIMS) && tree->trans == NULL ) { |
|
|
0 |
0 |
}if( (tree->state & PDL_NOMYDIMS) && tree->trans == NULL ) { |
|
32510
|
0 |
0 |
} else if(PDL_L != tree->datatype) { |
|
32512
|
0 |
0 |
}if( (lnkdist->state & PDL_NOMYDIMS) && lnkdist->trans == NULL ) { |
|
|
0 |
0 |
}if( (lnkdist->state & PDL_NOMYDIMS) && lnkdist->trans == NULL ) { |
|
32514
|
0 |
0 |
} else if(PDL_D != lnkdist->datatype) { |
|
32523
|
0 |
0 |
if (badflag_cache) { |
|
32527
|
0 |
0 |
if (nreturn) { |
|
32528
|
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); |
|
32554
|
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))) { |
|
32556
|
0 |
0 |
if (sv_isobject(parent)){ |
|
32558
|
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") |
|
32561
|
0 |
0 |
if (items == 3) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32567
|
0 |
0 |
else if (items == 2) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32571
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32575
|
0 |
0 |
if (bless_stash) clusterids_SV = sv_bless(clusterids_SV, bless_stash); |
|
32577
|
0 |
0 |
PUSHMARK(SP); |
|
32578
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32603
|
0 |
0 |
badflag_cache = ((tree->state & PDL_BADVAL) > 0) || ((nclusters->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((tree->state & PDL_BADVAL) > 0) || ((nclusters->state & PDL_BADVAL) > 0); |
|
32604
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32605
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32606
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32607
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32608
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32609
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32610
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32611
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32612
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32614
|
0 |
0 |
if(PDL_L != tree->datatype) { |
|
32616
|
0 |
0 |
}if(PDL_L != nclusters->datatype) { |
|
32618
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
32620
|
0 |
0 |
} else if(PDL_L != clusterids->datatype) { |
|
32626
|
0 |
0 |
if (badflag_cache) { |
|
32629
|
0 |
0 |
if (nreturn) { |
|
32630
|
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); |
|
32661
|
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))) { |
|
32663
|
2 |
0 |
if (sv_isobject(parent)){ |
|
32665
|
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") |
|
32668
|
2 |
0 |
if (items == 9) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32678
|
2 |
0 |
distFlag = (char *)SvPV_nolen(ST(8)) |
|
32681
|
0 |
0 |
else if (items == 8) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32690
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(7)) |
|
32692
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32696
|
0 |
0 |
if (bless_stash) clusterids_SV = sv_bless(clusterids_SV, bless_stash); |
|
32698
|
0 |
0 |
PUSHMARK(SP); |
|
32699
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32724
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
2 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
|
0 |
2 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((nxnodes->state & PDL_BADVAL) > 0) || ((nynodes->state & PDL_BADVAL) > 0) || ((inittau->state & PDL_BADVAL) > 0) || ((niter->state & PDL_BADVAL) > 0); |
|
32725
|
0 |
2 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32726
|
0 |
2 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32727
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32728
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32729
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32730
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32731
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32732
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32733
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32735
|
0 |
2 |
if(PDL_D != data->datatype) { |
|
32737
|
2 |
0 |
}if(PDL_L != mask->datatype) { |
|
32739
|
0 |
2 |
}if(PDL_D != weight->datatype) { |
|
32741
|
2 |
0 |
}if(PDL_L != nxnodes->datatype) { |
|
32743
|
2 |
0 |
}if(PDL_L != nynodes->datatype) { |
|
32745
|
0 |
2 |
}if(PDL_D != inittau->datatype) { |
|
32747
|
2 |
0 |
}if(PDL_L != niter->datatype) { |
|
32749
|
0 |
2 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
32751
|
0 |
2 |
} else if(PDL_L != clusterids->datatype) { |
|
32762
|
0 |
2 |
if (badflag_cache) { |
|
32765
|
0 |
2 |
if (nreturn) { |
|
32766
|
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); |
|
32793
|
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))) { |
|
32795
|
0 |
0 |
if (sv_isobject(parent)){ |
|
32797
|
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") |
|
32800
|
0 |
0 |
if (items == 3) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32806
|
0 |
0 |
else if (items == 0) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32808
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32812
|
0 |
0 |
if (bless_stash) U_SV = sv_bless(U_SV, bless_stash); |
|
32814
|
0 |
0 |
PUSHMARK(SP); |
|
32815
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32823
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32827
|
0 |
0 |
if (bless_stash) S_SV = sv_bless(S_SV, bless_stash); |
|
32829
|
0 |
0 |
PUSHMARK(SP); |
|
32830
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32838
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32842
|
0 |
0 |
if (bless_stash) V_SV = sv_bless(V_SV, bless_stash); |
|
32844
|
0 |
0 |
PUSHMARK(SP); |
|
32845
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32870
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32871
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32872
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32873
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32874
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32875
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32876
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
32877
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
32879
|
0 |
0 |
if( (U->state & PDL_NOMYDIMS) && U->trans == NULL ) { |
|
|
0 |
0 |
if( (U->state & PDL_NOMYDIMS) && U->trans == NULL ) { |
|
32881
|
0 |
0 |
} else if(PDL_D != U->datatype) { |
|
32883
|
0 |
0 |
}if( (S->state & PDL_NOMYDIMS) && S->trans == NULL ) { |
|
|
0 |
0 |
}if( (S->state & PDL_NOMYDIMS) && S->trans == NULL ) { |
|
32885
|
0 |
0 |
} else if(PDL_D != S->datatype) { |
|
32887
|
0 |
0 |
}if( (V->state & PDL_NOMYDIMS) && V->trans == NULL ) { |
|
|
0 |
0 |
}if( (V->state & PDL_NOMYDIMS) && V->trans == NULL ) { |
|
32889
|
0 |
0 |
} else if(PDL_D != V->datatype) { |
|
32895
|
0 |
0 |
if (badflag_cache) { |
|
32900
|
0 |
0 |
if (nreturn) { |
|
32901
|
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); |
|
32932
|
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))) { |
|
32934
|
0 |
0 |
if (sv_isobject(parent)){ |
|
32936
|
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") |
|
32939
|
0 |
0 |
if (items == 7) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
32947
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
32950
|
0 |
0 |
else if (items == 6) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
32957
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(5)) |
|
32959
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
32963
|
0 |
0 |
if (bless_stash) dist_SV = sv_bless(dist_SV, bless_stash); |
|
32965
|
0 |
0 |
PUSHMARK(SP); |
|
32966
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
32991
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids1->state & PDL_BADVAL) > 0) || ((rowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids1->state & PDL_BADVAL) > 0) || ((rowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids1->state & PDL_BADVAL) > 0) || ((rowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids1->state & PDL_BADVAL) > 0) || ((rowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids1->state & PDL_BADVAL) > 0) || ((rowids2->state & PDL_BADVAL) > 0); |
|
32992
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
32993
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
32994
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
32995
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
32996
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
32997
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
32998
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
32999
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33000
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33002
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
33004
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
33006
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
33008
|
0 |
0 |
}if(PDL_L != rowids1->datatype) { |
|
33010
|
0 |
0 |
}if(PDL_L != rowids2->datatype) { |
|
33012
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
33014
|
0 |
0 |
} else if(PDL_D != dist->datatype) { |
|
33023
|
0 |
0 |
if (badflag_cache) { |
|
33026
|
0 |
0 |
if (nreturn) { |
|
33027
|
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); |
|
33057
|
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))) { |
|
33059
|
0 |
0 |
if (sv_isobject(parent)){ |
|
33061
|
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") |
|
33064
|
0 |
0 |
if (items == 8) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33072
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
33074
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(7)) |
|
33077
|
0 |
0 |
else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33084
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(5)) |
|
33086
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(6)) |
|
33088
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33092
|
0 |
0 |
if (bless_stash) dist_SV = sv_bless(dist_SV, bless_stash); |
|
33094
|
0 |
0 |
PUSHMARK(SP); |
|
33095
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33120
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((index2->state & PDL_BADVAL) > 0); |
|
33121
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33122
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33123
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33124
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33125
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33126
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33127
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33128
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33129
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33131
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
33133
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
33135
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
33137
|
0 |
0 |
}if(PDL_L != rowids->datatype) { |
|
33139
|
0 |
0 |
}if(PDL_L != index2->datatype) { |
|
33141
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
33143
|
0 |
0 |
} else if(PDL_D != dist->datatype) { |
|
33152
|
0 |
0 |
if (badflag_cache) { |
|
33155
|
0 |
0 |
if (nreturn) { |
|
33156
|
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); |
|
33180
|
1 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
1 |
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))) { |
|
33182
|
1 |
0 |
if (sv_isobject(parent)){ |
|
33184
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
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") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
33187
|
1 |
0 |
if (items == 2) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33192
|
0 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33195
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33199
|
0 |
0 |
if (bless_stash) clustersizes_SV = sv_bless(clustersizes_SV, bless_stash); |
|
33201
|
0 |
0 |
PUSHMARK(SP); |
|
33202
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33228
|
0 |
1 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33229
|
0 |
1 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33230
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33231
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33232
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33233
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33234
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33235
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33236
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33238
|
0 |
1 |
if(PDL_L != clusterids->datatype) { |
|
33240
|
0 |
1 |
}if( (clustersizes->state & PDL_NOMYDIMS) && clustersizes->trans == NULL ) { |
|
|
0 |
0 |
}if( (clustersizes->state & PDL_NOMYDIMS) && clustersizes->trans == NULL ) { |
|
33242
|
0 |
1 |
} else if(PDL_L != clustersizes->datatype) { |
|
33247
|
0 |
1 |
clustersizes->state &= ~PDL_BADVAL; /* always make sure the output is "good" */if (nreturn) { |
|
33248
|
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); |
|
33274
|
1 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
1 |
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))) { |
|
33276
|
1 |
0 |
if (sv_isobject(parent)){ |
|
33278
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
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") |
|
|
1 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
1 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
33281
|
1 |
0 |
if (items == 3) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33287
|
0 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33290
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33294
|
0 |
0 |
if (bless_stash) clustersizes_SV = sv_bless(clustersizes_SV, bless_stash); |
|
33296
|
0 |
0 |
PUSHMARK(SP); |
|
33297
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33305
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33309
|
0 |
0 |
if (bless_stash) eltids_SV = sv_bless(eltids_SV, bless_stash); |
|
33311
|
0 |
0 |
PUSHMARK(SP); |
|
33312
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33338
|
0 |
1 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33339
|
0 |
1 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33340
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33341
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33342
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33343
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33344
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33345
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33346
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33348
|
0 |
1 |
if(PDL_L != clusterids->datatype) { |
|
33350
|
0 |
1 |
}if( (clustersizes->state & PDL_NOMYDIMS) && clustersizes->trans == NULL ) { |
|
|
0 |
0 |
}if( (clustersizes->state & PDL_NOMYDIMS) && clustersizes->trans == NULL ) { |
|
33352
|
0 |
1 |
} else if(PDL_L != clustersizes->datatype) { |
|
33354
|
0 |
1 |
}if( (eltids->state & PDL_NOMYDIMS) && eltids->trans == NULL ) { |
|
|
0 |
0 |
}if( (eltids->state & PDL_NOMYDIMS) && eltids->trans == NULL ) { |
|
33356
|
0 |
1 |
} else if(PDL_L != eltids->datatype) { |
|
33362
|
0 |
1 |
if (badflag_cache) { |
|
33366
|
0 |
1 |
if (nreturn) { |
|
33367
|
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); |
|
33392
|
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))) { |
|
33394
|
0 |
0 |
if (sv_isobject(parent)){ |
|
33396
|
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") |
|
33399
|
0 |
0 |
if (items == 2) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33404
|
0 |
0 |
else if (items == 1) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33407
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33411
|
0 |
0 |
if (bless_stash) eltmask_SV = sv_bless(eltmask_SV, bless_stash); |
|
33413
|
0 |
0 |
PUSHMARK(SP); |
|
33414
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33440
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33441
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33442
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33443
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33444
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33445
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33446
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33447
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33448
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33450
|
0 |
0 |
if(PDL_L != clusterids->datatype) { |
|
33452
|
0 |
0 |
}if( (eltmask->state & PDL_NOMYDIMS) && eltmask->trans == NULL ) { |
|
|
0 |
0 |
}if( (eltmask->state & PDL_NOMYDIMS) && eltmask->trans == NULL ) { |
|
33454
|
0 |
0 |
} else if(PDL_B != eltmask->datatype) { |
|
33459
|
0 |
0 |
if (badflag_cache) { |
|
33462
|
0 |
0 |
if (nreturn) { |
|
33463
|
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); |
|
33494
|
5 |
0 |
if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) { |
|
|
0 |
5 |
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))) { |
|
33496
|
5 |
0 |
if (sv_isobject(parent)){ |
|
33498
|
5 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
5 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
5 |
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") |
|
|
5 |
0 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
|
0 |
5 |
objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var") |
|
33501
|
5 |
0 |
if (items == 9) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33510
|
5 |
0 |
distFlag = (char *)SvPV_nolen(ST(7)) |
|
33512
|
5 |
0 |
methodFlag = (char *)SvPV_nolen(ST(8)) |
|
33515
|
0 |
0 |
else if (items == 8) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33523
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
33525
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(7)) |
|
33527
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33531
|
0 |
0 |
if (bless_stash) dist_SV = sv_bless(dist_SV, bless_stash); |
|
33533
|
0 |
0 |
PUSHMARK(SP); |
|
33534
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33559
|
5 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
|
5 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
|
5 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
|
5 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
|
5 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
|
0 |
5 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((clustersizes->state & PDL_BADVAL) > 0) || ((eltids->state & PDL_BADVAL) > 0); |
|
33560
|
0 |
5 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33561
|
0 |
5 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33562
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33563
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33564
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33565
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33566
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33567
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33568
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33570
|
0 |
5 |
if(PDL_D != data->datatype) { |
|
33572
|
5 |
0 |
}if(PDL_L != mask->datatype) { |
|
33574
|
0 |
5 |
}if(PDL_D != weight->datatype) { |
|
33576
|
0 |
5 |
}if(PDL_L != rowids->datatype) { |
|
33578
|
0 |
5 |
}if(PDL_L != clustersizes->datatype) { |
|
33580
|
0 |
5 |
}if(PDL_L != eltids->datatype) { |
|
33582
|
0 |
5 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
33584
|
0 |
5 |
} else if(PDL_D != dist->datatype) { |
|
33594
|
0 |
5 |
if (badflag_cache) { |
|
33597
|
0 |
5 |
if (nreturn) { |
|
33598
|
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); |
|
33630
|
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))) { |
|
33632
|
0 |
0 |
if (sv_isobject(parent)){ |
|
33634
|
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") |
|
33637
|
0 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33647
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(8)) |
|
33649
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(9)) |
|
33652
|
0 |
0 |
else if (items == 9) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33661
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(7)) |
|
33663
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(8)) |
|
33665
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33669
|
0 |
0 |
if (bless_stash) dist_SV = sv_bless(dist_SV, bless_stash); |
|
33671
|
0 |
0 |
PUSHMARK(SP); |
|
33672
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33697
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((clens1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((clens2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0); |
|
33698
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33699
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33700
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33701
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33702
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33703
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33704
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33705
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33706
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33708
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
33710
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
33712
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
33714
|
0 |
0 |
}if(PDL_L != clens1->datatype) { |
|
33716
|
0 |
0 |
}if(PDL_L != crowids1->datatype) { |
|
33718
|
0 |
0 |
}if(PDL_L != clens2->datatype) { |
|
33720
|
0 |
0 |
}if(PDL_L != crowids2->datatype) { |
|
33722
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
|
0 |
0 |
}if( (dist->state & PDL_NOMYDIMS) && dist->trans == NULL ) { |
|
33724
|
0 |
0 |
} else if(PDL_D != dist->datatype) { |
|
33735
|
0 |
0 |
if (badflag_cache) { |
|
33738
|
0 |
0 |
if (nreturn) { |
|
33739
|
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); |
|
33773
|
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))) { |
|
33775
|
0 |
0 |
if (sv_isobject(parent)){ |
|
33777
|
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") |
|
33780
|
0 |
0 |
if (items == 12) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33792
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(10)) |
|
33794
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(11)) |
|
33797
|
0 |
0 |
else if (items == 11) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33808
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(9)) |
|
33810
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(10)) |
|
33812
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33816
|
0 |
0 |
if (bless_stash) dists_SV = sv_bless(dists_SV, bless_stash); |
|
33818
|
0 |
0 |
PUSHMARK(SP); |
|
33819
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33844
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((coffsets1->state & PDL_BADVAL) > 0) || ((crowids1->state & PDL_BADVAL) > 0) || ((cwhich1->state & PDL_BADVAL) > 0) || ((coffsets2->state & PDL_BADVAL) > 0) || ((crowids2->state & PDL_BADVAL) > 0) || ((cwhich2->state & PDL_BADVAL) > 0); |
|
33845
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33846
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33847
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33848
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33849
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33850
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33851
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33852
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33853
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33855
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
33857
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
33859
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
33861
|
0 |
0 |
}if(PDL_L != coffsets1->datatype) { |
|
33863
|
0 |
0 |
}if(PDL_L != crowids1->datatype) { |
|
33865
|
0 |
0 |
}if(PDL_L != cwhich1->datatype) { |
|
33867
|
0 |
0 |
}if(PDL_L != coffsets2->datatype) { |
|
33869
|
0 |
0 |
}if(PDL_L != crowids2->datatype) { |
|
33871
|
0 |
0 |
}if(PDL_L != cwhich2->datatype) { |
|
33873
|
0 |
0 |
}if( (dists->state & PDL_NOMYDIMS) && dists->trans == NULL ) { |
|
|
0 |
0 |
}if( (dists->state & PDL_NOMYDIMS) && dists->trans == NULL ) { |
|
33875
|
0 |
0 |
} else if(PDL_D != dists->datatype) { |
|
33888
|
0 |
0 |
if (badflag_cache) { |
|
33891
|
0 |
0 |
if (nreturn) { |
|
33892
|
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); |
|
33920
|
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))) { |
|
33922
|
0 |
0 |
if (sv_isobject(parent)){ |
|
33924
|
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") |
|
33927
|
0 |
0 |
if (items == 5) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
33935
|
0 |
0 |
else if (items == 3) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
33940
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33944
|
0 |
0 |
if (bless_stash) cdata_SV = sv_bless(cdata_SV, bless_stash); |
|
33946
|
0 |
0 |
PUSHMARK(SP); |
|
33947
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33955
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
33959
|
0 |
0 |
if (bless_stash) cmask_SV = sv_bless(cmask_SV, bless_stash); |
|
33961
|
0 |
0 |
PUSHMARK(SP); |
|
33962
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
33987
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterwts->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterwts->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((clusterwts->state & PDL_BADVAL) > 0); |
|
33988
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
33989
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
33990
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
33991
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
33992
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
33993
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
33994
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
33995
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
33996
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
33998
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
34000
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
34002
|
0 |
0 |
}if(PDL_D != clusterwts->datatype) { |
|
34004
|
0 |
0 |
}if( (cdata->state & PDL_NOMYDIMS) && cdata->trans == NULL ) { |
|
|
0 |
0 |
}if( (cdata->state & PDL_NOMYDIMS) && cdata->trans == NULL ) { |
|
34006
|
0 |
0 |
} else if(PDL_D != cdata->datatype) { |
|
34008
|
0 |
0 |
}if( (cmask->state & PDL_NOMYDIMS) && cmask->trans == NULL ) { |
|
|
0 |
0 |
}if( (cmask->state & PDL_NOMYDIMS) && cmask->trans == NULL ) { |
|
34010
|
0 |
0 |
} else if(PDL_L != cmask->datatype) { |
|
34018
|
0 |
0 |
if (badflag_cache) { |
|
34022
|
0 |
0 |
if (nreturn) { |
|
34023
|
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); |
|
34057
|
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))) { |
|
34059
|
0 |
0 |
if (sv_isobject(parent)){ |
|
34061
|
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") |
|
34064
|
0 |
0 |
if (items == 10) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
34074
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(8)) |
|
34076
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(9)) |
|
34079
|
0 |
0 |
else if (items == 8) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
34087
|
0 |
0 |
distFlag = (char *)SvPV_nolen(ST(6)) |
|
34089
|
0 |
0 |
methodFlag = (char *)SvPV_nolen(ST(7)) |
|
34091
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34095
|
0 |
0 |
if (bless_stash) clusterids_SV = sv_bless(clusterids_SV, bless_stash); |
|
34097
|
0 |
0 |
PUSHMARK(SP); |
|
34098
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34106
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34110
|
0 |
0 |
if (bless_stash) cdist_SV = sv_bless(cdist_SV, bless_stash); |
|
34112
|
0 |
0 |
PUSHMARK(SP); |
|
34113
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34138
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
|
0 |
0 |
badflag_cache = ((data->state & PDL_BADVAL) > 0) || ((mask->state & PDL_BADVAL) > 0) || ((weight->state & PDL_BADVAL) > 0) || ((rowids->state & PDL_BADVAL) > 0) || ((cdata->state & PDL_BADVAL) > 0) || ((cmask->state & PDL_BADVAL) > 0); |
|
34139
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
34140
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype == PDL_B) {} |
|
34141
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
34142
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
34143
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
34144
|
0 |
0 |
else if(__privtrans->__datatype == PDL_N) {} |
|
34145
|
0 |
0 |
else if(__privtrans->__datatype == PDL_Q) {} |
|
34146
|
0 |
0 |
else if(__privtrans->__datatype == PDL_F) {} |
|
34147
|
0 |
0 |
else if(__privtrans->__datatype == PDL_D) {} |
|
34149
|
0 |
0 |
if(PDL_D != data->datatype) { |
|
34151
|
0 |
0 |
}if(PDL_L != mask->datatype) { |
|
34153
|
0 |
0 |
}if(PDL_D != weight->datatype) { |
|
34155
|
0 |
0 |
}if(PDL_L != rowids->datatype) { |
|
34157
|
0 |
0 |
}if(PDL_D != cdata->datatype) { |
|
34159
|
0 |
0 |
}if(PDL_L != cmask->datatype) { |
|
34161
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
|
0 |
0 |
}if( (clusterids->state & PDL_NOMYDIMS) && clusterids->trans == NULL ) { |
|
34163
|
0 |
0 |
} else if(PDL_L != clusterids->datatype) { |
|
34165
|
0 |
0 |
}if( (cdist->state & PDL_NOMYDIMS) && cdist->trans == NULL ) { |
|
|
0 |
0 |
}if( (cdist->state & PDL_NOMYDIMS) && cdist->trans == NULL ) { |
|
34167
|
0 |
0 |
} else if(PDL_D != cdist->datatype) { |
|
34178
|
0 |
0 |
if (badflag_cache) { |
|
34182
|
0 |
0 |
if (nreturn) { |
|
34183
|
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); |
|
34211
|
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))) { |
|
34213
|
0 |
0 |
if (sv_isobject(parent)){ |
|
34215
|
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") |
|
34218
|
0 |
0 |
if (items == 4) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
34223
|
0 |
0 |
nsize = (int)SvIV(ST(3)) |
|
34226
|
0 |
0 |
else if (items == 3) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0; |
|
34229
|
0 |
0 |
nsize = (int)SvIV(ST(2)) |
|
34231
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34235
|
0 |
0 |
if (bless_stash) otmp_SV = sv_bless(otmp_SV, bless_stash); |
|
34237
|
0 |
0 |
PUSHMARK(SP); |
|
34238
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34247
|
0 |
0 |
else if (items == 2) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
34250
|
0 |
0 |
nsize = (int)SvIV(ST(1)) |
|
34252
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34256
|
0 |
0 |
if (bless_stash) cprotos_SV = sv_bless(cprotos_SV, bless_stash); |
|
34258
|
0 |
0 |
PUSHMARK(SP); |
|
34259
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34267
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34271
|
0 |
0 |
if (bless_stash) otmp_SV = sv_bless(otmp_SV, bless_stash); |
|
34273
|
0 |
0 |
PUSHMARK(SP); |
|
34274
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34288
|
0 |
0 |
if ( protos->state & PDL_INPLACE && (cprotos != protos)) { |
|
|
0 |
0 |
if ( protos->state & PDL_INPLACE && (cprotos != protos)) { |
|
34305
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
34306
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype < protos->datatype) { |
|
34309
|
0 |
0 |
if(!((cprotos->state & PDL_NOMYDIMS) && |
|
|
0 |
0 |
if(!((cprotos->state & PDL_NOMYDIMS) && |
|
34310
|
0 |
0 |
cprotos->trans == NULL) && __privtrans->__datatype < cprotos->datatype) { |
|
34313
|
0 |
0 |
if(__privtrans->__datatype == PDL_B) {} |
|
34314
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
34315
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
34316
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
34318
|
0 |
0 |
if(__privtrans->__datatype != protos->datatype) { |
|
34320
|
0 |
0 |
}if( (cprotos->state & PDL_NOMYDIMS) && cprotos->trans == NULL ) { |
|
|
0 |
0 |
}if( (cprotos->state & PDL_NOMYDIMS) && cprotos->trans == NULL ) { |
|
34322
|
0 |
0 |
} else if(__privtrans->__datatype != cprotos->datatype) { |
|
34324
|
0 |
0 |
}if( (otmp->state & PDL_NOMYDIMS) && otmp->trans == NULL ) { |
|
|
0 |
0 |
}if( (otmp->state & PDL_NOMYDIMS) && otmp->trans == NULL ) { |
|
34326
|
0 |
0 |
} else if(PDL_B != otmp->datatype) { |
|
34332
|
0 |
0 |
if (badflag_cache) { |
|
34335
|
0 |
0 |
if (nreturn) { |
|
34336
|
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); |
|
34363
|
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))) { |
|
34365
|
0 |
0 |
if (sv_isobject(parent)){ |
|
34367
|
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") |
|
34370
|
0 |
0 |
if (items == 4) { PDL_COMMENT("all variables on stack, read in output and temp vars") |
|
34375
|
0 |
0 |
ksize = (int)SvIV(ST(3)) |
|
34378
|
0 |
0 |
else if (items == 3) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0; |
|
34381
|
0 |
0 |
ksize = (int)SvIV(ST(2)) |
|
34383
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34387
|
0 |
0 |
if (bless_stash) ptmp_SV = sv_bless(ptmp_SV, bless_stash); |
|
34389
|
0 |
0 |
PUSHMARK(SP); |
|
34390
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34399
|
0 |
0 |
else if (items == 2) { PDL_COMMENT("only input variables on stack, create outputs and temps") |
|
34402
|
0 |
0 |
ksize = (int)SvIV(ST(1)) |
|
34404
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34408
|
0 |
0 |
if (bless_stash) cpart_SV = sv_bless(cpart_SV, bless_stash); |
|
34410
|
0 |
0 |
PUSHMARK(SP); |
|
34411
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34419
|
0 |
0 |
if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL") |
|
34423
|
0 |
0 |
if (bless_stash) ptmp_SV = sv_bless(ptmp_SV, bless_stash); |
|
34425
|
0 |
0 |
PUSHMARK(SP); |
|
34426
|
0 |
0 |
XPUSHs(sv_2mortal(newSVpv(objname, 0))); |
|
34440
|
0 |
0 |
if ( part->state & PDL_INPLACE && (cpart != part)) { |
|
|
0 |
0 |
if ( part->state & PDL_INPLACE && (cpart != part)) { |
|
34457
|
0 |
0 |
if (badflag_cache) __privtrans->bvalflag = 1; |
|
34458
|
0 |
0 |
__privtrans->__datatype = 0;if(__privtrans->__datatype < part->datatype) { |
|
34461
|
0 |
0 |
if(!((cpart->state & PDL_NOMYDIMS) && |
|
|
0 |
0 |
if(!((cpart->state & PDL_NOMYDIMS) && |
|
34462
|
0 |
0 |
cpart->trans == NULL) && __privtrans->__datatype < cpart->datatype) { |
|
34465
|
0 |
0 |
if(!((ptmp->state & PDL_NOMYDIMS) && |
|
|
0 |
0 |
if(!((ptmp->state & PDL_NOMYDIMS) && |
|
34466
|
0 |
0 |
ptmp->trans == NULL) && __privtrans->__datatype < ptmp->datatype) { |
|
34469
|
0 |
0 |
if(__privtrans->__datatype == PDL_B) {} |
|
34470
|
0 |
0 |
else if(__privtrans->__datatype == PDL_S) {} |
|
34471
|
0 |
0 |
else if(__privtrans->__datatype == PDL_U) {} |
|
34472
|
0 |
0 |
else if(__privtrans->__datatype == PDL_L) {} |
|
34474
|
0 |
0 |
if(__privtrans->__datatype != part->datatype) { |
|
34476
|
0 |
0 |
}if( (cpart->state & PDL_NOMYDIMS) && cpart->trans == NULL ) { |
|
|
0 |
0 |
}if( (cpart->state & PDL_NOMYDIMS) && cpart->trans == NULL ) { |
|
34478
|
0 |
0 |
} else if(__privtrans->__datatype != cpart->datatype) { |
|
34480
|
0 |
0 |
}if( (ptmp->state & PDL_NOMYDIMS) && ptmp->trans == NULL ) { |
|
|
0 |
0 |
}if( (ptmp->state & PDL_NOMYDIMS) && ptmp->trans == NULL ) { |
|
34482
|
0 |
0 |
} else if(__privtrans->__datatype != ptmp->datatype) { |
|
34488
|
0 |
0 |
if (badflag_cache) { |
|
34491
|
0 |
0 |
if (nreturn) { |
|
34492
|
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); |
|
34510
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
9 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
9 |
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)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
9 |
0 |
if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV)); |
|
|
0 |
9 |
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 |
9 |
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)); |
|
34512
|
0 |
9 |
if (CoreSV==NULL) |
|
34514
|
9 |
0 |
PDL = INT2PTR(Core*,SvIV( CoreSV )); /* Core* value */ |
|
34515
|
0 |
9 |
if (PDL->Version != PDL_CORE_VERSION) |