diff options
| author |  delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-01-09 16:29:22 +0000 |
|---|---|---|
| committer | delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-01-09 16:29:22 +0000 |
| commit | db18bce6e5da22294b33e93e114a71e8c08fc8ee (patch) | |
| tree | 9cc6b1f7fe4d3ef8583dc6f18c51821e84efc837 /contrib/ring | |
| parent | 43f76860196296aa180e27d90f64a05ed7edf9d7 (diff) | |
Meta Definition -> Tactic Definition
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1238 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/ring')
| -rw-r--r-- | contrib/ring/ArithRing.v | 2 | ||||
| -rw-r--r-- | contrib/ring/Ring_abstract.v | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/contrib/ring/ArithRing.v b/contrib/ring/ArithRing.v index 9b6a695e7..14d69e2b0 100644 --- a/contrib/ring/ArithRing.v +++ b/contrib/ring/ArithRing.v @@ -38,4 +38,4 @@ Goal (n:nat)(S n)=(plus (S O) n). Intro; Reflexivity. Save S_to_plus_one. -Meta Definition NatRing := (Repeat Rewrite S_to_plus_one); Ring. +Tactic Definition NatRing := (Repeat Rewrite S_to_plus_one); Ring. diff --git a/contrib/ring/Ring_abstract.v b/contrib/ring/Ring_abstract.v index 4150efc2d..6bb1f5aa9 100644 --- a/contrib/ring/Ring_abstract.v +++ b/contrib/ring/Ring_abstract.v @@ -443,7 +443,7 @@ Save. Hint rew_isacs_aux : core := Extern 10 (eqT A ? ?) Rewrite isacs_aux_ok. -Meta Definition Solve1 := +Tactic Definition Solve1 := Simpl; Elim (varlist_lt v v0); Simpl; Rewrite isacs_aux_ok; [Rewrite H; Simpl; Auto |Simpl in H0; Rewrite H0; Auto ]. @@ -499,7 +499,7 @@ Lemma signed_sum_merge_ok : (x,y:signed_sum) Save. -Meta Definition Solve2 := +Tactic Definition Solve2 := Elim (varlist_lt l v); Simpl; Rewrite isacs_aux_ok; [ Auto | Rewrite H; Auto ]. |