| 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)); |