]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/relocation/drops_drops.ma
- ground_2: support for lifts_div4
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / relocation / drops_drops.ma
index 06a2eb84e10399a76eb88695661943561215bba6..0b3279de95214bf6caea3b889a5e0fd858bd758e 100644 (file)
@@ -31,7 +31,7 @@ theorem drops_conf: ∀b1,f1,L1,L. ⬇*[b1, f1] L1 ≡ L →
   #g #Hg #H destruct /3 width=3 by drops_inv_drop1/
 | #f1 #I #K1 #K #V1 #V #_ #HV1 #IH #b2 #f #L2 #HL2 #f2 #Hf elim (after_inv_pxx … Hf) -Hf [1,3: * |*:// ]
   #g2 #g #Hf #H1 #H2 destruct
-  [ elim (drops_inv_skip1 … HL2) -HL2 /3 width=6 by drops_skip, lifts_div/
+  [ elim (drops_inv_skip1 … HL2) -HL2 /3 width=6 by drops_skip, lifts_div3/
   | /4 width=3 by drops_inv_drop1, drops_drop/
   ]
 ]