]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_sand.ma
small improvements and corrections ...
[helm.git] / matita / matita / contribs / lambdadelta / ground_2 / relocation / rtmap_sand.ma
index b830da07131debc71ccf7e60b3132e80be3e7840..85ad506a26f5582c2b84737104f65691fdeac26c 100644 (file)
@@ -35,6 +35,5 @@ qed.
 let corec sand_sym: ∀f1,f2,f. f1 ⋒ f2 ≡ f → f2 ⋒ f1 ≡ f ≝ ?.
 #f1 #f2 #f * -f1 -f2 -f
 #f1 #f2 #f #g1 #g2 #g #Hf * * * -g1 -g2 -g
-[ @sand_pp | @sand_pn | @sand_np | @sand_nn ]
-[4,11,18,25: @sand_sym // |1,2,3,8,9,10,15,16,17,22,23,24: skip |*: // ]
+[ @sand_pp | @sand_pn | @sand_np | @sand_nn ] /2 width=7 by/
 qed-.