X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Flib%2Fbasics%2Fstar.ma;h=c8d2a9473f528e78e956f717f7650b984ee8ffe0;hb=b866fb441e57ff7308f3d2cfa46018ba932d12dc;hp=a80ccbea0451ed8ca3216bfe494d51cde8d2050c;hpb=636c25914e83819c2f529edc891a7eb899499a97;p=helm.git

diff --git a/matita/matita/lib/basics/star.ma b/matita/matita/lib/basics/star.ma
index a80ccbea0..c8d2a9473 100644
--- a/matita/matita/lib/basics/star.ma
+++ b/matita/matita/lib/basics/star.ma
@@ -11,12 +11,6 @@
 
 include "basics/relations.ma".
 
-(********** relations **********)
-
-definition subR ≝ λA.λR,S:relation A.(∀a,b. R a b → S a b).
-
-definition inv ≝ λA.λR:relation A.λa,b.R b a.
-
 (* transitive closcure (plus) *)
 
 inductive TC (A:Type[0]) (R:relation A) (a:A): A → Prop ≝