Fixed insertion of passive clauses

diff --git a/helm/software/components/ng_paramodulation/paramod.ml b/helm/software/components/ng_paramodulation/paramod.ml
index 787bb522edacbbf3f4f4fbb248d699dfc3a40efe..98bfdde6566deff12d40c57653e3c316935f03c6 100644 (file)
--- a/helm/software/components/ng_paramodulation/paramod.ml
+++ b/helm/software/components/ng_paramodulation/paramod.ml
@@ -35,7 +35,7 @@ let nparamod rdb metasenv subst context t table =
   in
   let module WeightPassiveSet = Set.Make(WeightOrderedPassives) in
   let module AgePassiveSet = Set.Make(AgeOrderedPassives) in
-  let add_passive_clause ?(no_weight=true) (passives_w,passives_a) cl =
+  let add_passive_clause ?(no_weight=false) (passives_w,passives_a) cl =
     let cl = if no_weight then (0,cl)
     else Utils.mk_passive_clause cl in
     WeightPassiveSet.add cl passives_w, AgePassiveSet.add cl passives_a