diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix bad calls (obs from Paulo Moura).

Browse Source
This commit is contained in:
Costa Vitor
2009-06-08 14:13:31 -05:00
parent 982cf95bf6
commit 1e55e2f388
5 changed files with 12 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
library/wundgraphs.yap
View File

@@ -15,8 +15,6 @@
wundgraph_neighbours/3,
wundgraph_wneighbors/3,
wundgraph_wneighbours/3,
wdgraph_to_wundgraph/2,
wundgraph_to_undgraph/2,
wundgraph_min_tree/3,
wundgraph_max_tree/3]).
@@ -46,7 +44,8 @@
wdgraph_del_edges/3,
wdgraph_del_vertex/3,
wdgraph_edges/2,
wdgraph_neighbors/3,
wdgraph_neighbours/3,
wdgraph_wneighbours/3,
wdgraph_symmetric_closure/2
]).
@@ -98,7 +97,7 @@ wundgraph_neighbours(V,Vertices,Children) :-
Children = Children0
).
wundgraph_neighbors(V,Vertices,Children) :-
wdgraph_neighbors(V,Vertices,Children0),
wdgraph_neighbours(V,Vertices,Children0),
(
wdel_me(Children0,V,Children)
->
@@ -117,7 +116,7 @@ wundgraph_wneighbours(V,Vertices,Children) :-
Children = Children0
).
wundgraph_wneighbors(V,Vertices,Children) :-
wdgraph_wneighbors(V,Vertices,Children0),
wdgraph_wneighbours(V,Vertices,Children0),
(
del_me(Children0,V,Children)
->