]> Repositorios git - scryer-prolog.git/commitdiff
remove scratch comments from clpb.pl
authorMark Thom <[email protected]>
Wed, 23 Oct 2019 03:19:01 +0000 (21:19 -0600)
committerMark Thom <[email protected]>
Wed, 23 Oct 2019 03:19:01 +0000 (21:19 -0600)
src/prolog/lib/clpb.pl

index 2b140a72db24680e8292138a6bc809cf5dfce9bf..5aa9561a9f4b7bf570ae5f2477688189234aacf1 100644 (file)
@@ -1244,8 +1244,7 @@ bdd_count(Node, VNum, Count) :-
                 bdd_count(High, VNum, HCount),
                 bdd_pow(Low, V, VNum, LPow),
                 bdd_pow(High, V, VNum, HPow),
-                Count0 is LPow*LCount + HPow*HCount,
-               Count0 = Count
+                Count is LPow*LCount + HPow*HCount
             )
         ).
 
@@ -1358,7 +1357,7 @@ weighted_maximum(Ws, Vars, Max) :-
         pairs_values(IVs1, VarsIndexOrder),
         % Pairs is a list of Var-Weight terms, in index order of Vars
         pairs_keys_values(Pairs, VarsIndexOrder, WeightsIndexOrder),
-        bdd_maximum(BDD, Pairs, Max), %% A,B are in BDD, but not C; A,B,C *are* in Pairs.
+        bdd_maximum(BDD, Pairs, Max),
         max_labeling(BDD, Pairs).
 
 max_labeling(1, Pairs) :- max_upto(Pairs, _, _).