(* Title: HOLCF/IOA/ABP/Action.ML ID: $Id$ Author: Olaf Mueller Copyright 1995 TU Muenchen Derived rules for actions *) Goal "!!x. x = y ==> action_case a b c d e f g x = \ \ action_case a b c d e f g y"; by (Asm_simp_tac 1); Addcongs [result()];