| line |
true |
false |
branch |
|
39
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_0(PDL_Float,F) |
|
40
|
0 |
0 |
{if (__privtrans->ind_sizes[0] < 2) return PDL->make_error(PDL_EUSERERROR, "Error in corr:" "too few N");} |
|
43
|
0 |
7 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
|
0 |
7 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
|
3 |
4 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
|
0 |
7 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
|
0 |
7 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
|
0 |
7 |
PDL_DECLARE_PARAMS_corr_0(PDL_Double,D) |
|
44
|
0 |
7 |
{if (__privtrans->ind_sizes[0] < 2) return PDL->make_error(PDL_EUSERERROR, "Error in corr:" "too few N");} |
|
50
|
0 |
7 |
PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans)); |
|
60
|
0 |
7 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in corr:" "broadcast.incs NULL"); |
|
103
|
3 |
4 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
108
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
109
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
113
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
114
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,F,b_badval_isnan)) continue; N++;,) |
|
121
|
0 |
0 |
if (N < 2) { (c_datap)[0]=c_badval; continue; } |
|
126
|
0 |
0 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
129
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
3 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
1 |
2 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
3 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
3 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
130
|
0 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
11 |
5 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
5 |
3 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
134
|
102 |
11 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
135
|
0 |
102 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
|
97 |
5 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
|
0 |
97 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
|
4 |
93 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0+(__inc_b_n*(n))],b_badval,D,b_badval_isnan)) continue; N++;,) |
|
142
|
0 |
11 |
if (N < 2) { (c_datap)[0]=c_badval; continue; } |
|
147
|
0 |
3 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
|
0 |
3 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
157
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Float,F) |
|
158
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
162
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
170
|
0 |
0 |
if (N < 2) { (c_datap)[0]=c_badval; continue; } |
|
175
|
0 |
0 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
178
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
4 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
2 |
2 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
4 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
4 |
0 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
|
0 |
4 |
PDL_DECLARE_PARAMS_corr_1(PDL_Double,D) |
|
179
|
0 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
0 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
20 |
8 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
|
8 |
4 |
PDL_BROADCASTLOOP_START_corr_readdata { |
|
183
|
145 |
20 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
191
|
0 |
20 |
if (N < 2) { (c_datap)[0]=c_badval; continue; } |
|
196
|
0 |
4 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
|
0 |
4 |
}PDL_BROADCASTLOOP_END_corr_readdata |
|
231
|
0 |
7 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
233
|
0 |
7 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
237
|
0 |
7 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
238
|
0 |
7 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |