diff options
| -rw-r--r-- | mltt/core/MLTT.thy | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mltt/core/MLTT.thy b/mltt/core/MLTT.thy index 18bd2b7..ea6462a 100644 --- a/mltt/core/MLTT.thy +++ b/mltt/core/MLTT.thy @@ -372,11 +372,11 @@ translations "\<lambda>x. b" \<leftharpoondown> "\<lambda>x: A. b" section \<open>Lambda coercion\<close> \<comment> \<open>Coerce object lambdas to meta-lambdas\<close> -abbreviation (input) lambda :: \<open>o \<Rightarrow> o \<Rightarrow> o\<close> - where "lambda f \<equiv> fn x. f `x" +abbreviation (input) to_meta :: \<open>o \<Rightarrow> o \<Rightarrow> o\<close> + where "to_meta f \<equiv> fn x. f `x" ML_file \<open>~~/src/Tools/subtyping.ML\<close> -declare [[coercion_enabled, coercion lambda]] +declare [[coercion_enabled, coercion to_meta]] translations "f x" \<leftharpoondown> "f `x" |