completed lemma 17

[helm.git] / helm / software / matita / nlibrary / logic / destruct_bb.ma

diff --git a/helm/software/matita/nlibrary/logic/destruct_bb.ma b/helm/software/matita/nlibrary/logic/destruct_bb.ma
index 269cfc765c8b93b3f15f95f372efb33037eb681b..308f8bebeb91ed3b554cca708bb4e6fbd0eb1124 100644 (file)
--- a/helm/software/matita/nlibrary/logic/destruct_bb.ma
+++ b/helm/software/matita/nlibrary/logic/destruct_bb.ma
@@ -19,6 +19,7 @@ ninductive unit: Type[0] ≝ k: unit.
 ninductive bool: unit → Type[0] ≝ true : bool k | false : bool k.
 
 nlemma foo: true = false → False. #H; ndestruct;
+nqed.
 
 (* nlemma prova : ∀T:Type[0].∀a,b:T.∀e:a = b.
                ∀P:∀x,y:T.x=y→Prop.P a a (refl T a) → P a b e.