| line |
true |
false |
branch |
|
46
|
0 |
2 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in whichover:" "broadcast.incs NULL"); |
|
82
|
0 |
2 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
87
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
88
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
89
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
90
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
92
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
93
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
96
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
97
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
98
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
99
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
101
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
102
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
105
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
106
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
107
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
108
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
110
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
111
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
114
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
115
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
116
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
117
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
119
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
120
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
123
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
124
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
125
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
126
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
128
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
129
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
132
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
133
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
134
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
135
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
137
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
138
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
141
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
142
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
143
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
144
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
146
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
147
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
150
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
151
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
152
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
153
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
155
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
156
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
159
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
160
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
161
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
162
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
164
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
165
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
168
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
169
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
170
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
171
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
173
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
174
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
177
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
178
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
179
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
180
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
182
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
183
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
186
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
187
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
188
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
189
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
191
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
192
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
195
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
196
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
197
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
198
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
200
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
201
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
204
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
205
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
206
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
207
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
209
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
210
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
213
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
214
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
215
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
216
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
218
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
219
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
229
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_SByte,A) |
|
230
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
231
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
232
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
234
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
235
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
238
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Byte,B) |
|
239
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
240
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
241
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
243
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
244
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
247
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Short,S) |
|
248
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
249
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
250
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
252
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
253
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
256
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Ushort,U) |
|
257
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
258
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
259
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
261
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
262
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
265
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Long,L) |
|
266
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
267
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
268
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
270
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
271
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
274
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULong,K) |
|
275
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
276
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
277
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
279
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
280
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
283
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Indx,N) |
|
284
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
285
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
286
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
288
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
289
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
292
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_ULongLong,P) |
|
293
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
294
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
295
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
297
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
298
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
301
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LongLong,Q) |
|
302
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
303
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
304
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
306
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
307
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
310
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Float,F) |
|
311
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
312
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
313
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
315
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
316
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
319
|
2 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
2 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
2 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
2 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
1 |
1 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
2 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
2 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
|
0 |
2 |
PDL_DECLARE_PARAMS_whichover_1(PDL_Double,D) |
|
320
|
0 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
14 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
2 |
2 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
321
|
140 |
14 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
322
|
20 |
120 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
324
|
120 |
14 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
325
|
0 |
2 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
2 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
328
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_LDouble,E) |
|
329
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
330
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
331
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
333
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
334
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
337
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CFloat,G) |
|
338
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
339
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
340
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
342
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
343
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
346
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CDouble,C) |
|
347
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
348
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
349
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
351
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
352
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
355
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_whichover_1(PDL_CLDouble,H) |
|
356
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_whichover_readdata {PDL_Indx last = 0; |
|
357
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
358
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
|
0 |
0 |
if ((a_datap)[0+(__inc_a_n*(n))] PDL_IF_BAD(&& !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan),)) (o_datap)[0+(__inc_o_n*(last++))] = n; |
|
360
|
0 |
0 |
{/* Open n=last */ PDL_EXPAND2(register PDL_Indx n=PDLMAX((last),0), __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (o_datap)[0+(__inc_o_n*(n))] = -1; }} /* Close n=last */ |
|
361
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_whichover_readdata |
|
395
|
0 |
2 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
397
|
0 |
2 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
400
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
401
|
0 |
2 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |