Branch Coverage

lib/PDL/ImageND-pp-path_join.c
Criterion Covered Total %
branch 100 1692 5.9


line true false branch
39 0 5 PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans));
52 0 5 if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "broadcast.incs NULL");
131 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_SByte,A,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
132 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
133 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
134 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
147 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
149 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
150 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
154 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
155 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
161 0 0 if (highest_no_inward >= 0) {
163 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
165 0 0 if (idthis == -1)
166 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
167 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
170 0 0 if (idthis == -1) break;
172 0 0 if (idthis == -1) break;
173 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
176 0 0 if (edgehighest < 0) break;
178 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
180 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
183 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
185 0 0 if (edgeidnext != edgehighest)
186 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
190 0 0 if (!__params->directed) { /* remove the edge in the other direction */
193 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
195 0 0 if (maybe_other != idthis) continue;
199 0 0 if (edgeidnext == -1)
201 0 0 if (edgeidnext != edgehighest)
202 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
209 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
211 0 0 if (idthis == -1) break;
213 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
216 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Byte,B,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
217 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
218 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
219 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
232 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
234 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
235 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
239 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
240 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
246 0 0 if (highest_no_inward >= 0) {
248 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
250 0 0 if (idthis == -1)
251 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
252 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
255 0 0 if (idthis == -1) break;
257 0 0 if (idthis == -1) break;
258 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
261 0 0 if (edgehighest < 0) break;
263 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
265 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
268 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
270 0 0 if (edgeidnext != edgehighest)
271 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
275 0 0 if (!__params->directed) { /* remove the edge in the other direction */
278 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
280 0 0 if (maybe_other != idthis) continue;
284 0 0 if (edgeidnext == -1)
286 0 0 if (edgeidnext != edgehighest)
287 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
294 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
296 0 0 if (idthis == -1) break;
298 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
301 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Short,S,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
302 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
303 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
304 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
317 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
319 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
320 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
324 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
325 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
331 0 0 if (highest_no_inward >= 0) {
333 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
335 0 0 if (idthis == -1)
336 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
337 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
340 0 0 if (idthis == -1) break;
342 0 0 if (idthis == -1) break;
343 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
346 0 0 if (edgehighest < 0) break;
348 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
350 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
353 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
355 0 0 if (edgeidnext != edgehighest)
356 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
360 0 0 if (!__params->directed) { /* remove the edge in the other direction */
363 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
365 0 0 if (maybe_other != idthis) continue;
369 0 0 if (edgeidnext == -1)
371 0 0 if (edgeidnext != edgehighest)
372 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
379 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
381 0 0 if (idthis == -1) break;
383 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
386 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Ushort,U,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
387 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
388 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
389 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
402 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
404 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
405 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
409 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
410 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
416 0 0 if (highest_no_inward >= 0) {
418 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
420 0 0 if (idthis == -1)
421 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
422 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
425 0 0 if (idthis == -1) break;
427 0 0 if (idthis == -1) break;
428 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
431 0 0 if (edgehighest < 0) break;
433 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
435 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
438 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
440 0 0 if (edgeidnext != edgehighest)
441 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
445 0 0 if (!__params->directed) { /* remove the edge in the other direction */
448 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
450 0 0 if (maybe_other != idthis) continue;
454 0 0 if (edgeidnext == -1)
456 0 0 if (edgeidnext != edgehighest)
457 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
464 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
466 0 0 if (idthis == -1) break;
468 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
471 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Long,L,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
472 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
473 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
474 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
487 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
489 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
490 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
494 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
495 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
501 0 0 if (highest_no_inward >= 0) {
503 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
505 0 0 if (idthis == -1)
506 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
507 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
510 0 0 if (idthis == -1) break;
512 0 0 if (idthis == -1) break;
513 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
516 0 0 if (edgehighest < 0) break;
518 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
520 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
523 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
525 0 0 if (edgeidnext != edgehighest)
526 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
530 0 0 if (!__params->directed) { /* remove the edge in the other direction */
533 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
535 0 0 if (maybe_other != idthis) continue;
539 0 0 if (edgeidnext == -1)
541 0 0 if (edgeidnext != edgehighest)
542 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
549 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
551 0 0 if (idthis == -1) break;
553 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
556 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULong,K,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
557 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
558 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
559 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
572 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
574 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
575 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
579 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
580 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
586 0 0 if (highest_no_inward >= 0) {
588 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
590 0 0 if (idthis == -1)
591 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
592 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
595 0 0 if (idthis == -1) break;
597 0 0 if (idthis == -1) break;
598 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
601 0 0 if (edgehighest < 0) break;
603 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
605 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
608 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
610 0 0 if (edgeidnext != edgehighest)
611 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
615 0 0 if (!__params->directed) { /* remove the edge in the other direction */
618 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
620 0 0 if (maybe_other != idthis) continue;
624 0 0 if (edgeidnext == -1)
626 0 0 if (edgeidnext != edgehighest)
627 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
634 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
636 0 0 if (idthis == -1) break;
638 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
641 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
642 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
643 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
644 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
657 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
659 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
660 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
664 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
665 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
671 0 0 if (highest_no_inward >= 0) {
673 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
675 0 0 if (idthis == -1)
676 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
677 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
680 0 0 if (idthis == -1) break;
682 0 0 if (idthis == -1) break;
683 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
686 0 0 if (edgehighest < 0) break;
688 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
690 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
693 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
695 0 0 if (edgeidnext != edgehighest)
696 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
700 0 0 if (!__params->directed) { /* remove the edge in the other direction */
703 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
705 0 0 if (maybe_other != idthis) continue;
709 0 0 if (edgeidnext == -1)
711 0 0 if (edgeidnext != edgehighest)
712 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
719 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
721 0 0 if (idthis == -1) break;
723 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
726 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_ULongLong,P,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
727 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
728 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
729 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
742 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
744 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
745 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
749 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
750 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
756 0 0 if (highest_no_inward >= 0) {
758 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
760 0 0 if (idthis == -1)
761 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
762 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
765 0 0 if (idthis == -1) break;
767 0 0 if (idthis == -1) break;
768 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
771 0 0 if (edgehighest < 0) break;
773 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
775 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
778 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
780 0 0 if (edgeidnext != edgehighest)
781 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
785 0 0 if (!__params->directed) { /* remove the edge in the other direction */
788 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
790 0 0 if (maybe_other != idthis) continue;
794 0 0 if (edgeidnext == -1)
796 0 0 if (edgeidnext != edgehighest)
797 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
804 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
806 0 0 if (idthis == -1) break;
808 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
811 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LongLong,Q,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
812 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
813 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
814 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
827 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
829 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
830 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
834 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
835 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
841 0 0 if (highest_no_inward >= 0) {
843 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
845 0 0 if (idthis == -1)
846 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
847 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
850 0 0 if (idthis == -1) break;
852 0 0 if (idthis == -1) break;
853 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
856 0 0 if (edgehighest < 0) break;
858 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
860 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
863 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
865 0 0 if (edgeidnext != edgehighest)
866 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
870 0 0 if (!__params->directed) { /* remove the edge in the other direction */
873 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
875 0 0 if (maybe_other != idthis) continue;
879 0 0 if (edgeidnext == -1)
881 0 0 if (edgeidnext != edgehighest)
882 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
889 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
891 0 0 if (idthis == -1) break;
893 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
896 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Float,F,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
897 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
898 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
899 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
912 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
914 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
915 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
919 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
920 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
926 0 0 if (highest_no_inward >= 0) {
928 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
930 0 0 if (idthis == -1)
931 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
932 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
935 0 0 if (idthis == -1) break;
937 0 0 if (idthis == -1) break;
938 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
941 0 0 if (edgehighest < 0) break;
943 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
945 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
948 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
950 0 0 if (edgeidnext != edgehighest)
951 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
955 0 0 if (!__params->directed) { /* remove the edge in the other direction */
958 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
960 0 0 if (maybe_other != idthis) continue;
964 0 0 if (edgeidnext == -1)
966 0 0 if (edgeidnext != edgehighest)
967 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
974 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
976 0 0 if (idthis == -1) break;
978 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
981 0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
5 0 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 5 PDL_DECLARE_PARAMS_path_join_1(PDL_Double,D,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
982 0 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
33 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
5 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
5 5 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
983 30 5 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
984 60 5 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
997 30 5 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
999 30 0 PDL_ADJ_ADD(from,to);
0 30 PDL_ADJ_ADD(from,to);
30 0 PDL_ADJ_ADD(from,to);
0 30 PDL_ADJ_ADD(from,to);
0 30 PDL_ADJ_ADD(from,to);
1000 12 18 if (!__params->directed) PDL_ADJ_ADD(to,from);
12 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 12 if (!__params->directed) PDL_ADJ_ADD(to,from);
12 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 12 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 12 if (!__params->directed) PDL_ADJ_ADD(to,from);
1004 33 5 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
1005 7 26 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 7 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
1011 7 14 if (highest_no_inward >= 0) {
1013 7 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
1015 14 7 if (idthis == -1)
1016 66 5 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
1017 57 9 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
1020 16 5 if (idthis == -1) break;
1022 0 46 if (idthis == -1) break;
1023 0 46 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
1026 16 30 if (edgehighest < 0) break;
1028 38 30 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
1030 26 12 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
1033 22 8 if (edgeidnext == -1) edgeidnext = edgehighest;
1035 4 26 if (edgeidnext != edgehighest)
1036 4 4 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
1040 12 18 if (!__params->directed) { /* remove the edge in the other direction */
1043 20 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
1045 8 12 if (maybe_other != idthis) continue;
1049 0 12 if (edgeidnext == -1)
1051 4 8 if (edgeidnext != edgehighest)
1052 8 4 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
1059 0 16 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
1061 0 16 if (idthis == -1) break;
1063 0 5 }PDL_BROADCASTLOOP_END_path_join_readdata
0 5 }PDL_BROADCASTLOOP_END_path_join_readdata
1066 0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
0 0 PDL_DECLARE_PARAMS_path_join_1(PDL_LDouble,E,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Indx,N,PDL_Byte,B,PDL_Indx,N)
1067 0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
0 0 PDL_BROADCASTLOOP_START_path_join_readdata {{/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) { (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] = -1; (hasinward_datap)[0+(__inc_hasinward_d*(d))] = 0; }} /* Close d */
1068 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (pathendindex_datap)[0+(__inc_pathendindex_n*(n))] = -1; }} /* Close n */
1069 0 0 {/* Open nout */ PDL_EXPAND2(register PDL_Indx nout=0, __nout_stop=(__nout_size)); for(; nout<__nout_stop; nout+=1) { (paths_datap)[0+(__inc_paths_nout*(nout))] = -1; }} /* Close nout */
1082 0 0 {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
1084 0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
0 0 PDL_ADJ_ADD(from,to);
1085 0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
0 0 if (!__params->directed) PDL_ADJ_ADD(to,from);
1089 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
1090 0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
0 0 if ((hasinward_datap)[0+(__inc_hasinward_d*(d))] || (highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
1096 0 0 if (highest_no_inward >= 0) {
1098 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(idthis))] == 0) highest_no_inward--;
1100 0 0 if (idthis == -1)
1101 0 0 {/* Open d */ PDL_EXPAND2(register PDL_Indx d=0, __d_stop=(__d_size)); for(; d<__d_stop; d+=1) {
1102 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(d))] == -1) continue;
1105 0 0 if (idthis == -1) break;
1107 0 0 if (idthis == -1) break;
1108 0 0 if (pind >= __privtrans->ind_sizes[2]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pind exceeded nout");
1111 0 0 if (edgehighest < 0) break;
1113 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) { /* look for non-sink */
1115 0 0 if ((highestoutedge_datap)[0+(__inc_highestoutedge_d*(maybe_next))] <= 0) continue;
1118 0 0 if (edgeidnext == -1) edgeidnext = edgehighest;
1120 0 0 if (edgeidnext != edgehighest)
1121 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
1125 0 0 if (!__params->directed) { /* remove the edge in the other direction */
1128 0 0 {/* Open d0=edgehighest:0:-1 */ PDL_EXPAND2(register PDL_Indx d0=PDLMIN(edgehighest, (__d_size-1)), __d0_stop=0); for(; d0>=__d0_stop; d0+=-1) {
1130 0 0 if (maybe_other != idthis) continue;
1134 0 0 if (edgeidnext == -1)
1136 0 0 if (edgeidnext != edgehighest)
1137 0 0 {/* Open d0=edgeidnext:edgehighest */ PDL_EXPAND2(register PDL_Indx d0=PDLMAX((edgeidnext),0), __d0_stop=PDLMIN(edgehighest, (__d_size))); for(; d0<__d0_stop; d0+=1) {
1144 0 0 if (pcount >= __privtrans->ind_sizes[1]) return PDL->make_error(PDL_EUSERERROR, "Error in path_join:" "pcount exceeded n");
1146 0 0 if (idthis == -1) break;
1148 0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
0 0 }PDL_BROADCASTLOOP_END_path_join_readdata
1186 0 5 if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
1188 0 5 if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
1193 0 5 PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
1196 0 5 PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));