Skip to content
Snippets Groups Projects
Commit 53885542 authored by Michael Sammler's avatar Michael Sammler
Browse files

Add Arguments bool_decide : simpl never

parent fce3654d
No related branches found
No related tags found
No related merge requests found
......@@ -88,6 +88,7 @@ Notation cast_if_not S := (if S then right _ else left _).
(** We can convert decidable propositions to booleans. *)
Definition bool_decide (P : Prop) {dec : Decision P} : bool :=
if dec then true else false.
Global Arguments bool_decide : simpl never.
Lemma bool_decide_reflect P `{dec : Decision P} : reflect P (bool_decide P).
Proof. unfold bool_decide. destruct dec; [left|right]; assumption. Qed.
......
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