Stupid bug fixed (a completely erroneous assert false removed).

[helm.git] / helm / ocaml / tactics / variousTactics.ml

diff --git a/helm/ocaml/tactics/variousTactics.ml b/helm/ocaml/tactics/variousTactics.ml
index 73309c43ecfb387cf2f901700c52461f26ad0b45..51e59961d159ac4617de0c44b9219ed51503133d 100644 (file)
--- a/helm/ocaml/tactics/variousTactics.ml
+++ b/helm/ocaml/tactics/variousTactics.ml
@@ -89,7 +89,6 @@ let generalize_tac
     let (_,context,ty) as conjecture = CicUtil.lookup_meta goal metasenv in
     let selected_hyps,terms_with_context =
      ProofEngineHelpers.select ~metasenv ~conjecture ~pattern in
-    assert (selected_hyps = []);
     let typ,term =
      match terms_with_context, term with
         [], None ->