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 Actionimports Mainbegindatatype action = New | Loc nat | Free natlemma [cong]: "!!x. x = y ==> action_case a b c x = action_case a b c y" by simpend