diff -r 352c73a689da -r c3d6e570ccef src/HOL/Finite_Set.thy --- a/src/HOL/Finite_Set.thy Wed Nov 04 08:13:49 2015 +0100 +++ b/src/HOL/Finite_Set.thy Wed Nov 04 08:13:52 2015 +0100 @@ -1197,7 +1197,7 @@ "card = folding.F (\_. Suc) 0" interpretation card!: folding "\_. Suc" 0 -where +rewrites "folding.F (\_. Suc) 0 = card" proof - show "folding (\_. Suc)" by standard rule