]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/tactics/declarative.ml
Release 0.5.9.
[helm.git] / helm / software / components / tactics / declarative.ml
index 02d7c6144a0f7d1bf1d70474aeed1281f4106877..139dcb1f8757995a9a39fc8df047338885708e80 100644 (file)
@@ -197,7 +197,7 @@ let rewritingstep ~dbd ~automation_cache lhs rhs just last_step =
     | `Term just -> Tactics.apply just
     | `SolveWith term -> 
                     Tactics.demodulate ~automation_cache ~dbd
-                    ~params:(Some [term],
+                    ~params:([term],
                       ["all","1";"steps","1"; "use_context","false"])
     | `Proof ->
         Tacticals.id_tac