X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2A%2Freduction%2Fcrr.ma;h=e0feece2287d84b489362e3adab793e1a8f9a4fe;hp=b18e71cd339f14a16c92b959c6d809857c56811d;hb=2f6f2b7c01d47d23f61dd48d767bcb37aecdcfea;hpb=3a4509b8e569181979f5b15808361c83eb1ae49a diff --git a/matita/matita/contribs/lambdadelta/basic_2A/reduction/crr.ma b/matita/matita/contribs/lambdadelta/basic_2A/reduction/crr.ma index b18e71cd3..e0feece22 100644 --- a/matita/matita/contribs/lambdadelta/basic_2A/reduction/crr.ma +++ b/matita/matita/contribs/lambdadelta/basic_2A/reduction/crr.ma @@ -27,7 +27,6 @@ definition ib2: relation2 bool bind2 ≝ λa,I. I = Abst ∨ Bind2 a I = Bind2 false Abbr. (* activate genv *) -(* reducible terms *) inductive crr (G:genv): relation2 lenv term ≝ | crr_delta : ∀L,K,V,i. ⬇[i] L ≡ K.ⓓV → crr G L (#i) | crr_appl_sn: ∀L,V,T. crr G L V → crr G L (ⓐV.T)