forked from afp-mirror/Core_DOM
Restrict auto.
This commit is contained in:
parent
080f4db810
commit
86ea8d4817
|
@ -3041,7 +3041,7 @@ proof -
|
|||
assume "is_node_ptr_kind ptr"
|
||||
then have ?thesis
|
||||
using \<open>known_ptr ptr\<close> \<open>ptr |\<in>| object_ptr_kinds h\<close>
|
||||
apply(auto simp add: known_ptr_impl get_owner_document_def a_get_owner_document_tups_def)
|
||||
apply(auto simp add: known_ptr_impl get_owner_document_def a_get_owner_document_tups_def)[1]
|
||||
apply(split invoke_splits, (rule conjI | rule impI)+)+
|
||||
apply(drule(1) known_ptr_not_document_ptr[folded known_ptr_impl])
|
||||
apply(drule(1) known_ptr_not_character_data_ptr)
|
||||
|
|
Reference in New Issue