src/HOL/Decision_Procs/Reflective_Field.thy
changeset 78095 bc42c074e58f
parent 74570 7625b5d7cfe2
child 78096 838198d17a40
--- a/src/HOL/Decision_Procs/Reflective_Field.thy	Tue May 23 10:56:41 2023 +0200
+++ b/src/HOL/Decision_Procs/Reflective_Field.thy	Tue May 23 18:46:15 2023 +0200
@@ -910,7 +910,7 @@
 begin
 
 local_setup \<open>
-Local_Theory.declaration {syntax = false, pervasive = false}
+Local_Theory.declaration {syntax = false, pervasive = false, pos = \<^here>}
   (fn phi => Field_Tac.Field_Simps.map (Ring_Tac.insert_rules Field_Tac.eq_field_simps
     (Morphism.term phi \<^term>\<open>R\<close>,
      (Morphism.fact phi @{thms feval.simps [meta] feval_Cnst [meta]},