# HG changeset patch # User Christian Urban # Date 1273510554 -3600 # Node ID 9454feb74b45d9976ce8405e97416231640fab2e # Parent f81e0f9f2b2eb9eefebe25743f9fe3836d453ea1 fixing bind_set problem diff -r f81e0f9f2b2e -r 9454feb74b45 Nominal/Ex/LF.thy --- a/Nominal/Ex/LF.thy Mon May 10 18:32:50 2010 +0200 +++ b/Nominal/Ex/LF.thy Mon May 10 17:55:54 2010 +0100 @@ -7,16 +7,16 @@ nominal_datatype kind = Type - | KPi "ty" n::"name" k::"kind" bind n in k + | KPi "ty" n::"name" k::"kind" bind_set n in k and ty = TConst "ident" | TApp "ty" "trm" - | TPi "ty" n::"name" t::"ty" bind n in t + | TPi "ty" n::"name" t::"ty" bind_set n in t and trm = Const "ident" | Var "name" | App "trm" "trm" - | Lam "ty" n::"name" t::"trm" bind n in t + | Lam "ty" n::"name" t::"trm" bind_set n in t thm kind_ty_trm.supp