- timestampLogentryMap = Map.fromList $ map Diddo.parseDiddoLogline loglines
- (_, _, startedTimestampLogentryMap) = Map.splitLookup (zonedTimeToUTC startDate) timestampLogentryMap
- (endedTimestampLogentryMap, lastEntry, _) = Map.splitLookup (zonedTimeToUTC endDate) startedTimestampLogentryMap
- timestampDiddoMap = logentryMapToDiddoMap timestampLogentryMap
+ timestampLogentryMap =
+ Map.fromList $ map Diddo.parseDiddoLogline loglines
+
+ (_, _, startedTimestampLogentryMap) =
+ Map.splitLookup (zonedTimeToUTC startDate) timestampLogentryMap
+
+ (endedTimestampLogentryMap, lastEntry, _) =
+ Map.splitLookup (zonedTimeToUTC endDate) startedTimestampLogentryMap
+
+ timestampDiddoMap =
+ logentryMapToDiddoMap timestampLogentryMap