src/Pure/Proof/proof_syntax.ML
changeset 80897 5328d67ec647
parent 80590 505f97165f52
child 81590 e656c5edc352
equal deleted inserted replaced
80896:d0d0d12cd4cc 80897:5328d67ec647
    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 "'(_')"),