Branch Coverage

Levmar.xs
Criterion Covered Total %
branch 962 7306 13.1


line true false branch
70 0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
71 0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
72 0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
73 0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
74 0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
80 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
83 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
86 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
89 0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
92 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
95 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
98 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
101 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
104 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
107 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
110 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
133 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
136 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
139 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
142 0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
145 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
148 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
151 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
154 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
157 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
160 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
163 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
203 0 0 if(((__privtrans->pdls[0]))->ndims < 1) {
204 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
206 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
208 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
209 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
213 0 0 if(((__privtrans->pdls[1]))->ndims < 1) {
214 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;
216 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)) {
218 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]) {
219 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
224 0 0 if(((__privtrans->pdls[2]))->ndims < 1) {
225 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
227 0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
229 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
230 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
235 0 0 if(((__privtrans->pdls[3]))->ndims < 1) {
236 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
238 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
240 0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
241 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
246 0 0 if(((__privtrans->pdls[4]))->ndims < 1) {
247 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
249 0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
251 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
252 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
257 0 0 if(((__privtrans->pdls[5]))->ndims < 1) {
258 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
260 0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
262 0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
263 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
268 0 0 if(!__creating[6]) {
269 0 0 if(((__privtrans->pdls[6]))->ndims < 1) {
270 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
272 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
274 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
275 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
283 0 0 }if(!__creating[7]) {
284 0 0 if(((__privtrans->pdls[7]))->ndims < 2) {
285 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
286 0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
288 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
290 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
291 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
295 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
297 0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
298 0 0 if(((__privtrans->pdls[7]))->dims[1] != 1) {
306 0 0 }if(!__creating[8]) {
310 0 0 }if(!__creating[9]) {
311 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
312 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
314 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
316 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
317 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
325 0 0 }if(!__creating[10]) {
326 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
327 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
329 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
331 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
332 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
345 0 0 if(!hdrp &&
0 0 if(!hdrp &&
346 0 0 __privtrans->pdls[0]->hdrsv &&
352 0 0 if(!hdrp &&
0 0 if(!hdrp &&
353 0 0 __privtrans->pdls[1]->hdrsv &&
359 0 0 if(!hdrp &&
0 0 if(!hdrp &&
360 0 0 __privtrans->pdls[2]->hdrsv &&
366 0 0 if(!hdrp &&
0 0 if(!hdrp &&
367 0 0 __privtrans->pdls[3]->hdrsv &&
373 0 0 if(!hdrp &&
0 0 if(!hdrp &&
374 0 0 __privtrans->pdls[4]->hdrsv &&
380 0 0 if(!hdrp &&
0 0 if(!hdrp &&
381 0 0 __privtrans->pdls[5]->hdrsv &&
387 0 0 if(!hdrp &&
0 0 if(!hdrp &&
388 0 0 !__creating[6] &&
389 0 0 __privtrans->pdls[6]->hdrsv &&
395 0 0 if(!hdrp &&
0 0 if(!hdrp &&
396 0 0 !__creating[7] &&
397 0 0 __privtrans->pdls[7]->hdrsv &&
403 0 0 if(!hdrp &&
0 0 if(!hdrp &&
404 0 0 !__creating[8] &&
405 0 0 __privtrans->pdls[8]->hdrsv &&
411 0 0 if(!hdrp &&
0 0 if(!hdrp &&
412 0 0 !__creating[9] &&
413 0 0 __privtrans->pdls[9]->hdrsv &&
419 0 0 if(!hdrp &&
0 0 if(!hdrp &&
420 0 0 !__creating[10] &&
421 0 0 __privtrans->pdls[10]->hdrsv &&
427 0 0 if (hdrp) {
428 0 0 if(hdrp == &PL_sv_undef)
436 0 0 PUSHMARK(SP) ;
437 0 0 XPUSHs( hdrp );
441 0 0 if(count != 1)
446 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
450 0 0 FREETMPS ;
456 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
457 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)
459 0 0 if( hdr_copy != &PL_sv_undef )
463 0 0 if(propagate_hdrcpy)
465 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
466 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)
468 0 0 if( hdr_copy != &PL_sv_undef )
472 0 0 if(propagate_hdrcpy)
474 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
475 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
477 0 0 if( hdr_copy != &PL_sv_undef )
481 0 0 if(propagate_hdrcpy)
483 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
484 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)
486 0 0 if( hdr_copy != &PL_sv_undef )
490 0 0 if(propagate_hdrcpy)
492 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
493 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
495 0 0 if( hdr_copy != &PL_sv_undef )
499 0 0 if(propagate_hdrcpy)
502 0 0 if(hdr_copy != &PL_sv_undef)
506 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)
508 0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
510 0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
512 0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
514 0 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
516 0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
518 0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
520 0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
522 0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
524 0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
526 0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
548 0 0 for(i=0; i<__copy->vtable->npdls; i++)
552 0 0 if(__copy->__ddone) {
570 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
573 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
576 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
579 0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
582 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
585 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
588 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
591 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
594 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
597 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
600 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
629 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
668 0 0 for( __tind2 = 0 ;
684 0 0 for( __tind1 = 0 ;
701 0 0 for(m=0; m<(__m_size); m++) {
702 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
705 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
730 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
733 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
736 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
739 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
742 0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
745 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
748 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
751 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
754 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
757 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
760 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
763 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
792 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
831 0 0 for( __tind2 = 0 ;
847 0 0 for( __tind1 = 0 ;
864 0 0 for(m=0; m<(__m_size); m++) {
865 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
868 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
893 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
912 0 0 if(__privtrans->__ddone) {
959 9 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
9 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
960 9 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
9 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
961 9 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
9 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
962 9 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
9 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
963 9 0 __creating[11] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[11]);
9 0 __creating[11] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[11]);
969 0 3 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
972 0 3 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
975 0 3 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
978 0 3 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
981 0 3 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
984 0 3 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
987 0 3 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
990 0 3 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
993 0 3 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
996 0 3 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
999 0 3 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
1002 0 3 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
1026 0 6 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
1029 0 6 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
1032 0 6 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
1035 0 6 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
1038 0 6 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
1041 0 6 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
1044 0 6 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
1047 0 6 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
1050 0 6 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
1053 0 6 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
1056 0 6 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
1059 0 6 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
1100 0 9 if(((__privtrans->pdls[0]))->ndims < 1) {
1101 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1103 0 9 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
1105 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
1106 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
1110 0 9 if(((__privtrans->pdls[1]))->ndims < 1) {
1111 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;
1113 0 9 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)) {
1115 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]) {
1116 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
1121 0 9 if(((__privtrans->pdls[2]))->ndims < 1) {
1122 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
1124 0 9 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
1126 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
1127 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
1132 0 9 if(((__privtrans->pdls[3]))->ndims < 1) {
1133 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1135 9 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
9 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 9 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
1137 9 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 9 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
1138 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
1143 0 9 if(((__privtrans->pdls[4]))->ndims < 1) {
1144 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1146 9 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
9 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 9 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
1148 9 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) {
0 9 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) {
1149 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
1154 9 0 if(((__privtrans->pdls[5]))->ndims < 1) {
1155 9 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
9 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
1157 9 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 9 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
1159 0 9 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[5]))->dims[0]) {
1160 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
1165 0 9 if(((__privtrans->pdls[6]))->ndims < 1) {
1166 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
1168 0 9 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
1170 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[6]))->dims[0]) {
1171 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
1176 0 9 if(!__creating[7]) {
1177 0 0 if(((__privtrans->pdls[7]))->ndims < 1) {
1178 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
1180 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
1182 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[7]))->dims[0]) {
1183 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
1191 0 9 }if(!__creating[8]) {
1192 0 0 if(((__privtrans->pdls[8]))->ndims < 2) {
1193 0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1194 0 0 if (((__privtrans->pdls[8]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1196 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
1198 0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
1199 0 0 if(((__privtrans->pdls[8]))->dims[0] != 1) {
1203 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
1205 0 0 } else if(((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[1]) {
1206 0 0 if(((__privtrans->pdls[8]))->dims[1] != 1) {
1214 9 0 }if(!__creating[9]) {
1218 0 9 }if(!__creating[10]) {
1219 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
1220 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
1222 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
1224 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[10]))->dims[0]) {
1225 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
1233 0 9 }if(!__creating[11]) {
1234 0 0 if(((__privtrans->pdls[11]))->ndims < 1) {
1235 0 0 if (((__privtrans->pdls[11]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[11]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
1237 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
1239 0 0 } else if(((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[11]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[11]))->dims[0]) {
1240 0 0 if(((__privtrans->pdls[11]))->dims[0] != 1) {
1253 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1254 0 0 __privtrans->pdls[0]->hdrsv &&
1260 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1261 0 0 __privtrans->pdls[1]->hdrsv &&
1267 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1268 0 0 __privtrans->pdls[2]->hdrsv &&
1274 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1275 0 0 __privtrans->pdls[3]->hdrsv &&
1281 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1282 0 0 __privtrans->pdls[4]->hdrsv &&
1288 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1289 0 0 __privtrans->pdls[5]->hdrsv &&
1295 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1296 0 0 __privtrans->pdls[6]->hdrsv &&
1302 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1303 0 0 !__creating[7] &&
1304 0 0 __privtrans->pdls[7]->hdrsv &&
1310 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1311 0 0 !__creating[8] &&
1312 0 0 __privtrans->pdls[8]->hdrsv &&
1318 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1319 0 0 !__creating[9] &&
1320 0 0 __privtrans->pdls[9]->hdrsv &&
1326 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1327 0 0 !__creating[10] &&
1328 0 0 __privtrans->pdls[10]->hdrsv &&
1334 9 0 if(!hdrp &&
0 9 if(!hdrp &&
1335 0 0 !__creating[11] &&
1336 0 0 __privtrans->pdls[11]->hdrsv &&
1342 0 9 if (hdrp) {
1343 0 0 if(hdrp == &PL_sv_undef)
1351 0 0 PUSHMARK(SP) ;
1352 0 0 XPUSHs( hdrp );
1356 0 0 if(count != 1)
1361 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
1365 0 0 FREETMPS ;
1371 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
1372 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)
1374 0 0 if( hdr_copy != &PL_sv_undef )
1378 0 0 if(propagate_hdrcpy)
1380 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
1381 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
1383 0 0 if( hdr_copy != &PL_sv_undef )
1387 0 0 if(propagate_hdrcpy)
1389 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
1390 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)
1392 0 0 if( hdr_copy != &PL_sv_undef )
1396 0 0 if(propagate_hdrcpy)
1398 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
1399 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
1401 0 0 if( hdr_copy != &PL_sv_undef )
1405 0 0 if(propagate_hdrcpy)
1407 0 0 if ( __privtrans->pdls[11]->hdrsv != hdrp ){
1408 0 0 if( __privtrans->pdls[11]->hdrsv && __privtrans->pdls[11]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[11]->hdrsv && __privtrans->pdls[11]->hdrsv != &PL_sv_undef)
1410 0 0 if( hdr_copy != &PL_sv_undef )
1414 0 0 if(propagate_hdrcpy)
1417 0 0 if(hdr_copy != &PL_sv_undef)
1421 9 0 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
0 9 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
1423 0 9 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
9 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 9 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
1425 9 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
8 1 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
1427 9 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 9 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
1429 9 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 9 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
1431 0 9 __privtrans->__inc_ub_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_ub_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
1433 9 0 __privtrans->__inc_iopts_in = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 9 __privtrans->__inc_iopts_in = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
1435 9 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 9 __privtrans->__inc_opts_nopt = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
1437 9 0 __privtrans->__inc_work_wn = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
0 9 __privtrans->__inc_work_wn = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
1439 9 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 1 || __privtrans->pdls[8]->dims[1] <= 1)
0 9 __privtrans->__inc_covar_m0 = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 1 || __privtrans->pdls[8]->dims[1] <= 1)
1441 9 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[8]->dimincs[1];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 9 __privtrans->__inc_covar_m1 = __privtrans->pdls[8]->dimincs[1];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
1443 9 0 __privtrans->__inc_pout_m = __privtrans->pdls[10]->dimincs[0];if(__privtrans->pdls[11]->ndims <= 0 || __privtrans->pdls[11]->dims[0] <= 1)
0 9 __privtrans->__inc_pout_m = __privtrans->pdls[10]->dimincs[0];if(__privtrans->pdls[11]->ndims <= 0 || __privtrans->pdls[11]->dims[0] <= 1)
1465 0 0 for(i=0; i<__copy->vtable->npdls; i++)
1469 0 0 if(__copy->__ddone) {
1487 0 3 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
1490 0 3 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
1493 0 3 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
1496 0 3 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
1499 0 3 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
1502 0 3 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
1505 0 3 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
1508 0 3 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
1511 0 3 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
1514 0 3 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
1517 0 3 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
1520 0 3 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
1550 0 3 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
1592 3 3 for( __tind2 = 0 ;
1609 3 3 for( __tind1 = 0 ;
1627 12 3 for(m=0; m<(__m_size); m++) {
1628 0 12 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 12 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
1631 3 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
1657 0 3 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
1660 0 6 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
1663 0 6 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
1666 0 6 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
1669 0 6 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
1672 0 6 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
1675 0 6 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
1678 0 6 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
1681 0 6 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
1684 0 6 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
1687 0 6 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
1690 0 6 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
1693 0 6 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
1723 0 6 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
1765 6 6 for( __tind2 = 0 ;
1782 8 6 for( __tind1 = 0 ;
1800 31 8 for(m=0; m<(__m_size); m++) {
1801 0 31 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 31 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
1804 8 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
1830 0 6 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
1849 9 0 if(__privtrans->__ddone) {
1895 0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
1896 0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
1897 0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
1898 0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
1899 0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
1905 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
1908 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
1911 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
1914 0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
1917 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
1920 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
1923 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
1926 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
1929 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
1932 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
1935 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
1958 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
1961 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
1964 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
1967 0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
1970 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
1973 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
1976 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
1979 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
1982 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
1985 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
1988 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
2028 0 0 if(((__privtrans->pdls[0]))->ndims < 1) {
2029 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2031 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
2033 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
2034 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
2038 0 0 if(((__privtrans->pdls[1]))->ndims < 1) {
2039 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;
2041 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)) {
2043 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]) {
2044 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
2049 0 0 if(((__privtrans->pdls[2]))->ndims < 1) {
2050 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
2052 0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
2054 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
2055 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
2060 0 0 if(((__privtrans->pdls[3]))->ndims < 1) {
2061 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2063 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
2065 0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
2066 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
2071 0 0 if(((__privtrans->pdls[4]))->ndims < 1) {
2072 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
2074 0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
2076 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
2077 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
2082 0 0 if(((__privtrans->pdls[5]))->ndims < 1) {
2083 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
2085 0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
2087 0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
2088 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
2093 0 0 if(!__creating[6]) {
2094 0 0 if(((__privtrans->pdls[6]))->ndims < 1) {
2095 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
2097 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
2099 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
2100 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
2108 0 0 }if(!__creating[7]) {
2109 0 0 if(((__privtrans->pdls[7]))->ndims < 2) {
2110 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2111 0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2113 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
2115 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
2116 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
2120 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
2122 0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
2123 0 0 if(((__privtrans->pdls[7]))->dims[1] != 1) {
2131 0 0 }if(!__creating[8]) {
2135 0 0 }if(!__creating[9]) {
2136 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
2137 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2139 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
2141 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
2142 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
2150 0 0 }if(!__creating[10]) {
2151 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
2152 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
2154 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
2156 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
2157 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
2170 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2171 0 0 __privtrans->pdls[0]->hdrsv &&
2177 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2178 0 0 __privtrans->pdls[1]->hdrsv &&
2184 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2185 0 0 __privtrans->pdls[2]->hdrsv &&
2191 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2192 0 0 __privtrans->pdls[3]->hdrsv &&
2198 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2199 0 0 __privtrans->pdls[4]->hdrsv &&
2205 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2206 0 0 __privtrans->pdls[5]->hdrsv &&
2212 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2213 0 0 !__creating[6] &&
2214 0 0 __privtrans->pdls[6]->hdrsv &&
2220 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2221 0 0 !__creating[7] &&
2222 0 0 __privtrans->pdls[7]->hdrsv &&
2228 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2229 0 0 !__creating[8] &&
2230 0 0 __privtrans->pdls[8]->hdrsv &&
2236 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2237 0 0 !__creating[9] &&
2238 0 0 __privtrans->pdls[9]->hdrsv &&
2244 0 0 if(!hdrp &&
0 0 if(!hdrp &&
2245 0 0 !__creating[10] &&
2246 0 0 __privtrans->pdls[10]->hdrsv &&
2252 0 0 if (hdrp) {
2253 0 0 if(hdrp == &PL_sv_undef)
2261 0 0 PUSHMARK(SP) ;
2262 0 0 XPUSHs( hdrp );
2266 0 0 if(count != 1)
2271 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
2275 0 0 FREETMPS ;
2281 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
2282 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)
2284 0 0 if( hdr_copy != &PL_sv_undef )
2288 0 0 if(propagate_hdrcpy)
2290 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
2291 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)
2293 0 0 if( hdr_copy != &PL_sv_undef )
2297 0 0 if(propagate_hdrcpy)
2299 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
2300 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
2302 0 0 if( hdr_copy != &PL_sv_undef )
2306 0 0 if(propagate_hdrcpy)
2308 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
2309 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)
2311 0 0 if( hdr_copy != &PL_sv_undef )
2315 0 0 if(propagate_hdrcpy)
2317 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
2318 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
2320 0 0 if( hdr_copy != &PL_sv_undef )
2324 0 0 if(propagate_hdrcpy)
2327 0 0 if(hdr_copy != &PL_sv_undef)
2331 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)
2333 0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
2335 0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
2337 0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
2339 0 0 __privtrans->__inc_ub_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 0 __privtrans->__inc_ub_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
2341 0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
2343 0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
2345 0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
2347 0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
2349 0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
2351 0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
2373 0 0 for(i=0; i<__copy->vtable->npdls; i++)
2377 0 0 if(__copy->__ddone) {
2395 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
2398 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
2401 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
2404 0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
2407 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
2410 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
2413 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
2416 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
2419 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
2422 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
2425 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
2454 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
2493 0 0 for( __tind2 = 0 ;
2509 0 0 for( __tind1 = 0 ;
2526 0 0 for(m=0; m<(__m_size); m++) {
2527 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
2530 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
2555 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
2558 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
2561 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
2564 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
2567 0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
2570 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
2573 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
2576 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
2579 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
2582 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
2585 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
2588 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
2617 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
2656 0 0 for( __tind2 = 0 ;
2672 0 0 for( __tind1 = 0 ;
2689 0 0 for(m=0; m<(__m_size); m++) {
2690 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
2693 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
2718 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
2737 0 0 if(__privtrans->__ddone) {
2782 60 0 __creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]);
59 1 __creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]);
2783 60 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
59 1 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
2784 60 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
60 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
2785 60 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
60 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
2786 60 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
60 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
2792 0 6 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
2795 0 6 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
2798 0 6 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
2801 0 6 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
2804 0 6 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
2807 0 6 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
2810 0 6 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
2813 0 6 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
2816 0 6 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
2819 0 6 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
2841 3 51 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
2844 3 51 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 3 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
2847 0 54 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
2850 0 54 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
2853 0 54 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
2856 0 54 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
2859 0 54 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
2862 0 54 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
2865 0 54 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
2868 0 54 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
2907 0 60 if(((__privtrans->pdls[0]))->ndims < 1) {
2908 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2910 0 60 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
2912 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
2913 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
2917 0 60 if(((__privtrans->pdls[1]))->ndims < 1) {
2918 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;
2920 0 60 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)) {
2922 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]) {
2923 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
2928 0 60 if(((__privtrans->pdls[2]))->ndims < 1) {
2929 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
2931 0 60 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
2933 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
2934 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
2939 60 0 if(((__privtrans->pdls[3]))->ndims < 1) {
2940 60 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
60 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
2942 60 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 60 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
2944 0 60 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[3]))->dims[0]) {
2945 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
2950 0 60 if(((__privtrans->pdls[4]))->ndims < 1) {
2951 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
2953 0 60 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
2955 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[4]))->dims[0]) {
2956 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
2961 1 59 if(!__creating[5]) {
2962 0 1 if(((__privtrans->pdls[5]))->ndims < 1) {
2963 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
2965 1 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
1 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 1 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
2967 1 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[5]))->dims[0]) {
0 1 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[5]))->dims[0]) {
2968 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
2976 1 59 }if(!__creating[6]) {
2977 0 1 if(((__privtrans->pdls[6]))->ndims < 2) {
2978 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2979 0 0 if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
2981 1 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
1 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 1 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
2983 1 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[0]) {
0 1 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[0]) {
2984 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
2988 1 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
1 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 1 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
2990 1 0 } else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[1]) {
0 1 } else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[1]) {
2991 0 0 if(((__privtrans->pdls[6]))->dims[1] != 1) {
2999 60 0 }if(!__creating[7]) {
3003 0 60 }if(!__creating[8]) {
3004 0 0 if(((__privtrans->pdls[8]))->ndims < 1) {
3005 0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3007 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
3009 0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
3010 0 0 if(((__privtrans->pdls[8]))->dims[0] != 1) {
3018 0 60 }if(!__creating[9]) {
3019 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
3020 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
3022 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
3024 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[9]))->dims[0]) {
3025 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
3038 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3039 0 0 __privtrans->pdls[0]->hdrsv &&
3045 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3046 0 0 __privtrans->pdls[1]->hdrsv &&
3052 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3053 0 0 __privtrans->pdls[2]->hdrsv &&
3059 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3060 0 0 __privtrans->pdls[3]->hdrsv &&
3066 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3067 0 0 __privtrans->pdls[4]->hdrsv &&
3073 60 0 if(!hdrp &&
1 59 if(!hdrp &&
3074 0 1 !__creating[5] &&
3075 0 0 __privtrans->pdls[5]->hdrsv &&
3081 60 0 if(!hdrp &&
1 59 if(!hdrp &&
3082 0 1 !__creating[6] &&
3083 0 0 __privtrans->pdls[6]->hdrsv &&
3089 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3090 0 0 !__creating[7] &&
3091 0 0 __privtrans->pdls[7]->hdrsv &&
3097 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3098 0 0 !__creating[8] &&
3099 0 0 __privtrans->pdls[8]->hdrsv &&
3105 60 0 if(!hdrp &&
0 60 if(!hdrp &&
3106 0 0 !__creating[9] &&
3107 0 0 __privtrans->pdls[9]->hdrsv &&
3113 0 60 if (hdrp) {
3114 0 0 if(hdrp == &PL_sv_undef)
3122 0 0 PUSHMARK(SP) ;
3123 0 0 XPUSHs( hdrp );
3127 0 0 if(count != 1)
3132 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
3136 0 0 FREETMPS ;
3142 0 0 if ( __privtrans->pdls[5]->hdrsv != hdrp ){
3143 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)
3145 0 0 if( hdr_copy != &PL_sv_undef )
3149 0 0 if(propagate_hdrcpy)
3151 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
3152 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)
3154 0 0 if( hdr_copy != &PL_sv_undef )
3158 0 0 if(propagate_hdrcpy)
3160 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
3161 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)
3163 0 0 if( hdr_copy != &PL_sv_undef )
3167 0 0 if(propagate_hdrcpy)
3169 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
3170 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
3172 0 0 if( hdr_copy != &PL_sv_undef )
3176 0 0 if(propagate_hdrcpy)
3178 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
3179 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)
3181 0 0 if( hdr_copy != &PL_sv_undef )
3185 0 0 if(propagate_hdrcpy)
3188 0 0 if(hdr_copy != &PL_sv_undef)
3192 60 0 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
0 60 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
3194 3 57 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
60 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 60 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
3196 60 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
12 48 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
3198 0 60 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
3200 60 0 __privtrans->__inc_iopts_in = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 60 __privtrans->__inc_iopts_in = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
3202 60 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 60 __privtrans->__inc_opts_nopt = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
3204 60 0 __privtrans->__inc_work_wn = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 60 __privtrans->__inc_work_wn = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
3206 60 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1)
0 60 __privtrans->__inc_covar_m0 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1)
3208 60 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[6]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
0 60 __privtrans->__inc_covar_m1 = __privtrans->pdls[6]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
3210 60 0 __privtrans->__inc_pout_m = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 60 __privtrans->__inc_pout_m = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
3232 0 0 for(i=0; i<__copy->vtable->npdls; i++)
3236 0 0 if(__copy->__ddone) {
3254 0 6 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3257 0 6 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
3260 0 6 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
3263 0 6 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
3266 0 6 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
3269 0 6 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
3272 0 6 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
3275 0 6 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
3278 0 6 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
3281 0 6 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
3309 0 6 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
3345 6 6 for( __tind2 = 0 ;
3360 6 6 for( __tind1 = 0 ;
3376 12 6 for(m=0; m<(__m_size); m++) {
3377 0 12 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 12 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
3380 6 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
3404 0 6 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
3407 3 51 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3410 3 51 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 3 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
3413 0 54 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
3416 0 54 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
3419 0 54 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
3422 0 54 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
3425 0 54 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
3428 0 54 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
3431 0 54 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
3434 0 54 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
3462 0 54 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
3498 66 54 for( __tind2 = 0 ;
3513 119 66 for( __tind1 = 0 ;
3529 250 119 for(m=0; m<(__m_size); m++) {
3530 0 250 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 250 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
3533 119 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
3557 0 54 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
3576 60 0 if(__privtrans->__ddone) {
3622 0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
3623 0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
3624 0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
3625 0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
3626 0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
3632 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3635 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
3638 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
3641 0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
3644 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
3647 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
3650 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
3653 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
3656 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
3659 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
3662 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
3685 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
3688 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
3691 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
3694 0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
3697 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
3700 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
3703 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
3706 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
3709 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
3712 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
3715 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
3755 0 0 if(((__privtrans->pdls[0]))->ndims < 1) {
3756 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3758 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
3760 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
3761 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
3765 0 0 if(((__privtrans->pdls[1]))->ndims < 1) {
3766 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;
3768 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)) {
3770 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]) {
3771 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
3776 0 0 if(((__privtrans->pdls[2]))->ndims < 1) {
3777 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
3779 0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
3781 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
3782 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
3787 0 0 if(((__privtrans->pdls[3]))->ndims < 1) {
3788 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3790 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
3792 0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
3793 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
3798 0 0 if(((__privtrans->pdls[4]))->ndims < 1) {
3799 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
3801 0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
3803 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
3804 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
3809 0 0 if(((__privtrans->pdls[5]))->ndims < 1) {
3810 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
3812 0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
3814 0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
3815 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
3820 0 0 if(!__creating[6]) {
3821 0 0 if(((__privtrans->pdls[6]))->ndims < 1) {
3822 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
3824 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
3826 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
3827 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
3835 0 0 }if(!__creating[7]) {
3836 0 0 if(((__privtrans->pdls[7]))->ndims < 2) {
3837 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3838 0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3840 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
3842 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
3843 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
3847 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
3849 0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
3850 0 0 if(((__privtrans->pdls[7]))->dims[1] != 1) {
3858 0 0 }if(!__creating[8]) {
3862 0 0 }if(!__creating[9]) {
3863 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
3864 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
3866 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
3868 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
3869 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
3877 0 0 }if(!__creating[10]) {
3878 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
3879 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
3881 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
3883 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
3884 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
3897 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3898 0 0 __privtrans->pdls[0]->hdrsv &&
3904 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3905 0 0 __privtrans->pdls[1]->hdrsv &&
3911 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3912 0 0 __privtrans->pdls[2]->hdrsv &&
3918 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3919 0 0 __privtrans->pdls[3]->hdrsv &&
3925 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3926 0 0 __privtrans->pdls[4]->hdrsv &&
3932 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3933 0 0 __privtrans->pdls[5]->hdrsv &&
3939 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3940 0 0 !__creating[6] &&
3941 0 0 __privtrans->pdls[6]->hdrsv &&
3947 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3948 0 0 !__creating[7] &&
3949 0 0 __privtrans->pdls[7]->hdrsv &&
3955 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3956 0 0 !__creating[8] &&
3957 0 0 __privtrans->pdls[8]->hdrsv &&
3963 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3964 0 0 !__creating[9] &&
3965 0 0 __privtrans->pdls[9]->hdrsv &&
3971 0 0 if(!hdrp &&
0 0 if(!hdrp &&
3972 0 0 !__creating[10] &&
3973 0 0 __privtrans->pdls[10]->hdrsv &&
3979 0 0 if (hdrp) {
3980 0 0 if(hdrp == &PL_sv_undef)
3988 0 0 PUSHMARK(SP) ;
3989 0 0 XPUSHs( hdrp );
3993 0 0 if(count != 1)
3998 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
4002 0 0 FREETMPS ;
4008 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
4009 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)
4011 0 0 if( hdr_copy != &PL_sv_undef )
4015 0 0 if(propagate_hdrcpy)
4017 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
4018 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)
4020 0 0 if( hdr_copy != &PL_sv_undef )
4024 0 0 if(propagate_hdrcpy)
4026 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
4027 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
4029 0 0 if( hdr_copy != &PL_sv_undef )
4033 0 0 if(propagate_hdrcpy)
4035 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
4036 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)
4038 0 0 if( hdr_copy != &PL_sv_undef )
4042 0 0 if(propagate_hdrcpy)
4044 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
4045 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
4047 0 0 if( hdr_copy != &PL_sv_undef )
4051 0 0 if(propagate_hdrcpy)
4054 0 0 if(hdr_copy != &PL_sv_undef)
4058 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)
4060 0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
4062 0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
4064 0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
4066 0 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
4068 0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
4070 0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
4072 0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
4074 0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
4076 0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
4078 0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
4100 0 0 for(i=0; i<__copy->vtable->npdls; i++)
4104 0 0 if(__copy->__ddone) {
4122 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
4125 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
4128 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
4131 0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
4134 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
4137 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
4140 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
4143 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
4146 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
4149 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
4152 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
4180 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
4219 0 0 for( __tind2 = 0 ;
4235 0 0 for( __tind1 = 0 ;
4252 0 0 for(m=0; m<(__m_size); m++) {
4253 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
4256 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
4281 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
4284 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
4287 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
4290 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
4293 0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
4296 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
4299 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
4302 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
4305 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
4308 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
4311 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
4314 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
4342 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
4381 0 0 for( __tind2 = 0 ;
4397 0 0 for( __tind1 = 0 ;
4414 0 0 for(m=0; m<(__m_size); m++) {
4415 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
4418 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
4443 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
4462 0 0 if(__privtrans->__ddone) {
4509 5 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
5 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
4510 5 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
5 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
4511 5 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
5 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
4512 5 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
5 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
4513 5 0 __creating[11] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[11]);
5 0 __creating[11] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[11]);
4519 0 2 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
4522 0 2 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
4525 0 2 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
4528 0 2 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
4531 0 2 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
4534 0 2 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
4537 0 2 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
4540 0 2 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
4543 0 2 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
4546 0 2 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
4549 0 2 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
4552 0 2 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
4576 0 3 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
4579 0 3 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
4582 0 3 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
4585 0 3 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
4588 0 3 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
4591 0 3 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
4594 0 3 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
4597 0 3 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
4600 0 3 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
4603 0 3 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
4606 0 3 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
4609 0 3 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
4650 0 5 if(((__privtrans->pdls[0]))->ndims < 1) {
4651 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4653 0 5 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
4655 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
4656 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
4660 0 5 if(((__privtrans->pdls[1]))->ndims < 1) {
4661 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;
4663 0 5 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)) {
4665 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]) {
4666 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
4671 0 5 if(((__privtrans->pdls[2]))->ndims < 1) {
4672 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
4674 0 5 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
4676 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
4677 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
4682 0 5 if(((__privtrans->pdls[3]))->ndims < 1) {
4683 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4685 5 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
5 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 5 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
4687 5 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 5 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
4688 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
4693 0 5 if(((__privtrans->pdls[4]))->ndims < 1) {
4694 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4696 5 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
5 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 5 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size == 1)) {
4698 5 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) {
0 5 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[4]))->dims[0]) {
4699 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
4704 5 0 if(((__privtrans->pdls[5]))->ndims < 1) {
4705 5 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
5 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
4707 5 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 5 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size == 1)) {
4709 0 5 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[5]))->dims[0]) {
4710 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
4715 0 5 if(((__privtrans->pdls[6]))->ndims < 1) {
4716 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
4718 0 5 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
4720 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[6]))->dims[0]) {
4721 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
4726 0 5 if(!__creating[7]) {
4727 0 0 if(((__privtrans->pdls[7]))->ndims < 1) {
4728 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
4730 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size == 1)) {
4732 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[7]))->dims[0]) {
4733 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
4741 0 5 }if(!__creating[8]) {
4742 0 0 if(((__privtrans->pdls[8]))->ndims < 2) {
4743 0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4744 0 0 if (((__privtrans->pdls[8]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4746 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
4748 0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
4749 0 0 if(((__privtrans->pdls[8]))->dims[0] != 1) {
4753 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size == 1)) {
4755 0 0 } else if(((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[1]) {
4756 0 0 if(((__privtrans->pdls[8]))->dims[1] != 1) {
4764 5 0 }if(!__creating[9]) {
4768 0 5 }if(!__creating[10]) {
4769 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
4770 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
4772 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size == 1)) {
4774 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[10]))->dims[0]) {
4775 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
4783 0 5 }if(!__creating[11]) {
4784 0 0 if(((__privtrans->pdls[11]))->ndims < 1) {
4785 0 0 if (((__privtrans->pdls[11]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[11]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
4787 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size == 1)) {
4789 0 0 } else if(((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[11]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[11]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[11]))->dims[0]) {
4790 0 0 if(((__privtrans->pdls[11]))->dims[0] != 1) {
4803 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4804 0 0 __privtrans->pdls[0]->hdrsv &&
4810 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4811 0 0 __privtrans->pdls[1]->hdrsv &&
4817 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4818 0 0 __privtrans->pdls[2]->hdrsv &&
4824 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4825 0 0 __privtrans->pdls[3]->hdrsv &&
4831 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4832 0 0 __privtrans->pdls[4]->hdrsv &&
4838 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4839 0 0 __privtrans->pdls[5]->hdrsv &&
4845 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4846 0 0 __privtrans->pdls[6]->hdrsv &&
4852 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4853 0 0 !__creating[7] &&
4854 0 0 __privtrans->pdls[7]->hdrsv &&
4860 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4861 0 0 !__creating[8] &&
4862 0 0 __privtrans->pdls[8]->hdrsv &&
4868 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4869 0 0 !__creating[9] &&
4870 0 0 __privtrans->pdls[9]->hdrsv &&
4876 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4877 0 0 !__creating[10] &&
4878 0 0 __privtrans->pdls[10]->hdrsv &&
4884 5 0 if(!hdrp &&
0 5 if(!hdrp &&
4885 0 0 !__creating[11] &&
4886 0 0 __privtrans->pdls[11]->hdrsv &&
4892 0 5 if (hdrp) {
4893 0 0 if(hdrp == &PL_sv_undef)
4901 0 0 PUSHMARK(SP) ;
4902 0 0 XPUSHs( hdrp );
4906 0 0 if(count != 1)
4911 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
4915 0 0 FREETMPS ;
4921 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
4922 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)
4924 0 0 if( hdr_copy != &PL_sv_undef )
4928 0 0 if(propagate_hdrcpy)
4930 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
4931 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
4933 0 0 if( hdr_copy != &PL_sv_undef )
4937 0 0 if(propagate_hdrcpy)
4939 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
4940 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)
4942 0 0 if( hdr_copy != &PL_sv_undef )
4946 0 0 if(propagate_hdrcpy)
4948 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
4949 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
4951 0 0 if( hdr_copy != &PL_sv_undef )
4955 0 0 if(propagate_hdrcpy)
4957 0 0 if ( __privtrans->pdls[11]->hdrsv != hdrp ){
4958 0 0 if( __privtrans->pdls[11]->hdrsv && __privtrans->pdls[11]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[11]->hdrsv && __privtrans->pdls[11]->hdrsv != &PL_sv_undef)
4960 0 0 if( hdr_copy != &PL_sv_undef )
4964 0 0 if(propagate_hdrcpy)
4967 0 0 if(hdr_copy != &PL_sv_undef)
4971 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)
4973 0 5 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
5 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 5 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
4975 5 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
4 1 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
4977 5 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 5 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
4979 5 0 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 5 __privtrans->__inc_lb_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
4981 0 5 __privtrans->__inc_ub_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_ub_m = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
4983 5 0 __privtrans->__inc_iopts_in = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 5 __privtrans->__inc_iopts_in = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
4985 5 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 5 __privtrans->__inc_opts_nopt = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
4987 5 0 __privtrans->__inc_work_wn = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
0 5 __privtrans->__inc_work_wn = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
4989 5 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 1 || __privtrans->pdls[8]->dims[1] <= 1)
0 5 __privtrans->__inc_covar_m0 = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[8]->ndims <= 1 || __privtrans->pdls[8]->dims[1] <= 1)
4991 5 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[8]->dimincs[1];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 5 __privtrans->__inc_covar_m1 = __privtrans->pdls[8]->dimincs[1];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
4993 5 0 __privtrans->__inc_pout_m = __privtrans->pdls[10]->dimincs[0];if(__privtrans->pdls[11]->ndims <= 0 || __privtrans->pdls[11]->dims[0] <= 1)
0 5 __privtrans->__inc_pout_m = __privtrans->pdls[10]->dimincs[0];if(__privtrans->pdls[11]->ndims <= 0 || __privtrans->pdls[11]->dims[0] <= 1)
5015 0 0 for(i=0; i<__copy->vtable->npdls; i++)
5019 0 0 if(__copy->__ddone) {
5037 0 2 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
5040 0 2 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
5043 0 2 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
5046 0 2 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * lb_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
5049 0 2 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
5052 0 2 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
5055 0 2 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
5058 0 2 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
5061 0 2 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
5064 0 2 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
5067 0 2 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
5070 0 2 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
5099 0 2 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
5141 2 2 for( __tind2 = 0 ;
5158 2 2 for( __tind1 = 0 ;
5176 8 2 for(m=0; m<(__m_size); m++) {
5177 0 8 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 8 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
5180 2 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
5206 0 2 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
5209 0 3 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
5212 0 3 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
5215 0 3 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
5218 0 3 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * lb_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
5221 0 3 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
5224 0 3 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
5227 0 3 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
5230 0 3 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
5233 0 3 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
5236 0 3 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
5239 0 3 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
5242 0 3 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[11]),(__privtrans->vtable->per_pdl_flags[11]))));
5271 0 3 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
5313 3 3 for( __tind2 = 0 ;
5330 3 3 for( __tind1 = 0 ;
5348 11 3 for(m=0; m<(__m_size); m++) {
5349 0 11 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 11 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
5352 3 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
5378 0 3 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
5397 5 0 if(__privtrans->__ddone) {
5443 0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
0 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
5444 0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
0 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
5445 0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
0 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
5446 0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
0 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
5447 0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
0 0 __creating[10] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[10]);
5453 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
5456 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
5459 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
5462 0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
5465 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
5468 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
5471 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
5474 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
5477 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
5480 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
5483 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
5506 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
5509 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
5512 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
5515 0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
5518 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
5521 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
5524 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
5527 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
5530 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
5533 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
5536 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
5576 0 0 if(((__privtrans->pdls[0]))->ndims < 1) {
5577 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
5579 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
5581 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
5582 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
5586 0 0 if(((__privtrans->pdls[1]))->ndims < 1) {
5587 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;
5589 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)) {
5591 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]) {
5592 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
5597 0 0 if(((__privtrans->pdls[2]))->ndims < 1) {
5598 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
5600 0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
5602 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
5603 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
5608 0 0 if(((__privtrans->pdls[3]))->ndims < 1) {
5609 0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
5611 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size == 1)) {
5613 0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[3]))->dims[0]) {
5614 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
5619 0 0 if(((__privtrans->pdls[4]))->ndims < 1) {
5620 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
5622 0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size == 1)) {
5624 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[4]))->dims[0]) {
5625 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
5630 0 0 if(((__privtrans->pdls[5]))->ndims < 1) {
5631 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
5633 0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
5635 0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[5]))->dims[0]) {
5636 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
5641 0 0 if(!__creating[6]) {
5642 0 0 if(((__privtrans->pdls[6]))->ndims < 1) {
5643 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
5645 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size == 1)) {
5647 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[6]))->dims[0]) {
5648 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
5656 0 0 }if(!__creating[7]) {
5657 0 0 if(((__privtrans->pdls[7]))->ndims < 2) {
5658 0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
5659 0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[7]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
5661 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size == 1)) {
5663 0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[0]) {
5664 0 0 if(((__privtrans->pdls[7]))->dims[0] != 1) {
5668 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size == 1)) {
5670 0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[7]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[7]))->dims[1]) {
5671 0 0 if(((__privtrans->pdls[7]))->dims[1] != 1) {
5679 0 0 }if(!__creating[8]) {
5683 0 0 }if(!__creating[9]) {
5684 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
5685 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
5687 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size == 1)) {
5689 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[9]))->dims[0]) {
5690 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
5698 0 0 }if(!__creating[10]) {
5699 0 0 if(((__privtrans->pdls[10]))->ndims < 1) {
5700 0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[10]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
5702 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size == 1)) {
5704 0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[10]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[10]))->dims[0]) {
5705 0 0 if(((__privtrans->pdls[10]))->dims[0] != 1) {
5718 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5719 0 0 __privtrans->pdls[0]->hdrsv &&
5725 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5726 0 0 __privtrans->pdls[1]->hdrsv &&
5732 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5733 0 0 __privtrans->pdls[2]->hdrsv &&
5739 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5740 0 0 __privtrans->pdls[3]->hdrsv &&
5746 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5747 0 0 __privtrans->pdls[4]->hdrsv &&
5753 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5754 0 0 __privtrans->pdls[5]->hdrsv &&
5760 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5761 0 0 !__creating[6] &&
5762 0 0 __privtrans->pdls[6]->hdrsv &&
5768 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5769 0 0 !__creating[7] &&
5770 0 0 __privtrans->pdls[7]->hdrsv &&
5776 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5777 0 0 !__creating[8] &&
5778 0 0 __privtrans->pdls[8]->hdrsv &&
5784 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5785 0 0 !__creating[9] &&
5786 0 0 __privtrans->pdls[9]->hdrsv &&
5792 0 0 if(!hdrp &&
0 0 if(!hdrp &&
5793 0 0 !__creating[10] &&
5794 0 0 __privtrans->pdls[10]->hdrsv &&
5800 0 0 if (hdrp) {
5801 0 0 if(hdrp == &PL_sv_undef)
5809 0 0 PUSHMARK(SP) ;
5810 0 0 XPUSHs( hdrp );
5814 0 0 if(count != 1)
5819 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
5823 0 0 FREETMPS ;
5829 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
5830 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)
5832 0 0 if( hdr_copy != &PL_sv_undef )
5836 0 0 if(propagate_hdrcpy)
5838 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
5839 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)
5841 0 0 if( hdr_copy != &PL_sv_undef )
5845 0 0 if(propagate_hdrcpy)
5847 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
5848 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
5850 0 0 if( hdr_copy != &PL_sv_undef )
5854 0 0 if(propagate_hdrcpy)
5856 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
5857 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)
5859 0 0 if( hdr_copy != &PL_sv_undef )
5863 0 0 if(propagate_hdrcpy)
5865 0 0 if ( __privtrans->pdls[10]->hdrsv != hdrp ){
5866 0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[10]->hdrsv && __privtrans->pdls[10]->hdrsv != &PL_sv_undef)
5868 0 0 if( hdr_copy != &PL_sv_undef )
5872 0 0 if(propagate_hdrcpy)
5875 0 0 if(hdr_copy != &PL_sv_undef)
5879 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)
5881 0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
5883 0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
0 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
5885 0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
5887 0 0 __privtrans->__inc_ub_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 0 __privtrans->__inc_ub_m = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
5889 0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 0 __privtrans->__inc_iopts_in = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
5891 0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
5893 0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
0 0 __privtrans->__inc_work_wn = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 0 || __privtrans->pdls[7]->dims[0] <= 1)
5895 0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
0 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[7]->dimincs[0];if(__privtrans->pdls[7]->ndims <= 1 || __privtrans->pdls[7]->dims[1] <= 1)
5897 0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[7]->dimincs[1];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
5899 0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
0 0 __privtrans->__inc_pout_m = __privtrans->pdls[9]->dimincs[0];if(__privtrans->pdls[10]->ndims <= 0 || __privtrans->pdls[10]->dims[0] <= 1)
5921 0 0 for(i=0; i<__copy->vtable->npdls; i++)
5925 0 0 if(__copy->__ddone) {
5943 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
5946 0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
5949 0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
5952 0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Float * ub_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
5955 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
5958 0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
5961 0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
5964 0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
5967 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
5970 0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
5973 0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
6001 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
6040 0 0 for( __tind2 = 0 ;
6056 0 0 for( __tind1 = 0 ;
6073 0 0 for(m=0; m<(__m_size); m++) {
6074 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
6077 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
6102 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
6105 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
6108 0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
6111 0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
6114 0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Double * ub_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
6117 0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
6120 0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
6123 0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
6126 0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
6129 0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
6132 0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
6135 0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[10]),(__privtrans->vtable->per_pdl_flags[10]))));
6163 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
6202 0 0 for( __tind2 = 0 ;
6218 0 0 for( __tind1 = 0 ;
6235 0 0 for(m=0; m<(__m_size); m++) {
6236 0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 0 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
6239 0 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
6264 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
6283 0 0 if(__privtrans->__ddone) {
6328 15 0 __creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]);
15 0 __creating[5] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[5]);
6329 15 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
15 0 __creating[6] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[6]);
6330 15 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
15 0 __creating[7] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[7]);
6331 15 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
15 0 __creating[8] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[8]);
6332 15 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
15 0 __creating[9] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[9]);
6338 0 5 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
6341 0 5 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
6344 0 5 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
6347 0 5 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
6350 0 5 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
6353 0 5 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
6356 0 5 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
6359 0 5 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
6362 0 5 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
6365 0 5 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
6387 0 10 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
6390 0 10 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
6393 0 10 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
6396 0 10 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
6399 0 10 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
6402 0 10 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
6405 0 10 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
6408 0 10 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
6411 0 10 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
6414 0 10 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
6453 0 15 if(((__privtrans->pdls[0]))->ndims < 1) {
6454 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
6456 0 15 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
6458 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
6459 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
6463 0 15 if(((__privtrans->pdls[1]))->ndims < 1) {
6464 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;
6466 0 15 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)) {
6468 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]) {
6469 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
6474 0 15 if(((__privtrans->pdls[2]))->ndims < 1) {
6475 0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
0 0 if (((__privtrans->pdls[2]))->ndims < 1 && __privtrans->__nt_size <= 1) __privtrans->__nt_size = 1;
6477 0 15 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
0 0 if(__privtrans->__nt_size == -1 || (((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size == 1)) {
6479 0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[2]))->ndims > 0 && __privtrans->__nt_size != ((__privtrans->pdls[2]))->dims[0]) {
6480 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
6485 15 0 if(((__privtrans->pdls[3]))->ndims < 1) {
6486 15 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
15 0 if (((__privtrans->pdls[3]))->ndims < 1 && __privtrans->__in_size <= 1) __privtrans->__in_size = 1;
6488 15 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 15 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
0 0 if(__privtrans->__in_size == -1 || (((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size == 1)) {
6490 0 15 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[3]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[3]))->ndims > 0 && __privtrans->__in_size != ((__privtrans->pdls[3]))->dims[0]) {
6491 0 0 if(((__privtrans->pdls[3]))->dims[0] != 1) {
6496 0 15 if(((__privtrans->pdls[4]))->ndims < 1) {
6497 0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
0 0 if (((__privtrans->pdls[4]))->ndims < 1 && __privtrans->__nopt_size <= 1) __privtrans->__nopt_size = 1;
6499 0 15 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
0 0 if(__privtrans->__nopt_size == -1 || (((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size == 1)) {
6501 0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[4]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[4]))->ndims > 0 && __privtrans->__nopt_size != ((__privtrans->pdls[4]))->dims[0]) {
6502 0 0 if(((__privtrans->pdls[4]))->dims[0] != 1) {
6507 0 15 if(!__creating[5]) {
6508 0 0 if(((__privtrans->pdls[5]))->ndims < 1) {
6509 0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
0 0 if (((__privtrans->pdls[5]))->ndims < 1 && __privtrans->__wn_size <= 1) __privtrans->__wn_size = 1;
6511 0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
0 0 if(__privtrans->__wn_size == -1 || (((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size == 1)) {
6513 0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[5]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[5]))->ndims > 0 && __privtrans->__wn_size != ((__privtrans->pdls[5]))->dims[0]) {
6514 0 0 if(((__privtrans->pdls[5]))->dims[0] != 1) {
6522 0 15 }if(!__creating[6]) {
6523 0 0 if(((__privtrans->pdls[6]))->ndims < 2) {
6524 0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
6525 0 0 if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[6]))->ndims < 2 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
6527 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size == 1)) {
6529 0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[0]) {
6530 0 0 if(((__privtrans->pdls[6]))->dims[0] != 1) {
6534 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size == 1)) {
6536 0 0 } else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[1]) {
0 0 } else if(((__privtrans->pdls[6]))->ndims > 1 && __privtrans->__m_size != ((__privtrans->pdls[6]))->dims[1]) {
6537 0 0 if(((__privtrans->pdls[6]))->dims[1] != 1) {
6545 15 0 }if(!__creating[7]) {
6549 0 15 }if(!__creating[8]) {
6550 0 0 if(((__privtrans->pdls[8]))->ndims < 1) {
6551 0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[8]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
6553 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size == 1)) {
6555 0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[8]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[8]))->dims[0]) {
6556 0 0 if(((__privtrans->pdls[8]))->dims[0] != 1) {
6564 0 15 }if(!__creating[9]) {
6565 0 0 if(((__privtrans->pdls[9]))->ndims < 1) {
6566 0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
0 0 if (((__privtrans->pdls[9]))->ndims < 1 && __privtrans->__q_size <= 1) __privtrans->__q_size = 1;
6568 0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
0 0 if(__privtrans->__q_size == -1 || (((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size == 1)) {
6570 0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[9]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[9]))->ndims > 0 && __privtrans->__q_size != ((__privtrans->pdls[9]))->dims[0]) {
6571 0 0 if(((__privtrans->pdls[9]))->dims[0] != 1) {
6584 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6585 0 0 __privtrans->pdls[0]->hdrsv &&
6591 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6592 0 0 __privtrans->pdls[1]->hdrsv &&
6598 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6599 0 0 __privtrans->pdls[2]->hdrsv &&
6605 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6606 0 0 __privtrans->pdls[3]->hdrsv &&
6612 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6613 0 0 __privtrans->pdls[4]->hdrsv &&
6619 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6620 0 0 !__creating[5] &&
6621 0 0 __privtrans->pdls[5]->hdrsv &&
6627 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6628 0 0 !__creating[6] &&
6629 0 0 __privtrans->pdls[6]->hdrsv &&
6635 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6636 0 0 !__creating[7] &&
6637 0 0 __privtrans->pdls[7]->hdrsv &&
6643 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6644 0 0 !__creating[8] &&
6645 0 0 __privtrans->pdls[8]->hdrsv &&
6651 15 0 if(!hdrp &&
0 15 if(!hdrp &&
6652 0 0 !__creating[9] &&
6653 0 0 __privtrans->pdls[9]->hdrsv &&
6659 0 15 if (hdrp) {
6660 0 0 if(hdrp == &PL_sv_undef)
6668 0 0 PUSHMARK(SP) ;
6669 0 0 XPUSHs( hdrp );
6673 0 0 if(count != 1)
6678 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
6682 0 0 FREETMPS ;
6688 0 0 if ( __privtrans->pdls[5]->hdrsv != hdrp ){
6689 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)
6691 0 0 if( hdr_copy != &PL_sv_undef )
6695 0 0 if(propagate_hdrcpy)
6697 0 0 if ( __privtrans->pdls[6]->hdrsv != hdrp ){
6698 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)
6700 0 0 if( hdr_copy != &PL_sv_undef )
6704 0 0 if(propagate_hdrcpy)
6706 0 0 if ( __privtrans->pdls[7]->hdrsv != hdrp ){
6707 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)
6709 0 0 if( hdr_copy != &PL_sv_undef )
6713 0 0 if(propagate_hdrcpy)
6715 0 0 if ( __privtrans->pdls[8]->hdrsv != hdrp ){
6716 0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
0 0 if( __privtrans->pdls[8]->hdrsv && __privtrans->pdls[8]->hdrsv != &PL_sv_undef)
6718 0 0 if( hdr_copy != &PL_sv_undef )
6722 0 0 if(propagate_hdrcpy)
6724 0 0 if ( __privtrans->pdls[9]->hdrsv != hdrp ){
6725 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)
6727 0 0 if( hdr_copy != &PL_sv_undef )
6731 0 0 if(propagate_hdrcpy)
6734 0 0 if(hdr_copy != &PL_sv_undef)
6738 15 0 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
0 15 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
6740 0 15 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
15 0 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 15 __privtrans->__inc_p_m = PDL_REPRINC(__privtrans->pdls[0],0);if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
6742 15 0 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
9 6 __privtrans->__inc_x_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
6744 0 15 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
0 0 __privtrans->__inc_t_nt = __privtrans->pdls[2]->dimincs[0];if(__privtrans->pdls[3]->ndims <= 0 || __privtrans->pdls[3]->dims[0] <= 1)
6746 15 0 __privtrans->__inc_iopts_in = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
0 15 __privtrans->__inc_iopts_in = __privtrans->pdls[3]->dimincs[0];if(__privtrans->pdls[4]->ndims <= 0 || __privtrans->pdls[4]->dims[0] <= 1)
6748 15 0 __privtrans->__inc_opts_nopt = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
0 15 __privtrans->__inc_opts_nopt = __privtrans->pdls[4]->dimincs[0];if(__privtrans->pdls[5]->ndims <= 0 || __privtrans->pdls[5]->dims[0] <= 1)
6750 15 0 __privtrans->__inc_work_wn = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
0 15 __privtrans->__inc_work_wn = __privtrans->pdls[5]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 0 || __privtrans->pdls[6]->dims[0] <= 1)
6752 15 0 __privtrans->__inc_covar_m0 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1)
0 15 __privtrans->__inc_covar_m0 = __privtrans->pdls[6]->dimincs[0];if(__privtrans->pdls[6]->ndims <= 1 || __privtrans->pdls[6]->dims[1] <= 1)
6754 15 0 __privtrans->__inc_covar_m1 = __privtrans->pdls[6]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
0 15 __privtrans->__inc_covar_m1 = __privtrans->pdls[6]->dimincs[1];if(__privtrans->pdls[8]->ndims <= 0 || __privtrans->pdls[8]->dims[0] <= 1)
6756 15 0 __privtrans->__inc_pout_m = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
0 15 __privtrans->__inc_pout_m = __privtrans->pdls[8]->dimincs[0];if(__privtrans->pdls[9]->ndims <= 0 || __privtrans->pdls[9]->dims[0] <= 1)
6778 0 0 for(i=0; i<__copy->vtable->npdls; i++)
6782 0 0 if(__copy->__ddone) {
6800 0 5 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
6803 0 5 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * x_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
6806 0 5 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
6809 0 5 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
6812 0 5 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Float * opts_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
6815 0 5 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Float * work_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
6818 0 5 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Float * covar_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
6821 0 5 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
6824 0 5 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Float * pout_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
6827 0 5 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Float * info_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
6854 0 5 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
6890 5 5 for( __tind2 = 0 ;
6905 5 5 for( __tind1 = 0 ;
6921 11 5 for(m=0; m<(__m_size); m++) {
6922 0 11 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 11 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
6925 5 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
6949 0 5 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
6952 0 10 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
6955 0 10 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * x_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
6958 0 10 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
6961 0 10 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
0 0 PDL_Long * iopts_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[3]),(__privtrans->vtable->per_pdl_flags[3]))));
6964 0 10 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
0 0 PDL_Double * opts_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[4]),(__privtrans->vtable->per_pdl_flags[4]))));
6967 0 10 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
0 0 PDL_Double * work_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[5]),(__privtrans->vtable->per_pdl_flags[5]))));
6970 0 10 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
0 0 PDL_Double * covar_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[6]),(__privtrans->vtable->per_pdl_flags[6]))));
6973 0 10 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
0 0 PDL_Long * returnval_datap = ((PDL_Long *)(PDL_REPRP_TRANS((__privtrans->pdls[7]),(__privtrans->vtable->per_pdl_flags[7]))));
6976 0 10 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
0 0 PDL_Double * pout_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[8]),(__privtrans->vtable->per_pdl_flags[8]))));
6979 0 10 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
0 0 PDL_Double * info_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[9]),(__privtrans->vtable->per_pdl_flags[9]))));
7006 0 10 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
7042 10 10 for( __tind2 = 0 ;
7057 13 10 for( __tind1 = 0 ;
7073 30 13 for(m=0; m<(__m_size); m++) {
7074 0 30 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
0 30 (pout_datap)[0+(__inc_pout_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") = (p_datap)[0+(__inc_p_m*PP_INDTERM(__privtrans->__m_size, m))] PDL_COMMENT("ACCESS()") ;
7077 13 0 if ( __privtrans->want_covar == 1 ) pcovar = covar_datap;
7101 0 10 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2));
7120 15 0 if(__privtrans->__ddone) {
7157 4 0 __creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]);
4 0 __creating[2] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[2]);
7163 0 2 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7166 0 2 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7169 0 2 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
7178 0 2 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7181 0 2 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7184 0 2 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
7210 0 4 if(((__privtrans->pdls[0]))->ndims < 1) {
7211 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
7213 0 4 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
7215 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
7216 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
7221 0 4 if(((__privtrans->pdls[1]))->ndims < 1) {
7222 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;
7224 0 4 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)) {
7226 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]) {
7227 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
7232 0 4 if(!__creating[2]) {
7233 0 0 if(((__privtrans->pdls[2]))->ndims < 1) {
7234 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;
7236 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)) {
7238 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]) {
7239 0 0 if(((__privtrans->pdls[2]))->dims[0] != 1) {
7252 4 0 if(!hdrp &&
0 4 if(!hdrp &&
7253 0 0 __privtrans->pdls[0]->hdrsv &&
7259 4 0 if(!hdrp &&
0 4 if(!hdrp &&
7260 0 0 __privtrans->pdls[1]->hdrsv &&
7266 4 0 if(!hdrp &&
0 4 if(!hdrp &&
7267 0 0 !__creating[2] &&
7268 0 0 __privtrans->pdls[2]->hdrsv &&
7274 0 4 if (hdrp) {
7275 0 0 if(hdrp == &PL_sv_undef)
7283 0 0 PUSHMARK(SP) ;
7284 0 0 XPUSHs( hdrp );
7288 0 0 if(count != 1)
7293 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
7297 0 0 FREETMPS ;
7303 0 0 if ( __privtrans->pdls[2]->hdrsv != hdrp ){
7304 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)
7306 0 0 if( hdr_copy != &PL_sv_undef )
7310 0 0 if(propagate_hdrcpy)
7313 0 0 if(hdr_copy != &PL_sv_undef)
7317 4 0 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
0 4 if(__privtrans->pdls[0]->ndims <= 0 || __privtrans->pdls[0]->dims[0] <= 1)
7319 4 0 __privtrans->__inc_p_m = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 4 __privtrans->__inc_p_m = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
7321 4 0 __privtrans->__inc_t_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
0 4 __privtrans->__inc_t_n = __privtrans->pdls[1]->dimincs[0];if(__privtrans->pdls[2]->ndims <= 0 || __privtrans->pdls[2]->dims[0] <= 1)
7343 0 0 for(i=0; i<__copy->vtable->npdls; i++)
7347 0 0 if(__copy->__ddone) {
7364 0 2 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7367 0 2 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * t_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7370 0 2 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
7375 0 2 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
7390 2 2 for( __tind2 = 0 ;
7398 2 2 for( __tind1 = 0 ;
7427 0 2 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: {
7428 0 2 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7431 0 2 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * t_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7434 0 2 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[2]),(__privtrans->vtable->per_pdl_flags[2]))));
7439 0 2 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
7454 2 2 for( __tind2 = 0 ;
7462 2 2 for( __tind1 = 0 ;
7491 0 2 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;}
7508 4 0 if(__privtrans->__ddone) {
7544 0 0 __creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]);
0 0 __creating[1] = PDL_CR_SETDIMSCOND(__privtrans,__privtrans->pdls[1]);
7550 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7553 0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7565 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7568 0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7597 0 0 if(((__privtrans->pdls[0]))->ndims < 1) {
7598 0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
0 0 if (((__privtrans->pdls[0]))->ndims < 1 && __privtrans->__m_size <= 1) __privtrans->__m_size = 1;
7600 0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
0 0 if(__privtrans->__m_size == -1 || (((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size == 1)) {
7602 0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
0 0 } else if(((__privtrans->pdls[0]))->ndims > 0 && __privtrans->__m_size != ((__privtrans->pdls[0]))->dims[0]) {
7603 0 0 if(((__privtrans->pdls[0]))->dims[0] != 1) {
7608 0 0 if(!__creating[1]) {
7609 0 0 if(((__privtrans->pdls[1]))->ndims < 1) {
7610 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;
7612 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)) {
7614 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]) {
7615 0 0 if(((__privtrans->pdls[1]))->dims[0] != 1) {
7628 0 0 if(!hdrp &&
0 0 if(!hdrp &&
7629 0 0 __privtrans->pdls[0]->hdrsv &&
7635 0 0 if(!hdrp &&
0 0 if(!hdrp &&
7636 0 0 !__creating[1] &&
7637 0 0 __privtrans->pdls[1]->hdrsv &&
7643 0 0 if (hdrp) {
7644 0 0 if(hdrp == &PL_sv_undef)
7652 0 0 PUSHMARK(SP) ;
7653 0 0 XPUSHs( hdrp );
7657 0 0 if(count != 1)
7662 0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
0 0 if(hdr_copy && hdr_copy != &PL_sv_undef) {
7666 0 0 FREETMPS ;
7672 0 0 if ( __privtrans->pdls[1]->hdrsv != hdrp ){
7673 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)
7675 0 0 if( hdr_copy != &PL_sv_undef )
7679 0 0 if(propagate_hdrcpy)
7682 0 0 if(hdr_copy != &PL_sv_undef)
7686 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)
7688 0 0 __privtrans->__inc_p_m = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
0 0 __privtrans->__inc_p_m = __privtrans->pdls[0]->dimincs[0];if(__privtrans->pdls[1]->ndims <= 0 || __privtrans->pdls[1]->dims[0] <= 1)
7710 0 0 for(i=0; i<__copy->vtable->npdls; i++)
7714 0 0 if(__copy->__ddone) {
7731 0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Float * p_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7734 0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Float * err_datap = ((PDL_Float *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7739 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
7751 0 0 for( __tind2 = 0 ;
7758 0 0 for( __tind1 = 0 ;
7784 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); } break; case PDL_D: {
7785 0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
0 0 PDL_Double * p_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[0]),(__privtrans->vtable->per_pdl_flags[0]))));
7788 0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
0 0 PDL_Double * err_datap = ((PDL_Double *)(PDL_REPRP_TRANS((__privtrans->pdls[1]),(__privtrans->vtable->per_pdl_flags[1]))));
7793 0 0 if ( PDL->startthreadloop(&(__privtrans->__pdlthread),__privtrans->vtable->readdata, __tr) ) return;
7805 0 0 for( __tind2 = 0 ;
7812 0 0 for( __tind1 = 0 ;
7838 0 0 } while(PDL->iterthreadloop(&__privtrans->__pdlthread,2)); break;}
7855 0 0 if(__privtrans->__ddone) {
7940 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))) {
7942 0 0 if (sv_isobject(parent)){
7944 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")
7947 0 0 if (items == 17) { PDL_COMMENT("all variables on stack, read in output and temp vars")
7960 0 0 funcn = (IV)SvIV(ST(11))
7962 0 0 sfuncn = (IV)SvIV(ST(12))
7964 0 0 jacn = (IV)SvIV(ST(13))
7966 0 0 sjacn = (IV)SvIV(ST(14))
7968 0 0 indat = (IV)SvIV(ST(15))
7970 0 0 want_covar = (int)SvIV(ST(16))
7973 0 0 else if (items == 16) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
7984 0 0 funcn = (IV)SvIV(ST(10))
7986 0 0 sfuncn = (IV)SvIV(ST(11))
7988 0 0 jacn = (IV)SvIV(ST(12))
7990 0 0 sjacn = (IV)SvIV(ST(13))
7992 0 0 indat = (IV)SvIV(ST(14))
7994 0 0 want_covar = (int)SvIV(ST(15))
7996 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8000 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8002 0 0 PUSHMARK(SP);
8003 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8012 0 0 else if (items == 12) { PDL_COMMENT("only input variables on stack, create outputs and temps")
8020 0 0 funcn = (IV)SvIV(ST(6))
8022 0 0 sfuncn = (IV)SvIV(ST(7))
8024 0 0 jacn = (IV)SvIV(ST(8))
8026 0 0 sjacn = (IV)SvIV(ST(9))
8028 0 0 indat = (IV)SvIV(ST(10))
8030 0 0 want_covar = (int)SvIV(ST(11))
8032 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8036 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8038 0 0 PUSHMARK(SP);
8039 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8047 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8051 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
8053 0 0 PUSHMARK(SP);
8054 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8062 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8066 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
8068 0 0 PUSHMARK(SP);
8069 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8077 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8081 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
8083 0 0 PUSHMARK(SP);
8084 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8092 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8096 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
8098 0 0 PUSHMARK(SP);
8099 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8124 0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
8125 0 0 if (badflag_cache) __privtrans->bvalflag = 1;
8126 0 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
8129 0 0 if(__privtrans->__datatype < x->datatype) {
8132 0 0 if(__privtrans->__datatype < t->datatype) {
8135 0 0 if(__privtrans->__datatype < lb->datatype) {
8138 0 0 if(__privtrans->__datatype < opts->datatype) {
8141 0 0 if(!((work->state & PDL_NOMYDIMS) &&
0 0 if(!((work->state & PDL_NOMYDIMS) &&
8142 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
8145 0 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 0 if(!((covar->state & PDL_NOMYDIMS) &&
8146 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
8149 0 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 0 if(!((pout->state & PDL_NOMYDIMS) &&
8150 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
8153 0 0 if(!((info->state & PDL_NOMYDIMS) &&
0 0 if(!((info->state & PDL_NOMYDIMS) &&
8154 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
8157 0 0 if(__privtrans->__datatype == PDL_F) {}
8158 0 0 else if(__privtrans->__datatype == PDL_D) {}
8160 0 0 if(__privtrans->__datatype != p->datatype) {
8162 0 0 }if(__privtrans->__datatype != x->datatype) {
8164 0 0 }if(__privtrans->__datatype != t->datatype) {
8166 0 0 }if(__privtrans->__datatype != lb->datatype) {
8168 0 0 }if(PDL_L != iopts->datatype) {
8170 0 0 }if(__privtrans->__datatype != opts->datatype) {
8172 0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
8174 0 0 } else if(__privtrans->__datatype != work->datatype) {
8176 0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
8178 0 0 } else if(__privtrans->__datatype != covar->datatype) {
8180 0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
8182 0 0 } else if(PDL_L != returnval->datatype) {
8184 0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
8186 0 0 } else if(__privtrans->__datatype != pout->datatype) {
8188 0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
8190 0 0 } else if(__privtrans->__datatype != info->datatype) {
8204 0 0 if (badflag_cache) {
8210 0 0 if (nreturn) {
8211 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);
8258 9 0 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
0 9 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))) {
8260 9 0 if (sv_isobject(parent)){
8262 9 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
9 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 9 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")
9 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 9 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
8265 9 0 if (items == 18) { PDL_COMMENT("all variables on stack, read in output and temp vars")
8279 9 0 funcn = (IV)SvIV(ST(12))
8281 9 0 sfuncn = (IV)SvIV(ST(13))
8283 9 0 jacn = (IV)SvIV(ST(14))
8285 9 0 sjacn = (IV)SvIV(ST(15))
8287 9 0 indat = (IV)SvIV(ST(16))
8289 9 0 want_covar = (int)SvIV(ST(17))
8292 0 0 else if (items == 17) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
8304 0 0 funcn = (IV)SvIV(ST(11))
8306 0 0 sfuncn = (IV)SvIV(ST(12))
8308 0 0 jacn = (IV)SvIV(ST(13))
8310 0 0 sjacn = (IV)SvIV(ST(14))
8312 0 0 indat = (IV)SvIV(ST(15))
8314 0 0 want_covar = (int)SvIV(ST(16))
8316 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8320 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8322 0 0 PUSHMARK(SP);
8323 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8332 0 0 else if (items == 13) { PDL_COMMENT("only input variables on stack, create outputs and temps")
8341 0 0 funcn = (IV)SvIV(ST(7))
8343 0 0 sfuncn = (IV)SvIV(ST(8))
8345 0 0 jacn = (IV)SvIV(ST(9))
8347 0 0 sjacn = (IV)SvIV(ST(10))
8349 0 0 indat = (IV)SvIV(ST(11))
8351 0 0 want_covar = (int)SvIV(ST(12))
8353 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8357 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8359 0 0 PUSHMARK(SP);
8360 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8368 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8372 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
8374 0 0 PUSHMARK(SP);
8375 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8383 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8387 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
8389 0 0 PUSHMARK(SP);
8390 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8398 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8402 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
8404 0 0 PUSHMARK(SP);
8405 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8413 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8417 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
8419 0 0 PUSHMARK(SP);
8420 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8445 9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 9 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
8446 0 9 if (badflag_cache) __privtrans->bvalflag = 1;
8447 9 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
8450 0 9 if(__privtrans->__datatype < x->datatype) {
8453 0 9 if(__privtrans->__datatype < t->datatype) {
8456 0 9 if(__privtrans->__datatype < lb->datatype) {
8459 0 9 if(__privtrans->__datatype < ub->datatype) {
8462 0 9 if(__privtrans->__datatype < opts->datatype) {
8465 9 0 if(!((work->state & PDL_NOMYDIMS) &&
0 9 if(!((work->state & PDL_NOMYDIMS) &&
8466 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
8469 9 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 9 if(!((covar->state & PDL_NOMYDIMS) &&
8470 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
8473 9 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 9 if(!((pout->state & PDL_NOMYDIMS) &&
8474 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
8477 9 0 if(!((info->state & PDL_NOMYDIMS) &&
0 9 if(!((info->state & PDL_NOMYDIMS) &&
8478 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
8481 6 3 if(__privtrans->__datatype == PDL_F) {}
8482 0 6 else if(__privtrans->__datatype == PDL_D) {}
8484 0 9 if(__privtrans->__datatype != p->datatype) {
8486 1 8 }if(__privtrans->__datatype != x->datatype) {
8488 8 1 }if(__privtrans->__datatype != t->datatype) {
8490 1 8 }if(__privtrans->__datatype != lb->datatype) {
8492 1 8 }if(__privtrans->__datatype != ub->datatype) {
8494 0 9 }if(PDL_L != iopts->datatype) {
8496 0 9 }if(__privtrans->__datatype != opts->datatype) {
8498 9 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
9 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
8500 0 0 } else if(__privtrans->__datatype != work->datatype) {
8502 9 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
9 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
8504 0 0 } else if(__privtrans->__datatype != covar->datatype) {
8506 9 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
9 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
8508 0 0 } else if(PDL_L != returnval->datatype) {
8510 9 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
9 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
8512 0 0 } else if(__privtrans->__datatype != pout->datatype) {
8514 9 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
9 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
8516 0 0 } else if(__privtrans->__datatype != info->datatype) {
8531 0 9 if (badflag_cache) {
8537 0 9 if (nreturn) {
8538 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);
8584 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))) {
8586 0 0 if (sv_isobject(parent)){
8588 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")
8591 0 0 if (items == 17) { PDL_COMMENT("all variables on stack, read in output and temp vars")
8604 0 0 funcn = (IV)SvIV(ST(11))
8606 0 0 sfuncn = (IV)SvIV(ST(12))
8608 0 0 jacn = (IV)SvIV(ST(13))
8610 0 0 sjacn = (IV)SvIV(ST(14))
8612 0 0 indat = (IV)SvIV(ST(15))
8614 0 0 want_covar = (int)SvIV(ST(16))
8617 0 0 else if (items == 16) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
8628 0 0 funcn = (IV)SvIV(ST(10))
8630 0 0 sfuncn = (IV)SvIV(ST(11))
8632 0 0 jacn = (IV)SvIV(ST(12))
8634 0 0 sjacn = (IV)SvIV(ST(13))
8636 0 0 indat = (IV)SvIV(ST(14))
8638 0 0 want_covar = (int)SvIV(ST(15))
8640 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8644 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8646 0 0 PUSHMARK(SP);
8647 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8656 0 0 else if (items == 12) { PDL_COMMENT("only input variables on stack, create outputs and temps")
8664 0 0 funcn = (IV)SvIV(ST(6))
8666 0 0 sfuncn = (IV)SvIV(ST(7))
8668 0 0 jacn = (IV)SvIV(ST(8))
8670 0 0 sjacn = (IV)SvIV(ST(9))
8672 0 0 indat = (IV)SvIV(ST(10))
8674 0 0 want_covar = (int)SvIV(ST(11))
8676 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8680 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8682 0 0 PUSHMARK(SP);
8683 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8691 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8695 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
8697 0 0 PUSHMARK(SP);
8698 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8706 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8710 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
8712 0 0 PUSHMARK(SP);
8713 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8721 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8725 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
8727 0 0 PUSHMARK(SP);
8728 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8736 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8740 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
8742 0 0 PUSHMARK(SP);
8743 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8768 0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
8769 0 0 if (badflag_cache) __privtrans->bvalflag = 1;
8770 0 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
8773 0 0 if(__privtrans->__datatype < x->datatype) {
8776 0 0 if(__privtrans->__datatype < t->datatype) {
8779 0 0 if(__privtrans->__datatype < ub->datatype) {
8782 0 0 if(__privtrans->__datatype < opts->datatype) {
8785 0 0 if(!((work->state & PDL_NOMYDIMS) &&
0 0 if(!((work->state & PDL_NOMYDIMS) &&
8786 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
8789 0 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 0 if(!((covar->state & PDL_NOMYDIMS) &&
8790 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
8793 0 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 0 if(!((pout->state & PDL_NOMYDIMS) &&
8794 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
8797 0 0 if(!((info->state & PDL_NOMYDIMS) &&
0 0 if(!((info->state & PDL_NOMYDIMS) &&
8798 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
8801 0 0 if(__privtrans->__datatype == PDL_F) {}
8802 0 0 else if(__privtrans->__datatype == PDL_D) {}
8804 0 0 if(__privtrans->__datatype != p->datatype) {
8806 0 0 }if(__privtrans->__datatype != x->datatype) {
8808 0 0 }if(__privtrans->__datatype != t->datatype) {
8810 0 0 }if(__privtrans->__datatype != ub->datatype) {
8812 0 0 }if(PDL_L != iopts->datatype) {
8814 0 0 }if(__privtrans->__datatype != opts->datatype) {
8816 0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
8818 0 0 } else if(__privtrans->__datatype != work->datatype) {
8820 0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
8822 0 0 } else if(__privtrans->__datatype != covar->datatype) {
8824 0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
8826 0 0 } else if(PDL_L != returnval->datatype) {
8828 0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
8830 0 0 } else if(__privtrans->__datatype != pout->datatype) {
8832 0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
8834 0 0 } else if(__privtrans->__datatype != info->datatype) {
8848 0 0 if (badflag_cache) {
8854 0 0 if (nreturn) {
8855 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);
8900 60 0 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
0 60 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))) {
8902 60 0 if (sv_isobject(parent)){
8904 60 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
60 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 60 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")
60 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 60 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
8907 60 0 if (items == 16) { PDL_COMMENT("all variables on stack, read in output and temp vars")
8919 60 0 funcn = (IV)SvIV(ST(10))
8921 60 0 sfuncn = (IV)SvIV(ST(11))
8923 60 0 jacn = (IV)SvIV(ST(12))
8925 60 0 sjacn = (IV)SvIV(ST(13))
8927 60 0 indat = (IV)SvIV(ST(14))
8929 60 0 want_covar = (int)SvIV(ST(15))
8932 0 0 else if (items == 15) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
8942 0 0 funcn = (IV)SvIV(ST(9))
8944 0 0 sfuncn = (IV)SvIV(ST(10))
8946 0 0 jacn = (IV)SvIV(ST(11))
8948 0 0 sjacn = (IV)SvIV(ST(12))
8950 0 0 indat = (IV)SvIV(ST(13))
8952 0 0 want_covar = (int)SvIV(ST(14))
8954 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8958 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8960 0 0 PUSHMARK(SP);
8961 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
8970 0 0 else if (items == 11) { PDL_COMMENT("only input variables on stack, create outputs and temps")
8977 0 0 funcn = (IV)SvIV(ST(5))
8979 0 0 sfuncn = (IV)SvIV(ST(6))
8981 0 0 jacn = (IV)SvIV(ST(7))
8983 0 0 sjacn = (IV)SvIV(ST(8))
8985 0 0 indat = (IV)SvIV(ST(9))
8987 0 0 want_covar = (int)SvIV(ST(10))
8989 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
8993 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
8995 0 0 PUSHMARK(SP);
8996 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9004 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9008 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
9010 0 0 PUSHMARK(SP);
9011 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9019 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9023 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
9025 0 0 PUSHMARK(SP);
9026 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9034 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9038 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
9040 0 0 PUSHMARK(SP);
9041 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9049 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9053 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
9055 0 0 PUSHMARK(SP);
9056 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9081 60 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
60 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
60 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
60 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 60 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9082 0 60 if (badflag_cache) __privtrans->bvalflag = 1;
9083 60 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
9086 0 60 if(__privtrans->__datatype < x->datatype) {
9089 0 60 if(__privtrans->__datatype < t->datatype) {
9092 0 60 if(__privtrans->__datatype < opts->datatype) {
9095 59 1 if(!((work->state & PDL_NOMYDIMS) &&
0 59 if(!((work->state & PDL_NOMYDIMS) &&
9096 0 1 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
9099 59 1 if(!((covar->state & PDL_NOMYDIMS) &&
0 59 if(!((covar->state & PDL_NOMYDIMS) &&
9100 0 1 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
9103 60 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 60 if(!((pout->state & PDL_NOMYDIMS) &&
9104 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
9107 60 0 if(!((info->state & PDL_NOMYDIMS) &&
0 60 if(!((info->state & PDL_NOMYDIMS) &&
9108 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
9111 54 6 if(__privtrans->__datatype == PDL_F) {}
9112 0 54 else if(__privtrans->__datatype == PDL_D) {}
9114 0 60 if(__privtrans->__datatype != p->datatype) {
9116 0 60 }if(__privtrans->__datatype != x->datatype) {
9118 12 48 }if(__privtrans->__datatype != t->datatype) {
9120 0 60 }if(PDL_L != iopts->datatype) {
9122 0 60 }if(__privtrans->__datatype != opts->datatype) {
9124 59 1 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
59 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
9126 0 1 } else if(__privtrans->__datatype != work->datatype) {
9128 59 1 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
59 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
9130 0 1 } else if(__privtrans->__datatype != covar->datatype) {
9132 60 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
60 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
9134 0 0 } else if(PDL_L != returnval->datatype) {
9136 60 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
60 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
9138 0 0 } else if(__privtrans->__datatype != pout->datatype) {
9140 60 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
60 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
9142 0 0 } else if(__privtrans->__datatype != info->datatype) {
9155 0 60 if (badflag_cache) {
9161 0 60 if (nreturn) {
9162 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);
9206 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))) {
9208 0 0 if (sv_isobject(parent)){
9210 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")
9213 0 0 if (items == 15) { PDL_COMMENT("all variables on stack, read in output and temp vars")
9226 0 0 funcn = (IV)SvIV(ST(11))
9228 0 0 sfuncn = (IV)SvIV(ST(12))
9230 0 0 indat = (IV)SvIV(ST(13))
9232 0 0 want_covar = (int)SvIV(ST(14))
9235 0 0 else if (items == 14) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
9246 0 0 funcn = (IV)SvIV(ST(10))
9248 0 0 sfuncn = (IV)SvIV(ST(11))
9250 0 0 indat = (IV)SvIV(ST(12))
9252 0 0 want_covar = (int)SvIV(ST(13))
9254 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9258 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9260 0 0 PUSHMARK(SP);
9261 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9270 0 0 else if (items == 10) { PDL_COMMENT("only input variables on stack, create outputs and temps")
9278 0 0 funcn = (IV)SvIV(ST(6))
9280 0 0 sfuncn = (IV)SvIV(ST(7))
9282 0 0 indat = (IV)SvIV(ST(8))
9284 0 0 want_covar = (int)SvIV(ST(9))
9286 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9290 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9292 0 0 PUSHMARK(SP);
9293 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9301 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9305 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
9307 0 0 PUSHMARK(SP);
9308 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9316 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9320 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
9322 0 0 PUSHMARK(SP);
9323 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9331 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9335 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
9337 0 0 PUSHMARK(SP);
9338 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9346 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9350 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
9352 0 0 PUSHMARK(SP);
9353 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9378 0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9379 0 0 if (badflag_cache) __privtrans->bvalflag = 1;
9380 0 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
9383 0 0 if(__privtrans->__datatype < x->datatype) {
9386 0 0 if(__privtrans->__datatype < t->datatype) {
9389 0 0 if(__privtrans->__datatype < lb->datatype) {
9392 0 0 if(__privtrans->__datatype < opts->datatype) {
9395 0 0 if(!((work->state & PDL_NOMYDIMS) &&
0 0 if(!((work->state & PDL_NOMYDIMS) &&
9396 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
9399 0 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 0 if(!((covar->state & PDL_NOMYDIMS) &&
9400 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
9403 0 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 0 if(!((pout->state & PDL_NOMYDIMS) &&
9404 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
9407 0 0 if(!((info->state & PDL_NOMYDIMS) &&
0 0 if(!((info->state & PDL_NOMYDIMS) &&
9408 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
9411 0 0 if(__privtrans->__datatype == PDL_F) {}
9412 0 0 else if(__privtrans->__datatype == PDL_D) {}
9414 0 0 if(__privtrans->__datatype != p->datatype) {
9416 0 0 }if(__privtrans->__datatype != x->datatype) {
9418 0 0 }if(__privtrans->__datatype != t->datatype) {
9420 0 0 }if(__privtrans->__datatype != lb->datatype) {
9422 0 0 }if(PDL_L != iopts->datatype) {
9424 0 0 }if(__privtrans->__datatype != opts->datatype) {
9426 0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
9428 0 0 } else if(__privtrans->__datatype != work->datatype) {
9430 0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
9432 0 0 } else if(__privtrans->__datatype != covar->datatype) {
9434 0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
9436 0 0 } else if(PDL_L != returnval->datatype) {
9438 0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
9440 0 0 } else if(__privtrans->__datatype != pout->datatype) {
9442 0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
9444 0 0 } else if(__privtrans->__datatype != info->datatype) {
9458 0 0 if (badflag_cache) {
9464 0 0 if (nreturn) {
9465 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);
9510 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))) {
9512 5 0 if (sv_isobject(parent)){
9514 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")
9517 5 0 if (items == 16) { PDL_COMMENT("all variables on stack, read in output and temp vars")
9531 5 0 funcn = (IV)SvIV(ST(12))
9533 5 0 sfuncn = (IV)SvIV(ST(13))
9535 5 0 indat = (IV)SvIV(ST(14))
9537 5 0 want_covar = (int)SvIV(ST(15))
9540 0 0 else if (items == 15) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
9552 0 0 funcn = (IV)SvIV(ST(11))
9554 0 0 sfuncn = (IV)SvIV(ST(12))
9556 0 0 indat = (IV)SvIV(ST(13))
9558 0 0 want_covar = (int)SvIV(ST(14))
9560 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9564 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9566 0 0 PUSHMARK(SP);
9567 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9576 0 0 else if (items == 11) { PDL_COMMENT("only input variables on stack, create outputs and temps")
9585 0 0 funcn = (IV)SvIV(ST(7))
9587 0 0 sfuncn = (IV)SvIV(ST(8))
9589 0 0 indat = (IV)SvIV(ST(9))
9591 0 0 want_covar = (int)SvIV(ST(10))
9593 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9597 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9599 0 0 PUSHMARK(SP);
9600 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9608 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9612 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
9614 0 0 PUSHMARK(SP);
9615 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9623 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9627 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
9629 0 0 PUSHMARK(SP);
9630 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9638 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9642 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
9644 0 0 PUSHMARK(SP);
9645 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9653 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9657 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
9659 0 0 PUSHMARK(SP);
9660 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9685 5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
5 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 5 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((lb->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9686 0 5 if (badflag_cache) __privtrans->bvalflag = 1;
9687 5 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
9690 0 5 if(__privtrans->__datatype < x->datatype) {
9693 0 5 if(__privtrans->__datatype < t->datatype) {
9696 0 5 if(__privtrans->__datatype < lb->datatype) {
9699 0 5 if(__privtrans->__datatype < ub->datatype) {
9702 0 5 if(__privtrans->__datatype < opts->datatype) {
9705 5 0 if(!((work->state & PDL_NOMYDIMS) &&
0 5 if(!((work->state & PDL_NOMYDIMS) &&
9706 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
9709 5 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 5 if(!((covar->state & PDL_NOMYDIMS) &&
9710 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
9713 5 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 5 if(!((pout->state & PDL_NOMYDIMS) &&
9714 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
9717 5 0 if(!((info->state & PDL_NOMYDIMS) &&
0 5 if(!((info->state & PDL_NOMYDIMS) &&
9718 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
9721 3 2 if(__privtrans->__datatype == PDL_F) {}
9722 0 3 else if(__privtrans->__datatype == PDL_D) {}
9724 0 5 if(__privtrans->__datatype != p->datatype) {
9726 0 5 }if(__privtrans->__datatype != x->datatype) {
9728 4 1 }if(__privtrans->__datatype != t->datatype) {
9730 0 5 }if(__privtrans->__datatype != lb->datatype) {
9732 0 5 }if(__privtrans->__datatype != ub->datatype) {
9734 0 5 }if(PDL_L != iopts->datatype) {
9736 0 5 }if(__privtrans->__datatype != opts->datatype) {
9738 5 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
5 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
9740 0 0 } else if(__privtrans->__datatype != work->datatype) {
9742 5 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
5 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
9744 0 0 } else if(__privtrans->__datatype != covar->datatype) {
9746 5 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
5 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
9748 0 0 } else if(PDL_L != returnval->datatype) {
9750 5 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
5 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
9752 0 0 } else if(__privtrans->__datatype != pout->datatype) {
9754 5 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
5 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
9756 0 0 } else if(__privtrans->__datatype != info->datatype) {
9771 0 5 if (badflag_cache) {
9777 0 5 if (nreturn) {
9778 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);
9822 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))) {
9824 0 0 if (sv_isobject(parent)){
9826 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")
9829 0 0 if (items == 15) { PDL_COMMENT("all variables on stack, read in output and temp vars")
9842 0 0 funcn = (IV)SvIV(ST(11))
9844 0 0 sfuncn = (IV)SvIV(ST(12))
9846 0 0 indat = (IV)SvIV(ST(13))
9848 0 0 want_covar = (int)SvIV(ST(14))
9851 0 0 else if (items == 14) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
9862 0 0 funcn = (IV)SvIV(ST(10))
9864 0 0 sfuncn = (IV)SvIV(ST(11))
9866 0 0 indat = (IV)SvIV(ST(12))
9868 0 0 want_covar = (int)SvIV(ST(13))
9870 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9874 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9876 0 0 PUSHMARK(SP);
9877 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9886 0 0 else if (items == 10) { PDL_COMMENT("only input variables on stack, create outputs and temps")
9894 0 0 funcn = (IV)SvIV(ST(6))
9896 0 0 sfuncn = (IV)SvIV(ST(7))
9898 0 0 indat = (IV)SvIV(ST(8))
9900 0 0 want_covar = (int)SvIV(ST(9))
9902 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9906 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
9908 0 0 PUSHMARK(SP);
9909 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9917 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9921 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
9923 0 0 PUSHMARK(SP);
9924 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9932 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9936 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
9938 0 0 PUSHMARK(SP);
9939 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9947 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9951 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
9953 0 0 PUSHMARK(SP);
9954 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9962 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
9966 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
9968 0 0 PUSHMARK(SP);
9969 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
9994 0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((ub->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
9995 0 0 if (badflag_cache) __privtrans->bvalflag = 1;
9996 0 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
9999 0 0 if(__privtrans->__datatype < x->datatype) {
10002 0 0 if(__privtrans->__datatype < t->datatype) {
10005 0 0 if(__privtrans->__datatype < ub->datatype) {
10008 0 0 if(__privtrans->__datatype < opts->datatype) {
10011 0 0 if(!((work->state & PDL_NOMYDIMS) &&
0 0 if(!((work->state & PDL_NOMYDIMS) &&
10012 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
10015 0 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 0 if(!((covar->state & PDL_NOMYDIMS) &&
10016 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
10019 0 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 0 if(!((pout->state & PDL_NOMYDIMS) &&
10020 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
10023 0 0 if(!((info->state & PDL_NOMYDIMS) &&
0 0 if(!((info->state & PDL_NOMYDIMS) &&
10024 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
10027 0 0 if(__privtrans->__datatype == PDL_F) {}
10028 0 0 else if(__privtrans->__datatype == PDL_D) {}
10030 0 0 if(__privtrans->__datatype != p->datatype) {
10032 0 0 }if(__privtrans->__datatype != x->datatype) {
10034 0 0 }if(__privtrans->__datatype != t->datatype) {
10036 0 0 }if(__privtrans->__datatype != ub->datatype) {
10038 0 0 }if(PDL_L != iopts->datatype) {
10040 0 0 }if(__privtrans->__datatype != opts->datatype) {
10042 0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
0 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
10044 0 0 } else if(__privtrans->__datatype != work->datatype) {
10046 0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
0 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
10048 0 0 } else if(__privtrans->__datatype != covar->datatype) {
10050 0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
0 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
10052 0 0 } else if(PDL_L != returnval->datatype) {
10054 0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
0 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
10056 0 0 } else if(__privtrans->__datatype != pout->datatype) {
10058 0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
0 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
10060 0 0 } else if(__privtrans->__datatype != info->datatype) {
10074 0 0 if (badflag_cache) {
10080 0 0 if (nreturn) {
10081 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);
10124 15 0 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
0 15 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))) {
10126 15 0 if (sv_isobject(parent)){
10128 15 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
15 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 15 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")
15 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 15 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
10131 15 0 if (items == 14) { PDL_COMMENT("all variables on stack, read in output and temp vars")
10143 15 0 funcn = (IV)SvIV(ST(10))
10145 15 0 sfuncn = (IV)SvIV(ST(11))
10147 15 0 indat = (IV)SvIV(ST(12))
10149 15 0 want_covar = (int)SvIV(ST(13))
10152 0 0 else if (items == 13) { PDL_COMMENT("all but temps on stack, read in output, create temps") nreturn = 0;
10162 0 0 funcn = (IV)SvIV(ST(9))
10164 0 0 sfuncn = (IV)SvIV(ST(10))
10166 0 0 indat = (IV)SvIV(ST(11))
10168 0 0 want_covar = (int)SvIV(ST(12))
10170 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10174 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
10176 0 0 PUSHMARK(SP);
10177 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10186 0 0 else if (items == 9) { PDL_COMMENT("only input variables on stack, create outputs and temps")
10193 0 0 funcn = (IV)SvIV(ST(5))
10195 0 0 sfuncn = (IV)SvIV(ST(6))
10197 0 0 indat = (IV)SvIV(ST(7))
10199 0 0 want_covar = (int)SvIV(ST(8))
10201 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10205 0 0 if (bless_stash) work_SV = sv_bless(work_SV, bless_stash);
10207 0 0 PUSHMARK(SP);
10208 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10216 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10220 0 0 if (bless_stash) covar_SV = sv_bless(covar_SV, bless_stash);
10222 0 0 PUSHMARK(SP);
10223 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10231 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10235 0 0 if (bless_stash) returnval_SV = sv_bless(returnval_SV, bless_stash);
10237 0 0 PUSHMARK(SP);
10238 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10246 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10250 0 0 if (bless_stash) pout_SV = sv_bless(pout_SV, bless_stash);
10252 0 0 PUSHMARK(SP);
10253 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10261 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10265 0 0 if (bless_stash) info_SV = sv_bless(info_SV, bless_stash);
10267 0 0 PUSHMARK(SP);
10268 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10293 15 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
15 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
15 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
15 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
0 15 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((x->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0) || ((iopts->state & PDL_BADVAL) > 0) || ((opts->state & PDL_BADVAL) > 0);
10294 0 15 if (badflag_cache) __privtrans->bvalflag = 1;
10295 15 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
10298 0 15 if(__privtrans->__datatype < x->datatype) {
10301 0 15 if(__privtrans->__datatype < t->datatype) {
10304 0 15 if(__privtrans->__datatype < opts->datatype) {
10307 15 0 if(!((work->state & PDL_NOMYDIMS) &&
0 15 if(!((work->state & PDL_NOMYDIMS) &&
10308 0 0 work->trans == NULL) && __privtrans->__datatype < work->datatype) {
10311 15 0 if(!((covar->state & PDL_NOMYDIMS) &&
0 15 if(!((covar->state & PDL_NOMYDIMS) &&
10312 0 0 covar->trans == NULL) && __privtrans->__datatype < covar->datatype) {
10315 15 0 if(!((pout->state & PDL_NOMYDIMS) &&
0 15 if(!((pout->state & PDL_NOMYDIMS) &&
10316 0 0 pout->trans == NULL) && __privtrans->__datatype < pout->datatype) {
10319 15 0 if(!((info->state & PDL_NOMYDIMS) &&
0 15 if(!((info->state & PDL_NOMYDIMS) &&
10320 0 0 info->trans == NULL) && __privtrans->__datatype < info->datatype) {
10323 10 5 if(__privtrans->__datatype == PDL_F) {}
10324 0 10 else if(__privtrans->__datatype == PDL_D) {}
10326 0 15 if(__privtrans->__datatype != p->datatype) {
10328 0 15 }if(__privtrans->__datatype != x->datatype) {
10330 9 6 }if(__privtrans->__datatype != t->datatype) {
10332 0 15 }if(PDL_L != iopts->datatype) {
10334 0 15 }if(__privtrans->__datatype != opts->datatype) {
10336 15 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
15 0 }if( (work->state & PDL_NOMYDIMS) && work->trans == NULL ) {
10338 0 0 } else if(__privtrans->__datatype != work->datatype) {
10340 15 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
15 0 }if( (covar->state & PDL_NOMYDIMS) && covar->trans == NULL ) {
10342 0 0 } else if(__privtrans->__datatype != covar->datatype) {
10344 15 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
15 0 }if( (returnval->state & PDL_NOMYDIMS) && returnval->trans == NULL ) {
10346 0 0 } else if(PDL_L != returnval->datatype) {
10348 15 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
15 0 }if( (pout->state & PDL_NOMYDIMS) && pout->trans == NULL ) {
10350 0 0 } else if(__privtrans->__datatype != pout->datatype) {
10352 15 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
15 0 }if( (info->state & PDL_NOMYDIMS) && info->trans == NULL ) {
10354 0 0 } else if(__privtrans->__datatype != info->datatype) {
10367 0 15 if (badflag_cache) {
10373 0 15 if (nreturn) {
10374 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);
10407 4 0 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
0 4 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
0 0 if (SvROK(ST(0)) && ((SvTYPE(SvRV(ST(0))) == SVt_PVMG) || (SvTYPE(SvRV(ST(0))) == SVt_PVHV))) {
10409 4 0 if (sv_isobject(parent)){
10411 4 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
4 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 4 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
4 0 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
0 4 objname = HvNAME((bless_stash)); PDL_COMMENT("The package to bless output vars into is taken from the first input var")
10414 0 4 if (items == 8) { PDL_COMMENT("all variables on stack, read in output and temp vars")
10419 0 0 func = (IV)SvIV(ST(3))
10421 0 0 sfunc = (IV)SvIV(ST(4))
10423 0 0 jac = (IV)SvIV(ST(5))
10425 0 0 sjac = (IV)SvIV(ST(6))
10427 0 0 indat = (IV)SvIV(ST(7))
10430 4 0 else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps")
10434 4 0 func = (IV)SvIV(ST(2))
10436 4 0 sfunc = (IV)SvIV(ST(3))
10438 4 0 jac = (IV)SvIV(ST(4))
10440 4 0 sjac = (IV)SvIV(ST(5))
10442 4 0 indat = (IV)SvIV(ST(6))
10444 4 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10448 4 0 if (bless_stash) err_SV = sv_bless(err_SV, bless_stash);
10450 0 0 PUSHMARK(SP);
10451 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10476 4 0 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0);
0 4 badflag_cache = ((p->state & PDL_BADVAL) > 0) || ((t->state & PDL_BADVAL) > 0);
10477 0 4 if (badflag_cache) __privtrans->bvalflag = 1;
10478 4 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
10481 0 4 if(__privtrans->__datatype < t->datatype) {
10484 4 0 if(!((err->state & PDL_NOMYDIMS) &&
0 4 if(!((err->state & PDL_NOMYDIMS) &&
10485 0 0 err->trans == NULL) && __privtrans->__datatype < err->datatype) {
10488 2 2 if(__privtrans->__datatype == PDL_F) {}
10489 0 2 else if(__privtrans->__datatype == PDL_D) {}
10491 0 4 if(__privtrans->__datatype != p->datatype) {
10493 0 4 }if(__privtrans->__datatype != t->datatype) {
10495 4 0 }if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) {
4 0 }if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) {
10497 0 0 } else if(__privtrans->__datatype != err->datatype) {
10503 0 4 if (badflag_cache) {
10506 4 0 if (nreturn) {
10507 0 4 if (nreturn - items > 0) EXTEND (SP, nreturn - items);
0 0 if (nreturn - items > 0) EXTEND (SP, nreturn - items);
0 0 if (nreturn - items > 0) EXTEND (SP, nreturn - items);
10537 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))) {
10539 0 0 if (sv_isobject(parent)){
10541 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")
10544 0 0 if (items == 8) { PDL_COMMENT("all variables on stack, read in output and temp vars")
10548 0 0 func = (IV)SvIV(ST(2))
10550 0 0 sfunc = (IV)SvIV(ST(3))
10552 0 0 jac = (IV)SvIV(ST(4))
10554 0 0 sjac = (IV)SvIV(ST(5))
10556 0 0 N = (int)SvIV(ST(6))
10558 0 0 indat = (IV)SvIV(ST(7))
10561 0 0 else if (items == 7) { PDL_COMMENT("only input variables on stack, create outputs and temps")
10564 0 0 func = (IV)SvIV(ST(1))
10566 0 0 sfunc = (IV)SvIV(ST(2))
10568 0 0 jac = (IV)SvIV(ST(3))
10570 0 0 sjac = (IV)SvIV(ST(4))
10572 0 0 N = (int)SvIV(ST(5))
10574 0 0 indat = (IV)SvIV(ST(6))
10576 0 0 if (strcmp(objname,"PDL") == 0) { PDL_COMMENT("shortcut if just PDL")
10580 0 0 if (bless_stash) err_SV = sv_bless(err_SV, bless_stash);
10582 0 0 PUSHMARK(SP);
10583 0 0 XPUSHs(sv_2mortal(newSVpv(objname, 0)));
10609 0 0 if (badflag_cache) __privtrans->bvalflag = 1;
10610 0 0 __privtrans->__datatype = 0;if(__privtrans->__datatype < p->datatype) {
10613 0 0 if(!((err->state & PDL_NOMYDIMS) &&
0 0 if(!((err->state & PDL_NOMYDIMS) &&
10614 0 0 err->trans == NULL) && __privtrans->__datatype < err->datatype) {
10617 0 0 if(__privtrans->__datatype == PDL_F) {}
10618 0 0 else if(__privtrans->__datatype == PDL_D) {}
10620 0 0 if(__privtrans->__datatype != p->datatype) {
10622 0 0 }if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) {
0 0 }if( (err->state & PDL_NOMYDIMS) && err->trans == NULL ) {
10624 0 0 } else if(__privtrans->__datatype != err->datatype) {
10629 0 0 if (badflag_cache) {
10632 0 0 if (nreturn) {
10633 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);
10652 0 10 if ( NULL == dat ) {
10665 10 2 if ( (DFP *) dat) free( (DFP *) dat);
10676 0 10 if ( dat == NULL ) {
10762 7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
0 7 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
0 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
0 7 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));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
7 0 if (SvTRUE (ERRSV)) Perl_croak(aTHX_ "%s",SvPV_nolen (ERRSV));
0 7 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 7 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));
10764 0 7 if (CoreSV==NULL)
10766 7 0 PDL = INT2PTR(Core*,SvIV( CoreSV )); /* Core* value */
10767 0 7 if (PDL->Version != PDL_CORE_VERSION)