| line |
true |
false |
branch |
|
31
|
0 |
1 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in locf:" "broadcast.incs NULL"); |
|
70
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_SByte,A) |
|
71
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
73
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
74
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
77
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
80
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Byte,B) |
|
81
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
83
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
84
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
87
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
90
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Short,S) |
|
91
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
93
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
94
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
97
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
100
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Ushort,U) |
|
101
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
103
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
104
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
107
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
110
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Long,L) |
|
111
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
113
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
114
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
117
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
120
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULong,K) |
|
121
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
123
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
124
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
127
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
130
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Indx,N) |
|
131
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
133
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
134
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
137
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
140
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_ULongLong,P) |
|
141
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
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 ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
147
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
150
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LongLong,Q) |
|
151
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
153
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
154
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
157
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
160
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Float,F) |
|
161
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
163
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
164
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
167
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
170
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
1 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
|
0 |
1 |
PDL_DECLARE_PARAMS_locf_1(PDL_Double,D) |
|
171
|
0 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
173
|
6 |
1 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
174
|
0 |
6 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
3 |
3 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
177
|
0 |
1 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
1 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
180
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_LDouble,E) |
|
181
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
183
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
184
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
187
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
190
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CFloat,G) |
|
191
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
193
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
194
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,G,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
197
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
200
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CDouble,C) |
|
201
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
203
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
204
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,C,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
207
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
210
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_locf_1(PDL_CLDouble,H) |
|
211
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_locf_readdata { |
|
213
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
214
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
|
0 |
0 |
if ( !PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,H,a_badval_isnan) ) tmp = (a_datap)[0+(__inc_a_n*(n))]; |
|
217
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_locf_readdata |
|
250
|
0 |
1 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
252
|
0 |
1 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
255
|
0 |
1 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
256
|
0 |
1 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |