
diff -r f04b33ce250f -r a4dc62a46ee4 IOA/example/Correctness.thy
--- a/IOA/example/Correctness.thy	Tue Oct 24 14:59:17 1995 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,22 +0,0 @@
-(*  Title:      HOL/IOA/example/Correctness.thy
-    ID:         $Id$
-    Author:     Tobias Nipkow & Konrad Slind
-    Copyright   1994  TU Muenchen
-
-The main correctness proof: Impl implements Spec
-*)
-
-Correctness = Solve + Impl + Spec +
-
-consts
-
-hom :: "'m impl_state => 'm list"
-
-defs
-
-hom_def 
-"hom(s) == rq(rec(s)) @ if(rbit(rec(s)) = sbit(sen(s)),  
-                          sq(sen(s)),                   
-                          ttl(sq(sen(s))))"
-
-end




