src/HOL/UNITY/Follows.thy
changeset 64267 b9a1486e79be
parent 63388 a095acd4cfbf
child 66453 cc19f7ca2ed6
--- a/src/HOL/UNITY/Follows.thy	Sun Oct 16 22:43:51 2016 +0200
+++ b/src/HOL/UNITY/Follows.thy	Mon Oct 17 11:46:22 2016 +0200
@@ -236,7 +236,7 @@
 apply (blast intro: Follows_union_lemma)
 done
 
-lemma Follows_setsum:
+lemma Follows_sum:
      "!!f ::['c,'b] => ('a::order) multiset.  
         [| \<forall>i \<in> I. F \<in> f' i Fols f i;  finite I |]  
         ==> F \<in> (%s. \<Sum>i \<in> I. f' i s) Fols (%s. \<Sum>i \<in> I. f i s)"