(* $Id$ *) theory Lambda_mu imports "../Nominal" begin section {* Lambda-Mu according to a paper by Gavin Bierman *} atom_decl var mvar nominal_datatype trm = Var "var" | Lam "«var»trm" ("Lam [_]._" [100,100] 100) | App "trm" "trm" | Pss "mvar" "trm" (* passivate *) | Act "«mvar»trm" ("Act [_]._" [100,100] 100) (* activate *) end