]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/rt_computation/csx_simple.ma
λδ-2B is released
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / csx_simple.ma
index 7253cdb50d10f3c30abdf64738c2b40df937a398..50e525ec4f3155fbdce3ead33d4ca193e515d053 100644 (file)
@@ -30,7 +30,7 @@ elim (cpx_inv_appl1_simple … H1) // -H1
 elim (tneqx_inv_pair … H2) -H2
 [ #H elim H -H //
 | #HV0 @(csx_cpx_trans … (ⓐV0.T1)) /2 width=1 by cpx_flat/ -HLT10
-  @(IHV … HLV0 … HV0) -HV0 /4 width=5 by csx_cpx_trans, cpx_pair_sn/ (**) (* full auto too slow *) 
+  @(IHV … HLV0 … HV0) -HV0 /4 width=5 by csx_cpx_trans, cpx_pair_sn/ (**) (* full auto too slow *)
 | -IHV -HT1 /4 width=3 by csx_cpx_trans, cpx_pair_sn/
 ]
 qed.