X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Flogic%2Fconnectives.ma;h=25fb2ce93c38784c9069fe19dcf8e01551e5275a;hb=347c7d213fd1d106f22acd6fff82a83af14c1bbd;hp=6eb2375dcc895b3b8e4e6068572345382f349e34;hpb=a17430d258e886b5164fca3d65ee7da7c40e6a36;p=helm.git

diff --git a/helm/software/matita/nlibrary/logic/connectives.ma b/helm/software/matita/nlibrary/logic/connectives.ma
index 6eb2375dc..25fb2ce93 100644
--- a/helm/software/matita/nlibrary/logic/connectives.ma
+++ b/helm/software/matita/nlibrary/logic/connectives.ma
@@ -18,9 +18,6 @@ ninductive True: CProp ≝
   I : True.
 
 ninductive False: CProp ≝.
-(* elimination principle *)
-ndefinition False_rect ≝ λP: False → Type.λp: False.
- match p in False return λp. P p with [].
 
 ndefinition Not: CProp → CProp ≝
   λA. A → False.