]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/multiple/lifts_lifts.ma
- the trace is explicit in all auto tactics with depth > 1
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / multiple / lifts_lifts.ma
index 739f790092e170dc969fbe92f275522fd322a9c7..cff6bf2389dd5fcccedc936282b1f81de34ea1ec 100644 (file)
@@ -19,7 +19,7 @@ include "basic_2/multiple/lifts_lift.ma".
 (* Main properties **********************************************************)
 
 (* Basic_1: was: lift1_lift1 (left to right) *)
-theorem lifts_trans: ∀T1,T,des1. ⬆*[des1] T1 ≡ T → ∀T2:term. ∀des2. ⬆*[des2] T ≡ T2 →
-                     ⬆*[des1 @@ des2] T1 ≡ T2.
-#T1 #T #des1 #H elim H -T1 -T -des1 // /3 width=3/
+theorem lifts_trans: ∀T1,T,cs1. ⬆*[cs1] T1 ≡ T → ∀T2:term. ∀cs2. ⬆*[cs2] T ≡ T2 →
+                     ⬆*[cs1 @@ cs2] T1 ≡ T2.
+#T1 #T #cs1 #H elim H -T1 -T -cs1 /3 width=3 by lifts_cons/
 qed.