X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fcsx_gcp.ma;h=e042402ea6b684739730a28a97b5ce9319d2ca6c;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=716032c859f208b85a488c4782e72033dca7bd39;hpb=b4283c079ed7069016b8d924bbc7e08872440829;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/csx_gcp.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/csx_gcp.ma index 716032c85..e042402ea 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/csx_gcp.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/csx_gcp.ma @@ -20,7 +20,8 @@ include "basic_2/rt_computation/csx_drops.ma". (* Main properties with generic computation properties **********************) -theorem csx_gcp: ∀h. gcp (cpx h) tdeq (csx h). +theorem csx_gcp (h): + gcp (cpx h) teqx (csx h). #h @mk_gcp [ normalize /3 width=13 by cnx_lifts/ | /2 width=4 by cnx_sort/