equal
deleted
inserted
replaced
3 *) |
3 *) |
4 |
4 |
5 section \<open>The main correctness proof: System_fin implements System\<close> |
5 section \<open>The main correctness proof: System_fin implements System\<close> |
6 |
6 |
7 theory Correctness |
7 theory Correctness |
8 imports "~~/src/HOL/HOLCF/IOA/meta_theory/IOA" Env Impl Impl_finite |
8 imports "~~/src/HOL/HOLCF/IOA/IOA" Env Impl Impl_finite |
9 begin |
9 begin |
10 |
10 |
11 ML_file "Check.ML" |
11 ML_file "Check.ML" |
12 |
12 |
13 primrec reduce :: "'a list => 'a list" |
13 primrec reduce :: "'a list => 'a list" |