aboutsummaryrefslogtreecommitdiff
path: root/src/Reflection/RewriterWf.v
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2017-04-04 14:35:43 -0400
committerGravatar Jason Gross <jasongross9@gmail.com>2017-04-04 16:05:55 -0400
commit331fe3fcfb27d87dcfb0585ced3c051f19aaedf2 (patch)
treea9af1a7f8bba3fb1f6e7d1610ca1553f5e5f23c2 /src/Reflection/RewriterWf.v
parent6cba3c4e0572e9d917d3578c39f4f85cd3799b54 (diff)
Add [Proof using] to most proofs
This closes #146 and makes `make quick` faster. The changes were generated by adding [Global Set Suggest Proof Using.] to GlobalSettings.v, and then following [the instructions for a script I wrote](https://github.com/JasonGross/coq-tools#proof-using-helper).
Diffstat (limited to 'src/Reflection/RewriterWf.v')
-rw-r--r--src/Reflection/RewriterWf.v6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Reflection/RewriterWf.v b/src/Reflection/RewriterWf.v
index a9ad229a0..a7ac86851 100644
--- a/src/Reflection/RewriterWf.v
+++ b/src/Reflection/RewriterWf.v
@@ -31,14 +31,14 @@ Section language.
Lemma wff_rewrite_opf {t} G (e1 : @exprf var1 t) (e2 : @exprf var2 t)
(Hwf : wff G e1 e2)
: wff G (rewrite_opf rewrite_op_expr1 e1) (rewrite_opf rewrite_op_expr2 e2).
- Proof.
+ Proof using Type*.
induction Hwf; simpl; try constructor; auto.
Qed.
Lemma wf_rewrite_opf {t} (e1 : @expr var1 t) (e2 : @expr var2 t)
(Hwf : wf e1 e2)
: wf (rewrite_op rewrite_op_expr1 e1) (rewrite_op rewrite_op_expr2 e2).
- Proof.
+ Proof using Type*.
destruct Hwf; simpl; constructor; intros; apply wff_rewrite_opf; auto.
Qed.
End with_var.
@@ -53,7 +53,7 @@ Section language.
{t} (e : Expr t)
(Hwf : Wf e)
: Wf (RewriteOp rewrite_op_expr e).
- Proof.
+ Proof using Type.
intros var1 var2; apply wf_rewrite_opf; auto.
Qed.
End language.