diff -r 789e0e1a9e33 -r 57df04e4f018 src/HOL/Hoare/Hoare_Syntax.thy --- a/src/HOL/Hoare/Hoare_Syntax.thy Wed Feb 02 13:43:48 2022 +0100 +++ b/src/HOL/Hoare/Hoare_Syntax.thy Thu Feb 03 10:33:55 2022 +0100 @@ -13,7 +13,7 @@ "_assign" :: "idt \ 'b \ 'com" ("(2_ :=/ _)" [70, 65] 61) "_Seq" :: "'com \ 'com \ 'com" ("(_;/ _)" [61,60] 60) "_Cond" :: "'bexp \ 'com \ 'com \ 'com" ("(1IF _/ THEN _ / ELSE _/ FI)" [0,0,0] 61) - "_While" :: "'bexp \ 'assn \ 'var \ 'com \ 'com" ("(1WHILE _/ INV {_} / VAR {_} //DO _ /OD)" [0,0,0,0] 61) + "_While" :: "'bexp \ 'assn \ 'var \ 'com \ 'com" ("(1WHILE _/ INV {(_)} / VAR {(_)} //DO _ /OD)" [0,0,0,0] 61) text \The \VAR {_}\ syntax supports two variants: \<^item> \VAR {x = t}\ where \t::nat\ is the decreasing expression,