Skip to content
Snippets Groups Projects
Commit 6ac4c450 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Merge branch 'ralf/bool_decide' into 'master'

add unfolding lemma for bool_decide: bool_decide_decide

See merge request !73
parents c781cb85 36c6d934
No related branches found
No related tags found
No related merge requests found
......@@ -91,6 +91,10 @@ Definition bool_decide (P : Prop) {dec : Decision P} : bool :=
Lemma bool_decide_reflect P `{dec : Decision P} : reflect P (bool_decide P).
Proof. unfold bool_decide. destruct dec; [left|right]; assumption. Qed.
Lemma bool_decide_decide P `{!Decision P} :
bool_decide P = if decide P then true else false.
Proof. reflexivity. Qed.
Tactic Notation "case_bool_decide" "as" ident (Hd) :=
match goal with
| H : context [@bool_decide ?P ?dec] |- _ =>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment