Nominal/LFex.thy
changeset 1561 c3dca6e600c8
parent 1553 4355eb3b7161
child 1576 7b8f570b2450
equal deleted inserted replaced
1560:604c4cffc5b9 1561:c3dca6e600c8
     4 
     4 
     5 atom_decl name
     5 atom_decl name
     6 atom_decl ident
     6 atom_decl ident
     7 
     7 
     8 ML {* val _ = cheat_fv_rsp := false *}
     8 ML {* val _ = cheat_fv_rsp := false *}
     9 ML {* val _ = cheat_const_rsp := false *}
     9 ML {* val _ = cheat_alpha_bn_rsp := false *}
    10 ML {* val _ = cheat_equivp := false *}
    10 ML {* val _ = cheat_equivp := false *}
    11 
    11 
    12 nominal_datatype kind =
    12 nominal_datatype kind =
    13     Type
    13     Type
    14   | KPi "ty" n::"name" k::"kind" bind n in k
    14   | KPi "ty" n::"name" k::"kind" bind n in k