Branch Coverage

lib/PDL/Primitive-pp-pchip_chid.c
Criterion Covered Total %
branch 62 324 19.1


line true false branch
59 0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
60 0 0 {if (__privtrans->ind_sizes[0] < 2) return PDL->make_error(PDL_EUSERERROR, "Error in pchip_chid:" "NUMBER OF DATA POINTS LESS THAN TWO");
64 0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
65 0 2 {if (__privtrans->ind_sizes[0] < 2) return PDL->make_error(PDL_EUSERERROR, "Error in pchip_chid:" "NUMBER OF DATA POINTS LESS THAN TWO");
69 0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_0(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
70 0 0 {if (__privtrans->ind_sizes[0] < 2) return PDL->make_error(PDL_EUSERERROR, "Error in pchip_chid:" "NUMBER OF DATA POINTS LESS THAN TWO");
77 0 2 PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans));
87 0 2 if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in pchip_chid:" "broadcast.incs NULL");
169 0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
170 0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
171 0 0 {/* Open n=1 */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((1),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
172 0 0 if ((x_datap)[0+(__inc_x_n*(n))] > (x_datap)[0+(__inc_x_n*(n-1))]) continue;
187 0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
193 0 0 if ((ia_datap)[0] == (ib_datap)[0]) { (ans_datap)[0] = 0; continue; }
196 0 0 {/* Open n=low:iup */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((low),0), __n_stop=PDLMIN(iup, (__n_size))); for(; n<__n_stop; n+=1) {
200 0 0 (ans_datap)[0] = 0.5 * ((ia_datap)[0] > (ib_datap)[0] ? -sum : sum);
203 0 0 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
0 0 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
206 0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
2 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 2 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
207 0 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
4 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
4 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
2 2 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
208 38 4 {/* Open n=1 */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((1),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
209 38 0 if ((x_datap)[0+(__inc_x_n*(n))] > (x_datap)[0+(__inc_x_n*(n-1))]) continue;
224 4 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
4 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
4 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 4 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
230 0 4 if ((ia_datap)[0] == (ib_datap)[0]) { (ans_datap)[0] = 0; continue; }
233 17 4 {/* Open n=low:iup */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((low),0), __n_stop=PDLMIN(iup, (__n_size))); for(; n<__n_stop; n+=1) {
237 0 4 (ans_datap)[0] = 0.5 * ((ia_datap)[0] > (ib_datap)[0] ? -sum : sum);
240 0 2 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
0 2 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
243 0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
0 0 PDL_DECLARE_PARAMS_pchip_chid_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Long,L)
244 0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
0 0 PDL_BROADCASTLOOP_START_pchip_chid_readdata {if (!(skip_datap)[0]) {
245 0 0 {/* Open n=1 */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((1),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
246 0 0 if ((x_datap)[0+(__inc_x_n*(n))] > (x_datap)[0+(__inc_x_n*(n-1))]) continue;
261 0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
0 0 if ((ia_datap)[0] < 0 || (ia_datap)[0] > __privtrans->ind_sizes[0]-1 || (ib_datap)[0] < 0 || (ib_datap)[0] > __privtrans->ind_sizes[0]-1) {
267 0 0 if ((ia_datap)[0] == (ib_datap)[0]) { (ans_datap)[0] = 0; continue; }
270 0 0 {/* Open n=low:iup */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((low),0), __n_stop=PDLMIN(iup, (__n_size))); for(; n<__n_stop; n+=1) {
274 0 0 (ans_datap)[0] = 0.5 * ((ia_datap)[0] > (ib_datap)[0] ? -sum : sum);
277 0 0 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
0 0 }PDL_BROADCASTLOOP_END_pchip_chid_readdata
316 0 2 if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
318 0 2 if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
327 0 2 PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
328 0 2 PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));