| 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)); |