From d03d8d8d51fe9364a09a9a771b843d475382c574 Mon Sep 17 00:00:00 2001
From: Yann Herklotz Grave <git@yannherklotzgrave.com>
Date: Sun, 24 Feb 2019 22:53:03 +0000
Subject: Fix indentation

---
 src/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Main.hs b/src/Main.hs
index a982c76..6e0122d 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -44,7 +44,7 @@ findSplit :: [Double] -> Int
 findSplit d = findSplit' d [] 0
   where
     findSplit' (x : ds) e i | sum ds < sum e = i
-                             | otherwise      = findSplit' ds (x : e) $ i + 1
+                            | otherwise      = findSplit' ds (x : e) $ i + 1
     findSplit' _ _ i = i
 
 cfmap :: Functor f => (t -> a -> b) -> t -> f a -> f b
-- 
cgit