diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-07-10 14:31:47 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-07-10 14:31:47 +0000 |
commit | ea83ab467124ccdbe2d98434f409a1061b689267 (patch) | |
tree | 900d2d2288f5c17184ef80dfb240e841a24dece0 /theories/Init/Datatypes.v | |
parent | 25533df336888df4255e3882e21d5d5420e5de28 (diff) |
Bool: iff lemmas about or, a reflect inductive, an is_true function
For the moment, almost no lemmas about (reflect P b), just the proofs
that it is equivalent with an P<->b=true.
is_true b is (b=true), and is meant to be added as a coercion
if one wants it. In the StdLib, this coercion is not globally
activated, but particular files are free to use Local Coercion...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13275 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Init/Datatypes.v')
-rw-r--r-- | theories/Init/Datatypes.v | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/theories/Init/Datatypes.v b/theories/Init/Datatypes.v index 782ff6ca9..fcd053e89 100644 --- a/theories/Init/Datatypes.v +++ b/theories/Init/Datatypes.v @@ -74,6 +74,14 @@ Inductive eq_true : bool -> Prop := is_eq_true : eq_true true. Hint Constructors eq_true : eq_true. +(** Another way of interpreting booleans as propositions *) + +Definition is_true b := b = true. + +(** [is_true] can be activated as a coercion by + (Local) Coercion is_true : bool >-> Prop. +*) + (** Additional rewriting lemmas about [eq_true] *) Lemma eq_true_ind_r : |