diff -r 8f866fd6fae1 -r 40e4e955c846 src/HOL/List.thy --- a/src/HOL/List.thy Wed Jun 25 16:35:25 2025 +0200 +++ b/src/HOL/List.thy Thu Jun 26 17:30:16 2025 +0200 @@ -3417,7 +3417,7 @@ "\w x y z. f w x = f y z \ w = y \ x = z" and "\x y. f x y \ a" and "\x y. f x y \ b" - shows "foldr f xs a = foldr f ys b \ a = b \ xs = ys" + shows "foldr f xs a = foldr f ys b \ xs = ys \ a = b" by (induction xs ys rule: list_induct2') (use assms(2,3,1) in auto)