Skip to content
Snippets Groups Projects
Commit 82b3e17d authored by Ralf Jung's avatar Ralf Jung
Browse files

more auto

parent 0fbbe7ac
No related branches found
No related tags found
1 merge request!81add inverses of bool_decide_{true,false}
This commit is part of merge request !81. Comments created here will be created in the context of that merge request.
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
theories/decidable.v
+ 1
− 1
View file @ 82b3e17d
...@@ -126,7 +126,7 @@ Lemma bool_decide_false_2 P `{!Decision P}: bool_decide P = false → ¬P. ...@@ -126,7 +126,7 @@ Lemma bool_decide_false_2 P `{!Decision P}: bool_decide P = false → ¬P.
Proof. Proof.
intros Heq HP. assert (HP': bool_decide P). intros Heq HP. assert (HP': bool_decide P).
{ apply bool_decide_spec. assumption. } { apply bool_decide_spec. assumption. }
destruct (bool_decide P). discriminate. contradiction. case_bool_decide; auto || discriminate.
Qed. Qed.
(** * Decidable Sigma types *) (** * Decidable Sigma types *)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment