changeset 3353 | 9112a2efb9a3 |
parent 3302 | 404fe31fd8d2 |
child 3405 | 2cccd0e3e9ea |
--- a/TFL/thry.sig Tue May 27 13:03:41 1997 +0200 +++ b/TFL/thry.sig Tue May 27 13:22:30 1997 +0200 @@ -6,13 +6,11 @@ signature Thry_sig = sig - type 'a binding - structure USyntax : USyntax_sig val match_term : theory -> term -> term - -> term binding list * typ binding list + -> (term*term)list * (typ*typ)list - val match_type : theory -> typ -> typ -> typ binding list + val match_type : theory -> typ -> typ -> (typ*typ)list val typecheck : theory -> term -> cterm