| line |
true |
false |
branch |
|
32
|
0 |
2 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in bessj1:" "broadcast.incs NULL"); |
|
66
|
0 |
2 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
71
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
72
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
74
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
77
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
78
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
80
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
83
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
84
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
86
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
96
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Float,F) |
|
97
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,F,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
99
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
102
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_Double,D) |
|
103
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,D,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
105
|
0 |
1 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
108
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_bessj1_1(PDL_LDouble,E) |
|
109
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_bessj1_readdata {PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0],a_badval,E,a_badval_isnan) ) { (b_datap)[0]=b_badval; } else,) |
|
111
|
0 |
1 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_bessj1_readdata |
|
145
|
0 |
2 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
147
|
0 |
2 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
150
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
151
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |