diff -r 37a6e2f55230 -r 44ff2275d44f IOA/example/Action.ML --- a/IOA/example/Action.ML Wed Nov 09 19:50:36 1994 +0100 +++ b/IOA/example/Action.ML Wed Nov 09 19:51:09 1994 +0100 @@ -1,3 +1,11 @@ +(* Title: HOL/IOA/example/Action.ML + ID: $Id$ + Author: Tobias Nipkow & Konrad Slind + Copyright 1994 TU Muenchen + +Derived rules for actions +*) + goal Action.thy "!!x. x = y ==> action_case(a,b,c,d,e,f,g,h,i,j,x) = \ \ action_case(a,b,c,d,e,f,g,h,i,j,y)"; by (asm_simp_tac HOL_ss 1);