diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-03-09 14:13:19 +0100 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-03-09 14:16:21 +0100 |
commit | 76fc1698fbb6b523c5c0d15f0b15a2d035649496 (patch) | |
tree | 9b214fcb0e8a6c71514c46409a4655b9e53d87e0 /theories/Logic/PropExtensionality.v | |
parent | b5e6c189f378815c2cfc350924d225d7bd1287d4 (diff) | |
parent | 9133d6faece4feb675fdc9c66cebcb2bba9246a9 (diff) |
Merge PR#318: Providing a file in the Logic library to work with extensional choice
Diffstat (limited to 'theories/Logic/PropExtensionality.v')
-rw-r--r-- | theories/Logic/PropExtensionality.v | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/theories/Logic/PropExtensionality.v b/theories/Logic/PropExtensionality.v new file mode 100644 index 000000000..796c60273 --- /dev/null +++ b/theories/Logic/PropExtensionality.v @@ -0,0 +1,22 @@ +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2016 *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) + +(** This module states propositional extensionality and draws + consequences of it *) + +Axiom propositional_extensionality : + forall (P Q : Prop), (P <-> Q) -> P = Q. + +Require Import ClassicalFacts. + +Theorem proof_irrelevance : forall (P:Prop) (p1 p2:P), p1 = p2. +Proof. + apply ext_prop_dep_proof_irrel_cic. + exact propositional_extensionality. +Qed. + |