| line |
true |
false |
branch |
|
33
|
0 |
2 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in dvrs:" "broadcast.incs NULL"); |
|
74
|
1 |
1 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
79
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
80
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
81
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,F,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
83
|
0 |
0 |
: -1 * sqrt( -2 * log(1-(b_datap)[0]) ) |
|
85
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
88
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
89
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
6 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
90
|
0 |
6 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
5 |
1 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
5 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
0 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
|
0 |
5 |
PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) || PDL_ISBAD2((b_datap)[0],b_badval,D,b_badval_isnan)) { (c_datap)[0]=c_badval; continue; },) |
|
92
|
2 |
3 |
: -1 * sqrt( -2 * log(1-(b_datap)[0]) ) |
|
94
|
0 |
1 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
104
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Float,F) |
|
105
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
108
|
0 |
0 |
: -1 * sqrt( -2 * log(1-(b_datap)[0]) ) |
|
110
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
113
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_dvrs_1(PDL_Double,D) |
|
114
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
5 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_dvrs_readdata { |
|
117
|
2 |
3 |
: -1 * sqrt( -2 * log(1-(b_datap)[0]) ) |
|
119
|
0 |
1 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_dvrs_readdata |
|
154
|
0 |
2 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
156
|
0 |
2 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
160
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
161
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |