diff options
author | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-08 21:09:53 +0000 |
---|---|---|
committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-08 21:09:53 +0000 |
commit | 6cf364b18897c61b3200ed9c5795c7b48cf23b59 (patch) | |
tree | b6408927b2b16817fb12fee15b664a11db245958 /plugins/omega | |
parent | 0077eb84e8eda65e5ac327aecba7e3fbf77ee016 (diff) |
Porting Tactics.assumption to the new engine.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@17073 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'plugins/omega')
-rw-r--r-- | plugins/omega/coq_omega.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plugins/omega/coq_omega.ml b/plugins/omega/coq_omega.ml index 26d252726..98baf7b2a 100644 --- a/plugins/omega/coq_omega.ml +++ b/plugins/omega/coq_omega.ml @@ -1058,7 +1058,7 @@ let replay_history tactic_normalisation = Proofview.V82.tactic (simpl_in_concl); intro; (absurd not_sup_sup) ]) - [ Proofview.V82.tactic assumption ; reflexivity ] + [ assumption ; reflexivity ] in let theorem = mkApp (Lazy.force coq_OMEGA2, [| @@ -1127,7 +1127,7 @@ let replay_history tactic_normalisation = (intros_using [aux]); Proofview.V82.tactic (resolve_id aux); Proofview.V82.tactic (mk_then tac); - Proofview.V82.tactic assumption ] ; + assumption ] ; Tacticals.New.tclTHENLIST [ Proofview.V82.tactic (unfold sp_Zgt); Proofview.V82.tactic simpl_in_concl; |