X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fcoercions_dupelim.ma;fp=helm%2Fsoftware%2Fmatita%2Ftests%2Fcoercions_dupelim.ma;h=0000000000000000000000000000000000000000;hb=a840c90571f0d819593405c389728c2c65e24e61;hp=5c1c0c9f83d495e7f7801c397c3245862fbbd0fb;hpb=9f1c6a7afaa3510c9aacd9ec6e4a48f91dc36ccb;p=helm.git

diff --git a/helm/software/matita/tests/coercions_dupelim.ma b/helm/software/matita/tests/coercions_dupelim.ma
deleted file mode 100644
index 5c1c0c9f8..000000000
--- a/helm/software/matita/tests/coercions_dupelim.ma
+++ /dev/null
@@ -1,31 +0,0 @@
-(**************************************************************************)
-(*       ___                                                              *)
-(*      ||M||                                                             *)
-(*      ||A||       A project by Andrea Asperti                           *)
-(*      ||T||                                                             *)
-(*      ||I||       Developers:                                           *)
-(*      ||T||         The HELM team.                                      *)
-(*      ||A||         http://helm.cs.unibo.it                             *)
-(*      \   /                                                             *)
-(*       \ /        This file is distributed under the terms of the       *)
-(*        v         GNU General Public License Version 2                  *)
-(*                                                                        *)
-(**************************************************************************)
-
-
-
-include "nat/nat.ma".
-
-axiom A : Type.
-
-inductive vec : nat -> Type := 
- | vnil : vec O
- | vcons : ∀x:A.∀n:nat. vec n -> vec (S n).
-
-definition f := λx,n.λv:vec n.vcons x n v.
-definition g := λn,x.λv:vec n.vcons x n v.
-
-include "logic/equality.ma".
-
-(* definition xx :=  f = g. *)
-theorem xx1 : ∀n.∀x1:vec n.f ? ? x1 = g ? ? x1.