changeset 8602 | f077613e8e7b |
parent 8601 | 8fb3a81b4ccf |
child 8603 | 805910de7be0 |
8601:8fb3a81b4ccf | 8602:f077613e8e7b |
---|---|
1 (* Title: HOLCF/IOA/ABP/Action.ML |
|
2 ID: $Id$ |
|
3 Author: Olaf Mueller |
|
4 Copyright 1995 TU Muenchen |
|
5 |
|
6 Derived rules for actions |
|
7 *) |
|
8 |
|
9 Goal "!!x. x = y ==> action_case a b c d e f g x = \ |
|
10 \ action_case a b c d e f g y"; |
|
11 by (Asm_simp_tac 1); |
|
12 |
|
13 Addcongs [result()]; |