]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/apps_2/functional/rtm_step.ma
update in ground_2 and basic_2
[helm.git] / matita / matita / contribs / lambdadelta / apps_2 / functional / rtm_step.ma
index 8f5a61ee83b19ae53d2dc70d905652c510032067..1b456b5219e95417e30c729a552a243f9823a1e9 100644 (file)
@@ -46,8 +46,8 @@ inductive rtm_step: relation rtm ≝
               rtm_step (mk_rtm G u E ({D, V} @ S) (+ⓛW. T))
                        (mk_rtm G u (E. ④{Abbr} {u, D, V}) S T)
 | rtm_push  : ∀G,u,E,W,T.
-              rtm_step (mk_rtm G u E (â\97\8a) (+ⓛW. T))
-                       (mk_rtm G (u + 1) (E. â\91£{Abst} {u, E, W}) (â\97\8a) T)
+              rtm_step (mk_rtm G u E (â\92º) (+ⓛW. T))
+                       (mk_rtm G (u + 1) (E. â\91£{Abst} {u, E, W}) (â\92º) T)
 | rtm_theta : ∀G,u,E,S,V,T.
               rtm_step (mk_rtm G u E S (+ⓓV. T))
                        (mk_rtm G u (E. ④{Abbr} {u, E, V}) S T)