diff options
| author | Pierre-Marie Pédrot | 2015-12-24 17:47:01 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-12-24 17:53:42 +0100 |
| commit | f33fc85b1dd2f4994dc85b0943fe503ace2cc5ff (patch) | |
| tree | 185b299eb06cfd700b66f3f321bb89f0f883a172 | |
| parent | 74ebc8b3c20a41f17244d3ab13f984ede2e201e3 (diff) | |
Removing the last quoted auto tactic in Tauto.
| -rw-r--r-- | tactics/tauto.ml4 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tactics/tauto.ml4 b/tactics/tauto.ml4 index 3aa9d6d793..d84f471163 100644 --- a/tactics/tauto.ml4 +++ b/tactics/tauto.ml4 @@ -393,7 +393,9 @@ let tauto_gen flags = tauto_intuitionistic flags end -let default_intuition_tac = <:tactic< auto with * >> +let default_intuition_tac = + let tac _ _ = Auto.h_auto None [] None in + register_tauto_tactic tac "auto_with" (* This is the uniform mode dealing with ->, not, iff and types isomorphic to /\ and *, \/ and +, False and Empty_set, True and unit, _and_ eq-like types. |