44 |> Sign.root_path |
44 |> Sign.root_path |
45 |> Sign.set_defsort [] |
45 |> Sign.set_defsort [] |
46 |> Sign.add_nonterminals_global |
46 |> Sign.add_nonterminals_global |
47 [Binding.make ("param", \<^here>), |
47 [Binding.make ("param", \<^here>), |
48 Binding.make ("params", \<^here>)] |
48 Binding.make ("params", \<^here>)] |
49 |> Sign.syntax true Syntax.mode_default |
49 |> Sign.syntax_global true Syntax.mode_default |
50 [("_Lam", [paramsT, proofT] ---> proofT, mixfix ("(1\<^bold>\<lambda>_./ _)", [0, 3], 3)), |
50 [("_Lam", [paramsT, proofT] ---> proofT, mixfix ("(1\<^bold>\<lambda>_./ _)", [0, 3], 3)), |
51 ("_Lam0", [paramT, paramsT] ---> paramsT, mixfix ("_/ _", [1, 0], 0)), |
51 ("_Lam0", [paramT, paramsT] ---> paramsT, mixfix ("_/ _", [1, 0], 0)), |
52 ("_Lam0", [idtT, paramsT] ---> paramsT, mixfix ("_/ _", [1, 0], 0)), |
52 ("_Lam0", [idtT, paramsT] ---> paramsT, mixfix ("_/ _", [1, 0], 0)), |
53 ("_Lam1", [idtT, propT] ---> paramT, mixfix ("_: _", [0, 0], 0)), |
53 ("_Lam1", [idtT, propT] ---> paramT, mixfix ("_: _", [0, 0], 0)), |
54 ("", paramT --> paramT, Mixfix.mixfix "'(_')"), |
54 ("", paramT --> paramT, Mixfix.mixfix "'(_')"), |