src/HOL/MicroJava/BV/BVSpecTypeSafe.thy
changeset 55524 f41ef840f09d
parent 53024 e0968e1f6fe9
child 56073 29e308b56d23
--- a/src/HOL/MicroJava/BV/BVSpecTypeSafe.thy	Sun Feb 16 21:33:28 2014 +0100
+++ b/src/HOL/MicroJava/BV/BVSpecTypeSafe.thy	Sun Feb 16 21:33:28 2014 +0100
@@ -947,7 +947,7 @@
       by (simp add: wt_start_def sup_state_conv)
 
     have r: "approx_loc G hp (replicate mxl' undefined) (replicate mxl' Err)"
-      by (simp add: approx_loc_def list_all2_def set_replicate_conv_if)
+      by (simp add: approx_loc_def list_all2_iff set_replicate_conv_if)
     
     from wfprog mD is_class_D
     have "G \<turnstile> Class D \<preceq> Class D''"