author | paulson |
Wed, 05 Aug 1998 10:57:25 +0200 | |
changeset 5253 | 82a5ca6290aa |
parent 5111 | 8f4b72f0c15d |
child 5277 | e4297d03e5d2 |
permissions | -rw-r--r-- |
4776 | 1 |
(* Title: HOL/UNITY/SubstAx |
2 |
ID: $Id$ |
|
3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
|
4 |
Copyright 1998 University of Cambridge |
|
5 |
||
6 |
My treatment of the Substitution Axiom -- not as an axiom! |
|
7 |
*) |
|
8 |
||
9 |
SubstAx = WFair + |
|
10 |
||
11 |
constdefs |
|
12 |
||
5253 | 13 |
LeadsTo :: "['a program, 'a set, 'a set] => bool" |
14 |
"LeadsTo prg A B == |
|
15 |
leadsTo (Acts prg) |
|
16 |
(reachable prg Int A) |
|
17 |
(reachable prg Int B)" |
|
4776 | 18 |
end |