diff -r 46f59511b7bb -r d97fdabd9e2b src/HOL/Bali/WellForm.thy --- a/src/HOL/Bali/WellForm.thy Fri Sep 20 19:07:10 2024 +0200 +++ b/src/HOL/Bali/WellForm.thy Fri Sep 20 19:51:08 2024 +0200 @@ -323,7 +323,7 @@ \ (* to Table *) definition - entails :: "('a,'b) table \ ('b \ bool) \ bool" ("_ entails _" 20) + entails :: "('a,'b) table \ ('b \ bool) \ bool" (\_ entails _\ 20) where "(t entails P) = (\k. \ x \ t k: P x)" lemma entailsD: @@ -2093,7 +2093,7 @@ Array Object \ primrec valid_lookup_cls:: "prog \ ref_ty \ qtname \ bool \ bool" - ("_,_ \ _ valid'_lookup'_cls'_for _" [61,61,61,61] 60) + (\_,_ \ _ valid'_lookup'_cls'_for _\ [61,61,61,61] 60) where "G,NullT \ dynC valid_lookup_cls_for static_membr = False" | "G,IfaceT I \ dynC valid_lookup_cls_for static_membr