src/HOLCF/IOA/Storage/Impl.ML
author wenzelm
Thu, 15 Nov 2001 23:25:46 +0100
changeset 12218 6597093b77e7
parent 7322 d16d7ddcc842
child 14981 e73f8140af78
permissions -rw-r--r--
GPLed;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
6008
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     1
(*  Title:      HOL/IOA/example/Sender.thy
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     2
    ID:         $Id$
12218
wenzelm
parents: 7322
diff changeset
     3
    Author:     Olaf Müller
wenzelm
parents: 7322
diff changeset
     4
    License:    GPL (GNU GENERAL PUBLIC LICENSE)
6008
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     5
12218
wenzelm
parents: 7322
diff changeset
     6
Impl.
6008
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     7
*)
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     8
 
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
     9
Goal 
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    10
 "New : actions(impl_sig)       &   \
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    11
\ Loc l : actions(impl_sig)       &   \
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    12
\ Free l : actions(impl_sig) ";
7322
d16d7ddcc842 isatool expandshort;
wenzelm
parents: 6008
diff changeset
    13
by (simp_tac (simpset() addsimps 
6008
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    14
             (Impl.sig_def :: actions_def :: 
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    15
              asig_projections)) 1);
d0e9b1619468 Memory storage case study from PhD p.240;
mueller
parents:
diff changeset
    16
qed "in_impl_asig";