From 27b1061be797da05212500f16af9c88ac28849ee Mon Sep 17 00:00:00 2001 From: mohring Date: Wed, 29 Aug 2001 13:49:09 +0000 Subject: ajout option , Exc --> option, et lemmes dans les theories git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1914 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Bool/Sumbool.v | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'theories/Bool') diff --git a/theories/Bool/Sumbool.v b/theories/Bool/Sumbool.v index 9c6cd1f42..275712084 100644 --- a/theories/Bool/Sumbool.v +++ b/theories/Bool/Sumbool.v @@ -23,6 +23,17 @@ Save. Hints Resolve sumbool_of_bool : bool. +Lemma bool_eq_rec : (b:bool)(P:bool->Set) + ((b=true)->(P true))->((b=false)->(P false))->(P b). +Induction b; Auto. +Save. + +Lemma bool_eq_ind : (b:bool)(P:bool->Prop) + ((b=true)->(P true))->((b=false)->(P false))->(P b). +Induction b; Auto. +Save. + + (*i pourquoi ce machin-la est dans BOOL et pas dans LOGIC ? Papageno i*) (* Logic connectives on type sumbool *) -- cgit v1.2.3