Branch Coverage

lib/PDL/Image2D-pp-med2df.c
Criterion Covered Total %
branch 55 1140 4.8


line true false branch
51 0 1 PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans));
65 0 1 if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "broadcast.incs NULL");
120 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N)
128 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
132 0 0 for ( i = 1-p_size; i< m_size; i++) {
136 0 0 if (i2<0)
138 0 0 else if (i2 >= m_size)
142 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
146 0 0 if (i2<0)
148 0 0 if (i2 >= m_size)
152 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
156 0 0 for ( j = 1-q_size; j< n_size; j++) {
160 0 0 if (j2<0)
162 0 0 else if (j2 >= n_size)
166 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
170 0 0 if (j2<0)
172 0 0 if (j2 >= n_size)
176 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
182 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
183 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
185 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
186 0 0 if ((j2 = mapj[n-q]) < 0) continue;
187 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
188 0 0 if ((i2 = mapi[m-p]) < 0) continue;
194 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
198 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N)
206 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
210 0 0 for ( i = 1-p_size; i< m_size; i++) {
214 0 0 if (i2<0)
216 0 0 else if (i2 >= m_size)
220 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
224 0 0 if (i2<0)
226 0 0 if (i2 >= m_size)
230 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
234 0 0 for ( j = 1-q_size; j< n_size; j++) {
238 0 0 if (j2<0)
240 0 0 else if (j2 >= n_size)
244 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
248 0 0 if (j2<0)
250 0 0 if (j2 >= n_size)
254 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
260 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
261 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
263 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
264 0 0 if ((j2 = mapj[n-q]) < 0) continue;
265 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
266 0 0 if ((i2 = mapi[m-p]) < 0) continue;
272 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
276 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N)
284 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
288 0 0 for ( i = 1-p_size; i< m_size; i++) {
292 0 0 if (i2<0)
294 0 0 else if (i2 >= m_size)
298 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
302 0 0 if (i2<0)
304 0 0 if (i2 >= m_size)
308 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
312 0 0 for ( j = 1-q_size; j< n_size; j++) {
316 0 0 if (j2<0)
318 0 0 else if (j2 >= n_size)
322 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
326 0 0 if (j2<0)
328 0 0 if (j2 >= n_size)
332 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
338 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
339 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
341 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
342 0 0 if ((j2 = mapj[n-q]) < 0) continue;
343 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
344 0 0 if ((i2 = mapi[m-p]) < 0) continue;
350 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
354 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N)
362 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
366 0 0 for ( i = 1-p_size; i< m_size; i++) {
370 0 0 if (i2<0)
372 0 0 else if (i2 >= m_size)
376 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
380 0 0 if (i2<0)
382 0 0 if (i2 >= m_size)
386 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
390 0 0 for ( j = 1-q_size; j< n_size; j++) {
394 0 0 if (j2<0)
396 0 0 else if (j2 >= n_size)
400 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
404 0 0 if (j2<0)
406 0 0 if (j2 >= n_size)
410 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
416 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
417 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
419 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
420 0 0 if ((j2 = mapj[n-q]) < 0) continue;
421 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
422 0 0 if ((i2 = mapi[m-p]) < 0) continue;
428 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
432 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N)
440 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
444 0 0 for ( i = 1-p_size; i< m_size; i++) {
448 0 0 if (i2<0)
450 0 0 else if (i2 >= m_size)
454 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
458 0 0 if (i2<0)
460 0 0 if (i2 >= m_size)
464 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
468 0 0 for ( j = 1-q_size; j< n_size; j++) {
472 0 0 if (j2<0)
474 0 0 else if (j2 >= n_size)
478 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
482 0 0 if (j2<0)
484 0 0 if (j2 >= n_size)
488 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
494 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
495 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
497 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
498 0 0 if ((j2 = mapj[n-q]) < 0) continue;
499 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
500 0 0 if ((i2 = mapi[m-p]) < 0) continue;
506 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
510 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N)
518 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
522 0 0 for ( i = 1-p_size; i< m_size; i++) {
526 0 0 if (i2<0)
528 0 0 else if (i2 >= m_size)
532 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
536 0 0 if (i2<0)
538 0 0 if (i2 >= m_size)
542 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
546 0 0 for ( j = 1-q_size; j< n_size; j++) {
550 0 0 if (j2<0)
552 0 0 else if (j2 >= n_size)
556 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
560 0 0 if (j2<0)
562 0 0 if (j2 >= n_size)
566 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
572 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
573 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
575 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
576 0 0 if ((j2 = mapj[n-q]) < 0) continue;
577 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
578 0 0 if ((i2 = mapi[m-p]) < 0) continue;
584 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
588 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N)
596 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
600 0 0 for ( i = 1-p_size; i< m_size; i++) {
604 0 0 if (i2<0)
606 0 0 else if (i2 >= m_size)
610 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
614 0 0 if (i2<0)
616 0 0 if (i2 >= m_size)
620 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
624 0 0 for ( j = 1-q_size; j< n_size; j++) {
628 0 0 if (j2<0)
630 0 0 else if (j2 >= n_size)
634 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
638 0 0 if (j2<0)
640 0 0 if (j2 >= n_size)
644 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
650 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
651 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
653 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
654 0 0 if ((j2 = mapj[n-q]) < 0) continue;
655 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
656 0 0 if ((i2 = mapi[m-p]) < 0) continue;
662 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
666 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N)
674 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
678 0 0 for ( i = 1-p_size; i< m_size; i++) {
682 0 0 if (i2<0)
684 0 0 else if (i2 >= m_size)
688 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
692 0 0 if (i2<0)
694 0 0 if (i2 >= m_size)
698 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
702 0 0 for ( j = 1-q_size; j< n_size; j++) {
706 0 0 if (j2<0)
708 0 0 else if (j2 >= n_size)
712 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
716 0 0 if (j2<0)
718 0 0 if (j2 >= n_size)
722 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
728 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
729 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
731 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
732 0 0 if ((j2 = mapj[n-q]) < 0) continue;
733 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
734 0 0 if ((i2 = mapi[m-p]) < 0) continue;
740 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
744 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N)
752 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
756 0 0 for ( i = 1-p_size; i< m_size; i++) {
760 0 0 if (i2<0)
762 0 0 else if (i2 >= m_size)
766 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
770 0 0 if (i2<0)
772 0 0 if (i2 >= m_size)
776 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
780 0 0 for ( j = 1-q_size; j< n_size; j++) {
784 0 0 if (j2<0)
786 0 0 else if (j2 >= n_size)
790 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
794 0 0 if (j2<0)
796 0 0 if (j2 >= n_size)
800 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
806 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
807 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
809 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
810 0 0 if ((j2 = mapj[n-q]) < 0) continue;
811 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
812 0 0 if ((i2 = mapi[m-p]) < 0) continue;
818 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
822 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N)
830 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
834 0 0 for ( i = 1-p_size; i< m_size; i++) {
838 0 0 if (i2<0)
840 0 0 else if (i2 >= m_size)
844 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
848 0 0 if (i2<0)
850 0 0 if (i2 >= m_size)
854 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
858 0 0 for ( j = 1-q_size; j< n_size; j++) {
862 0 0 if (j2<0)
864 0 0 else if (j2 >= n_size)
868 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
872 0 0 if (j2<0)
874 0 0 if (j2 >= n_size)
878 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
884 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
885 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
887 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
888 0 0 if ((j2 = mapj[n-q]) < 0) continue;
889 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
890 0 0 if ((i2 = mapi[m-p]) < 0) continue;
896 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
900 0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_med2df_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N)
908 1 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 1 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
912 12 1 for ( i = 1-p_size; i< m_size; i++) {
916 0 0 if (i2<0)
918 0 0 else if (i2 >= m_size)
922 11 1 if (i2<0 || i2 >= m_size)
1 10 if (i2<0 || i2 >= m_size)
926 0 0 if (i2<0)
928 0 0 if (i2 >= m_size)
932 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
936 12 1 for ( j = 1-q_size; j< n_size; j++) {
940 0 0 if (j2<0)
942 0 0 else if (j2 >= n_size)
946 11 1 if (j2<0 || j2 >= n_size)
1 10 if (j2<0 || j2 >= n_size)
950 0 0 if (j2<0)
952 0 0 if (j2 >= n_size)
956 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
962 0 1 PDL_BROADCASTLOOP_START_med2df_readdata
0 1 PDL_BROADCASTLOOP_START_med2df_readdata
0 1 PDL_BROADCASTLOOP_START_med2df_readdata
0 1 PDL_BROADCASTLOOP_START_med2df_readdata
0 1 PDL_BROADCASTLOOP_START_med2df_readdata
1 1 PDL_BROADCASTLOOP_START_med2df_readdata
1 1 PDL_BROADCASTLOOP_START_med2df_readdata
963 100 10 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
10 1 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
965 300 100 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
966 20 280 if ((j2 = mapj[n-q]) < 0) continue;
967 840 280 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
968 56 784 if ((i2 = mapi[m-p]) < 0) continue;
974 0 1 PDL_BROADCASTLOOP_END_med2df_readdata
0 1 PDL_BROADCASTLOOP_END_med2df_readdata
978 0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_med2df_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N)
986 0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
0 0 if ((mapi==NULL) || (mapj==NULL)) return PDL->make_error(PDL_EUSERERROR, "Error in med2df:" "Out of Memory");
990 0 0 for ( i = 1-p_size; i< m_size; i++) {
994 0 0 if (i2<0)
996 0 0 else if (i2 >= m_size)
1000 0 0 if (i2<0 || i2 >= m_size)
0 0 if (i2<0 || i2 >= m_size)
1004 0 0 if (i2<0)
1006 0 0 if (i2 >= m_size)
1010 0 0 REALMOD(i2,m_size);
0 0 REALMOD(i2,m_size);
1014 0 0 for ( j = 1-q_size; j< n_size; j++) {
1018 0 0 if (j2<0)
1020 0 0 else if (j2 >= n_size)
1024 0 0 if (j2<0 || j2 >= n_size)
0 0 if (j2<0 || j2 >= n_size)
1028 0 0 if (j2<0)
1030 0 0 if (j2 >= n_size)
1034 0 0 REALMOD(j2,n_size);
0 0 REALMOD(j2,n_size);
1040 0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
0 0 PDL_BROADCASTLOOP_START_med2df_readdata
1041 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
1043 0 0 {/* Open q */ PDL_EXPAND2(register PDL_Indx q=0, __q_stop=(__q_size)); for(; q<__q_stop; q+=1) {
1044 0 0 if ((j2 = mapj[n-q]) < 0) continue;
1045 0 0 {/* Open p */ PDL_EXPAND2(register PDL_Indx p=0, __p_stop=(__p_size)); for(; p<__p_stop; p+=1) {
1046 0 0 if ((i2 = mapi[m-p]) < 0) continue;
1052 0 0 PDL_BROADCASTLOOP_END_med2df_readdata
0 0 PDL_BROADCASTLOOP_END_med2df_readdata
1088 0 1 if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
1090 0 1 if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
1094 0 1 PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
1098 0 1 PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));