use average instead of median

bytes-zone · Oct 12, 2020 · 229618b · 229618b
1 parent a52ebb8
commit 229618b
Showing 1 changed file with 8 additions and 11 deletions.
diff --git a/src/League.elm b/src/League.elm
@@ -93,18 +93,15 @@ getPlayer name (League league) =
 addPlayer : Player -> League -> League
 addPlayer player (League league) =
     let
-        ratings =
-            Dict.values league.players
-                |> List.map .rating
-                |> List.sort
-
-        medianishRating =
-            ratings
-                |> List.drop (List.length ratings // 2)
-                |> List.head
-                |> Maybe.withDefault Elo.initialRating
+        initialRating =
+            case Dict.values league.players |> List.map .rating of
+                [] ->
+                    Elo.initialRating
+
+                nonEmpty ->
+                    List.sum nonEmpty // List.length nonEmpty
     in
-    League { league | players = Dict.insert player.name (Player.setRating medianishRating player) league.players }
+    League { league | players = Dict.insert player.name (Player.setRating initialRating player) league.players }
 
 
 {-| -}