some restyling ...

[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_transition / cnr_tdeq.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_tdeq.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_tdeq.ma
index 3efc47bba7ed5ed55556eb33b4525a7a7b883c92..00d42e11d51870a91dbdbd6cbcecfdf1a401ad12 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_tdeq.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/cnr_tdeq.ma
@@ -24,8 +24,8 @@ include "basic_2/rt_transition/cnr_drops.ma".
 (* Basic_1: was: nf2_dec *)
 (* Basic_2A1: uses: cnr_dec *)
 lemma cnr_dec_tdeq (h) (G) (L):
-      ∀T1. ∨∨ ⦃G, L⦄ ⊢ ➡[h] 𝐍⦃T1⦄
-            | ∃∃T2. ⦃G, L⦄ ⊢ T1 ➡[h] T2 & (T1 ≛ T2 → ⊥).
+      ∀T1. ∨∨ ⦃G,L⦄ ⊢ ➡[h] 𝐍⦃T1⦄
+            | ∃∃T2. ⦃G,L⦄ ⊢ T1 ➡[h] T2 & (T1 ≛ T2 → ⊥).
 #h #G #L #T1
 @(fqup_wf_ind_eq (Ⓣ) … G L T1) -G -L -T1 #G0 #L0 #T0 #IH #G #L * *
 [ #s #HG #HL #HT destruct -IH
@@ -82,7 +82,7 @@ lemma cnr_dec_tdeq (h) (G) (L):
         elim (tdeq_inv_pair … H) -H #H destruct
       | @or_intror @(ex2_intro … (ⓓ{p}ⓝW1.V1.U1)) [ /2 width=1 by cpm_beta/ ] #H
         elim (tdeq_inv_pair … H) -H #H destruct
-      ] 
+      ]
     | #T2 #HT12 #HnT12 #_
       @or_intror @(ex2_intro … (ⓐV1.T2)) [ /2 width=1 by cpm_appl/ ] #H
       elim (tdeq_inv_pair … H) -H /2 width=1 by/