]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/etc/relocation/tr.etc
update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / etc / relocation / tr.etc
index ba3287eb6d5193fc1b579433f54d58854fde1f61..a0aba6e512d84bafbcfc0d3af918d9bcfd0f77f3 100644 (file)
@@ -3,14 +3,6 @@ lemma pippo (f):
 * #p #f //
 qed.
 
-corec lemma tr_compose_id_dx (f):
-            f ā‰— fāˆ˜š¢.
-cases tr_id_unfold
-cases tr_compose_unfold
-cases (pippo f) in āŠ¢ (??%?);
-@stream_eq_cons /2 width=1 by/
-qed.
-
 axiom pippo2 (f) (p):
       f@āØpā© + (ā‡‚*[ninj p]f)@āØšŸā© = f@āØā†‘pā©.