From 2e11e475e62e4f3d6872554fb504d77bf2327b7d Mon Sep 17 00:00:00 2001
From: denes <??>
Date: Thu, 25 Jun 2009 08:54:30 +0000
Subject: [PATCH] Fixed insertion of passive clauses

---
 helm/software/components/ng_paramodulation/paramod.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/helm/software/components/ng_paramodulation/paramod.ml b/helm/software/components/ng_paramodulation/paramod.ml
index 787bb522e..98bfdde65 100644
--- 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
-- 
2.39.2