| line |
true |
false |
branch |
|
28
|
0 |
0 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in dprodover:" "broadcast.incs NULL"); |
|
63
|
0 |
0 |
if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */ |
|
68
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
69
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
71
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
72
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) ) continue; flag = 1;,) |
|
74
|
0 |
0 |
if (tmp == 0) break; |
|
76
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
78
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
81
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
82
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
84
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
85
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) ) continue; flag = 1;,) |
|
87
|
0 |
0 |
if (tmp == 0) break; |
|
89
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
91
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
94
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
95
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
97
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
98
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) ) continue; flag = 1;,) |
|
100
|
0 |
0 |
if (tmp == 0) break; |
|
102
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
104
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
107
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
108
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
110
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
111
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) ) continue; flag = 1;,) |
|
113
|
0 |
0 |
if (tmp == 0) break; |
|
115
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
117
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
120
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
121
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
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 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) ) continue; flag = 1;,) |
|
126
|
0 |
0 |
if (tmp == 0) break; |
|
128
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
130
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
133
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
134
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
136
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
137
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) ) continue; flag = 1;,) |
|
139
|
0 |
0 |
if (tmp == 0) break; |
|
141
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
143
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
146
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
147
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
149
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
150
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) ) continue; flag = 1;,) |
|
152
|
0 |
0 |
if (tmp == 0) break; |
|
154
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
156
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
159
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
160
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
162
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
163
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) ) continue; flag = 1;,) |
|
165
|
0 |
0 |
if (tmp == 0) break; |
|
167
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
169
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
172
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
173
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
175
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
176
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) ) continue; flag = 1;,) |
|
178
|
0 |
0 |
if (tmp == 0) break; |
|
180
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
182
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
185
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
186
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
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 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) ) continue; flag = 1;,) |
|
191
|
0 |
0 |
if (tmp == 0) break; |
|
193
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
195
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
198
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
199
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
201
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
202
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) ) continue; flag = 1;,) |
|
204
|
0 |
0 |
if (tmp == 0) break; |
|
206
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
208
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
211
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
212
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
214
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
215
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan) ) continue; flag = 1;,) |
|
|
0 |
0 |
PDL_IF_BAD(if ( PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan) ) continue; flag = 1;,) |
|
217
|
0 |
0 |
if (tmp == 0) break; |
|
219
|
0 |
0 |
PDL_IF_BAD(if ( !flag ) (b_datap)[0]=b_badval; else,) |
|
221
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
231
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_SByte,A,PDL_Double,D) |
|
232
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
234
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
237
|
0 |
0 |
if (tmp == 0) break; |
|
241
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
244
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Byte,B,PDL_Double,D) |
|
245
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
247
|
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 (tmp == 0) break; |
|
254
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
257
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Short,S,PDL_Double,D) |
|
258
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
260
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
263
|
0 |
0 |
if (tmp == 0) break; |
|
267
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
270
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Ushort,U,PDL_Double,D) |
|
271
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
273
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
276
|
0 |
0 |
if (tmp == 0) break; |
|
280
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
283
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Long,L,PDL_Double,D) |
|
284
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
286
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
289
|
0 |
0 |
if (tmp == 0) break; |
|
293
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
296
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULong,K,PDL_Double,D) |
|
297
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
299
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
302
|
0 |
0 |
if (tmp == 0) break; |
|
306
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
309
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Indx,N,PDL_Double,D) |
|
310
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
312
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
315
|
0 |
0 |
if (tmp == 0) break; |
|
319
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
322
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_ULongLong,P,PDL_Double,D) |
|
323
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
325
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
328
|
0 |
0 |
if (tmp == 0) break; |
|
332
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
335
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LongLong,Q,PDL_Double,D) |
|
336
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
338
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
341
|
0 |
0 |
if (tmp == 0) break; |
|
345
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
348
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Float,F,PDL_Double,D) |
|
349
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
351
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
354
|
0 |
0 |
if (tmp == 0) break; |
|
358
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
361
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_Double,D,PDL_Double,D) |
|
362
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
364
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
367
|
0 |
0 |
if (tmp == 0) break; |
|
371
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
374
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_dprodover_1(PDL_LDouble,E,PDL_Double,D) |
|
375
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_dprodover_readdata {PDL_Double tmp = 1; |
|
377
|
0 |
0 |
{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { |
|
380
|
0 |
0 |
if (tmp == 0) break; |
|
384
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
|
0 |
0 |
}PDL_BROADCASTLOOP_END_dprodover_readdata |
|
418
|
0 |
0 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
420
|
0 |
0 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
423
|
0 |
0 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
424
|
0 |
0 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |