Branch Coverage

lib/PDL/Ufunc-pp-maximum_n_ind.c
Criterion Covered Total %
branch 45 1394 3.2


line true false branch
44 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_SByte,A,PDL_Indx,N)
45 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
48 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Byte,B,PDL_Indx,N)
49 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
52 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Short,S,PDL_Indx,N)
53 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
56 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Ushort,U,PDL_Indx,N)
57 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
60 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Long,L,PDL_Indx,N)
61 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
64 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULong,K,PDL_Indx,N)
65 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
68 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Indx,N,PDL_Indx,N)
69 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
72 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_ULongLong,P,PDL_Indx,N)
73 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
76 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LongLong,Q,PDL_Indx,N)
77 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
80 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Float,F,PDL_Indx,N)
81 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
84 0 1 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_Double,D,PDL_Indx,N)
85 0 1 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
88 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_0(PDL_LDouble,E,PDL_Indx,N)
89 0 0 {if(__privtrans->ind_sizes[0] > __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "m_size > n_size");}
95 0 1 PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans));
107 0 1 if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in maximum_n_ind:" "broadcast.incs NULL");
143 0 1 if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */
148 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
149 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
151 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
153 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
155 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
156 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
158 0 0 if (!flag &&
0 0 if (!flag &&
159 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,A,a_badval_isnan) &&,)
160 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_A(cur)))
163 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
165 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
168 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
169 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
171 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
173 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
175 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
176 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
178 0 0 if (!flag &&
0 0 if (!flag &&
179 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,B,a_badval_isnan) &&,)
180 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_B(cur)))
183 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
185 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
188 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
189 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
191 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
193 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
195 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
196 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
198 0 0 if (!flag &&
0 0 if (!flag &&
199 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,S,a_badval_isnan) &&,)
200 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_S(cur)))
203 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
205 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
208 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
209 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
211 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
213 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
215 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
216 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
218 0 0 if (!flag &&
0 0 if (!flag &&
219 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,U,a_badval_isnan) &&,)
220 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_U(cur)))
223 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
225 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
228 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
229 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
231 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
233 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
235 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
236 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
238 0 0 if (!flag &&
0 0 if (!flag &&
239 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,L,a_badval_isnan) &&,)
240 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_L(cur)))
243 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
245 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
248 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
249 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
251 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
253 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
255 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
256 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
258 0 0 if (!flag &&
0 0 if (!flag &&
259 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,K,a_badval_isnan) &&,)
260 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_K(cur)))
263 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
265 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
268 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
269 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
271 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
273 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
275 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
276 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
278 0 0 if (!flag &&
0 0 if (!flag &&
279 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,N,a_badval_isnan) &&,)
280 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_N(cur)))
283 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
285 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
288 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
289 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
291 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
293 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
295 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
296 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
298 0 0 if (!flag &&
0 0 if (!flag &&
299 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,P,a_badval_isnan) &&,)
300 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_P(cur)))
303 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
305 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
308 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
309 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
311 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
313 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
315 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
316 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
318 0 0 if (!flag &&
0 0 if (!flag &&
319 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) &&,)
0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,Q,a_badval_isnan) &&,)
320 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_Q(cur)))
323 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
325 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
328 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
329 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
331 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
333 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
335 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
336 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
338 0 0 if (!flag &&
0 0 if (!flag &&
0 0 if (!flag &&
339 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan) &&,)
340 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_F(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_F(cur)))
343 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
345 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
348 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
349 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
351 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
353 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
355 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
356 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
358 0 0 if (!flag &&
0 0 if (!flag &&
0 0 if (!flag &&
359 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan) &&,)
360 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_D(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_D(cur)))
363 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
365 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
368 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
369 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
371 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
373 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
375 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
376 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
378 0 0 if (!flag &&
0 0 if (!flag &&
0 0 if (!flag &&
379 0 0 PDL_IF_BAD(!PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,E,a_badval_isnan) &&,)
380 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_E(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_E(cur)))
383 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
385 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
395 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_SByte,A,PDL_Indx,N)
396 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_SByte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
398 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
400 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
402 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
403 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
405 0 0 if (!flag &&
0 0 if (!flag &&
407 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_A(cur)))
410 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
412 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
415 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Byte,B,PDL_Indx,N)
416 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Byte cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
418 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
420 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
422 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
423 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
425 0 0 if (!flag &&
0 0 if (!flag &&
427 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_B(cur)))
430 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
432 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
435 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Short,S,PDL_Indx,N)
436 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Short cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
438 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
440 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
442 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
443 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
445 0 0 if (!flag &&
0 0 if (!flag &&
447 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_S(cur)))
450 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
452 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
455 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Ushort,U,PDL_Indx,N)
456 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Ushort cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
458 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
460 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
462 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
463 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
465 0 0 if (!flag &&
0 0 if (!flag &&
467 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_U(cur)))
470 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
472 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
475 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Long,L,PDL_Indx,N)
476 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Long cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
478 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
480 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
482 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
483 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
485 0 0 if (!flag &&
0 0 if (!flag &&
487 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_L(cur)))
490 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
492 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
495 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULong,K,PDL_Indx,N)
496 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
498 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
500 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
502 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
503 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
505 0 0 if (!flag &&
0 0 if (!flag &&
507 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_K(cur)))
510 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
512 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
515 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Indx,N,PDL_Indx,N)
516 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Indx cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
518 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
520 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
522 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
523 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
525 0 0 if (!flag &&
0 0 if (!flag &&
527 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_N(cur)))
530 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
532 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
535 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_ULongLong,P,PDL_Indx,N)
536 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_ULongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
538 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
540 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
542 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
543 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
545 0 0 if (!flag &&
0 0 if (!flag &&
547 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_P(cur)))
550 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
552 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
555 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LongLong,Q,PDL_Indx,N)
556 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LongLong cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
558 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
560 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
562 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
563 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
565 0 0 if (!flag &&
0 0 if (!flag &&
567 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_Q(cur)))
570 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
572 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
575 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Float,F,PDL_Indx,N)
576 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Float cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
578 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
580 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
582 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
583 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
585 0 0 if (!flag &&
0 0 if (!flag &&
587 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_F(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_F(cur)))
590 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
592 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
595 0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
1 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
0 1 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_Double,D,PDL_Indx,N)
596 0 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
1 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
1 1 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_Double cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
598 3 1 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
600 15 3 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
602 14 12 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
603 3 11 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
605 12 3 if (!flag &&
9 3 if (!flag &&
607 0 9 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_D(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_D(cur)))
610 3 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
612 0 1 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 1 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
615 0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_maximum_n_ind_1(PDL_LDouble,E,PDL_Indx,N)
616 0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
0 0 PDL_BROADCASTLOOP_START_maximum_n_ind_readdata {PDL_LDouble cur = 0; PDL_Indx curind; register PDL_Indx ns = __privtrans->ind_sizes[1];
618 0 0 {/* Open m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=(__m_size)); for(; m<__m_stop; m+=1) {
620 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
622 0 0 {/* Open m=:outer_m */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(outer_m, (__m_size))); for(; m<__m_stop; m+=1) {
623 0 0 if ((c_datap)[0+(__inc_c_m*(m))] == n) {flag=1; break;}
625 0 0 if (!flag &&
0 0 if (!flag &&
627 0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_E(cur)))
0 0 ((curind == ns) || (a_datap)[0+(__inc_a_n*(n))] > cur || PDL_ISNAN_E(cur)))
630 0 0 if (curind != ns) { (c_datap)[0+(__inc_c_m*(m))] = curind; }
632 0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
0 0 }} /* Close m */}PDL_BROADCASTLOOP_END_maximum_n_ind_readdata
666 0 1 if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
668 0 1 if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
672 0 1 PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
674 0 1 PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));