diff -r edbf0a86fb1c -r cb2e3e651893 src/HOL/MicroJava/BV/Typing_Framework_JVM.thy --- a/src/HOL/MicroJava/BV/Typing_Framework_JVM.thy Fri Jan 07 18:10:35 2011 +0100 +++ b/src/HOL/MicroJava/BV/Typing_Framework_JVM.thy Fri Jan 07 18:10:42 2011 +0100 @@ -89,14 +89,14 @@ apply clarsimp apply (erule disjE) apply (fastsimp dest: field_fields fields_is_type) - apply (simp add: match_some_entry split: split_if_asm) + apply (simp add: match_some_entry image_iff) apply (rule_tac x=1 in exI) apply fastsimp apply clarsimp apply (erule disjE) apply fastsimp - apply (simp add: match_some_entry split: split_if_asm) + apply (simp add: match_some_entry image_iff) apply (rule_tac x=1 in exI) apply fastsimp