From eced7781ae346e285b7f3949917f23883b4dfaa8 Mon Sep 17 00:00:00 2001
From: ros <ros@cip.ifi.lmu.de>
Date: Fri, 21 May 2021 17:23:38 +0200
Subject: [PATCH] feat(participants): small Name-change

---
 src/Utils/Set.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/Utils/Set.hs b/src/Utils/Set.hs
index 6fc598ab2..5a59be271 100644
--- a/src/Utils/Set.hs
+++ b/src/Utils/Set.hs
@@ -1,5 +1,5 @@
 module Utils.Set
-( setIntersectAll
+( setUnionAll
 , setIntersectNotOne
 , setIntersections
 , setMapMaybe
@@ -20,10 +20,10 @@ import Control.Lens.Prism
 import Control.Lens
 
 -- | cardinal number of a Set
-setIntersectAll :: Ord a => [Set.Set a] -> Int
-setIntersectAll [] = 0
-setIntersectAll [x] = Set.size x
-setIntersectAll (x:y:z) = setIntersectAll (xy:z) where xy = Set.union x y
+setUnionAll :: Ord a => [Set.Set a] -> Int
+setUnionAll [] = 0
+setUnionAll [x] = Set.size x
+setUnionAll (x:y:z) = setUnionAll (xy:z) where xy = Set.union x y
 
 -- | cardinal number of an intersection of a set and a list of sets
 setIntersectNotOne :: Ord a => Set.Set a -> [Set.Set a] -> Int