diff options
Diffstat (limited to 'src/Util/Bool.v')
| -rw-r--r-- | src/Util/Bool.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Util/Bool.v b/src/Util/Bool.v index fe6ae64e4..fb2038de5 100644 --- a/src/Util/Bool.v +++ b/src/Util/Bool.v @@ -103,3 +103,8 @@ Ltac split_andb_in_context := repeat split_andb_in_context_step. Lemma if_const A (b : bool) (x : A) : (if b then x else x) = x. Proof. case b; reflexivity. Qed. + +Lemma ex_bool_iff_or P : @ex bool P <-> (or (P true) (P false)). +Proof. + split; [ intros [ [] ? ] | intros [?|?]; eexists ]; eauto. +Qed. |