From 582a59e2b6984b1ecf90b83440d57d48633a6066 Mon Sep 17 00:00:00 2001
From: Ummon <greg.burri@gmail.com>
Date: Thu, 7 Dec 2017 10:32:43 +0100
Subject: [PATCH] More compact...

---
 AdventOfCode2017/Day7.fs | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/AdventOfCode2017/Day7.fs b/AdventOfCode2017/Day7.fs
index 827fee1..2fe6ae0 100644
--- a/AdventOfCode2017/Day7.fs
+++ b/AdventOfCode2017/Day7.fs
@@ -18,12 +18,7 @@ let parseInput (lines : string list) : Input =
     |> List.map (
         fun line ->
             let items = line.Split ([| '\r'; '\t'; ' '; ','; ')'; '(' |], StringSplitOptions.RemoveEmptyEntries)
-            {
-                Name = items.[0]
-                Weight = int items.[1]
-                Above = List<Tower> ()
-            },
-            [ for i in 3 .. items.Length - 1 -> items.[i] ]
+            { Name = items.[0]; Weight = int items.[1]; Above = List<Tower> () }, [ for i in 3 .. items.Length - 1 -> items.[i] ]
     )
 
 let buildTower (input : Input) : Tower =
-- 
2.45.2