changeset 11786 | 51ce34ef5113 |
parent 11704 | 3c50a2cd6f00 |
child 11868 | 56db9f3a6b3e |
--- a/src/HOL/NumberTheory/Fib.thy Mon Oct 15 20:41:14 2001 +0200 +++ b/src/HOL/NumberTheory/Fib.thy Mon Oct 15 20:42:06 2001 +0200 @@ -118,7 +118,7 @@ done lemma fib_mult_eq_setsum: - "fib (Suc n) * fib n = setsum (\<lambda>k. fib k * fib k) (atMost n)" + "fib (Suc n) * fib n = (\<Sum>k \<in> {..n}. fib k * fib k)" apply (induct n rule: fib.induct) apply (auto simp add: atMost_Suc fib.Suc_Suc) apply (simp add: add_mult_distrib add_mult_distrib2)