src/HOL/HOLCF/IOA/Storage/Action.thy
author nipkow
Wed, 24 Oct 2012 17:40:56 +0200
changeset 49974 791157a4179a
parent 42151 4da4fc77664b
child 55416 dd7992d4a61a
permissions -rw-r--r--
ensured that rewr_conv rule t = "t == u" literally not just modulo beta-eta

(*  Title:      HOL/HOLCF/IOA/Storage/Action.thy
    Author:     Olaf Müller
*)

header {* The set of all actions of the system *}

theory Action
imports Main
begin

datatype action = New  | Loc nat | Free nat

lemma [cong]: "!!x. x = y ==> action_case a b c x = action_case a b c y"
  by simp

end