semantics of the if-machine.

[helm.git] / matita / matita / lib / basics / star.ma

diff --git a/matita/matita/lib/basics/star.ma b/matita/matita/lib/basics/star.ma
index a80ccbea0451ed8ca3216bfe494d51cde8d2050c..c8d2a9473f528e78e956f717f7650b984ee8ffe0 100644 (file)
--- 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 ≝