| author | paulson | 
| Wed, 14 Dec 2005 16:13:09 +0100 | |
| changeset 18404 | aa27c10a040e | 
| parent 17244 | 0b2ff9541727 | 
| child 19740 | 6b38551d0798 | 
| permissions | -rw-r--r-- | 
| 6008 | 1 | (* Title: HOLCF/IOA/ABP/Action.thy | 
| 2 | ID: $Id$ | |
| 12218 | 3 | Author: Olaf Müller | 
| 6008 | 4 | *) | 
| 5 | ||
| 17244 | 6 | header {* The set of all actions of the system *}
 | 
| 7 | ||
| 8 | theory Action | |
| 9 | imports Main | |
| 10 | begin | |
| 11 | ||
| 12 | datatype action = New | Loc nat | Free nat | |
| 13 | ||
| 14 | lemma [cong]: "!!x. x = y ==> action_case a b c x = action_case a b c y" | |
| 15 | by simp | |
| 16 | ||
| 17 | ML {* use_legacy_bindings (the_context ()) *}
 | |
| 18 | ||
| 6008 | 19 | end |