diff -r 46f59511b7bb -r d97fdabd9e2b src/HOL/Hoare_Parallel/OG_Tactics.thy --- a/src/HOL/Hoare_Parallel/OG_Tactics.thy Fri Sep 20 19:07:10 2024 +0200 +++ b/src/HOL/Hoare_Parallel/OG_Tactics.thy Fri Sep 20 19:51:08 2024 +0200 @@ -205,7 +205,7 @@ \ interfree (map (\k. (c k, Q k)) [a.. bool " ("[\] _" [0] 45) where +definition map_ann_hoare :: "(('a ann_com_op * 'a assn) list) \ bool " (\[\] _\ [0] 45) where "[\] Ts == (\ic q. Ts!i=(Some c, q) \ \ c q)" lemma MapAnnEmpty: "[\] []"