| line |
true |
false |
branch |
|
35
|
0 |
1 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in which_cluster:" "broadcast.incs NULL"); |
|
71
|
0 |
1 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
76
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
77
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
78
|
0 |
0 |
{/* Open o */ PDL_EXPAND2(register PDL_Indx o=0, __o_stop=(__o_size)); for(; o<__o_stop; o+=1) { |
|
80
|
0 |
0 |
{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { |
|
81
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))],a_badval,S,a_badval_isnan)) continue;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))],a_badval,S,a_badval_isnan)) continue;,) |
|
82
|
0 |
0 |
if (!(a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))]) continue; |
|
86
|
0 |
0 |
PDL_IF_BAD(if (cl==-1) { (b_datap)[0+(__inc_b_o*(o))]=b_badval; continue; },) |
|
89
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
92
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
93
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
94
|
0 |
0 |
{/* Open o */ PDL_EXPAND2(register PDL_Indx o=0, __o_stop=(__o_size)); for(; o<__o_stop; o+=1) { |
|
96
|
0 |
0 |
{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { |
|
97
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))],a_badval,S,a_badval_isnan)) continue;,) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))],a_badval,S,a_badval_isnan)) continue;,) |
|
98
|
0 |
0 |
if (!(a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))]) continue; |
|
102
|
0 |
0 |
PDL_IF_BAD(if (cl==-1) { (b_datap)[0+(__inc_b_o*(o))]=b_badval; continue; },) |
|
105
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
115
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Ushort,U,PDL_Short,S,PDL_Indx,N) |
|
116
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
117
|
0 |
0 |
{/* Open o */ PDL_EXPAND2(register PDL_Indx o=0, __o_stop=(__o_size)); for(; o<__o_stop; o+=1) { |
|
119
|
0 |
0 |
{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { |
|
121
|
0 |
0 |
if (!(a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))]) continue; |
|
128
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
131
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_which_cluster_1(PDL_Long,L,PDL_Short,S,PDL_Indx,N) |
|
132
|
0 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
2 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_which_cluster_readdata { |
|
133
|
8 |
2 |
{/* Open o */ PDL_EXPAND2(register PDL_Indx o=0, __o_stop=(__o_size)); for(; o<__o_stop; o+=1) { |
|
135
|
13 |
1 |
{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { |
|
137
|
6 |
7 |
if (!(a_datap)[0+(__inc_a_o*(o))+(__inc_a_c*(c))]) continue; |
|
144
|
0 |
1 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_which_cluster_readdata |
|
178
|
0 |
1 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
180
|
0 |
1 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
183
|
0 |
1 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
184
|
0 |
1 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |