| author | berghofe | 
| Fri, 22 Sep 2006 14:30:37 +0200 | |
| changeset 20679 | c09af1bd255a | 
| parent 19501 | 9afa7183dfc2 | 
| child 22829 | f1db55c7534d | 
| permissions | -rw-r--r-- | 
| 18269 | 1 | (* $Id$ *) | 
| 18106 | 2 | |
| 19501 | 3 | theory Lambda_mu | 
| 4 | imports "../Nominal" | |
| 18106 | 5 | begin | 
| 6 | ||
| 18269 | 7 | section {* Lambda-Mu according to a paper by Gavin Bierman *}
 | 
| 18106 | 8 | |
| 9 | atom_decl var mvar | |
| 10 | ||
| 11 | nominal_datatype trm = Var "var" | |
| 12 |                      | Lam  "\<guillemotleft>var\<guillemotright>trm"   ("Lam [_]._" [100,100] 100)
 | |
| 13 | | App "trm" "trm" | |
| 14 | | Pss "mvar" "trm" | |
| 15 |                      | Act  "\<guillemotleft>mvar\<guillemotright>trm"  ("Act [_]._" [100,100] 100)
 | |
| 16 | ||
| 19501 | 17 | end |