generate OpenAPI docs

lots of lenses in this stuff :(

1 files changed, 22 insertions, 22 deletions

diff --git a/app/Main.hs b/app/Main.hs
index 5b4224a..0b3165e 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -1,34 +1,34 @@
-{-# LANGUAGE DataKinds #-}
-{-# LANGUAGE TypeFamilies #-}
-{-# LANGUAGE KindSignatures #-}
-{-# LANGUAGE StandaloneKindSignatures #-}
-{-# LANGUAGE FlexibleInstances #-}
-{-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeApplications #-}
-{-# LANGUAGE LambdaCase #-}
-{-# LANGUAGE RecordWildCards #-}
-{-# LANGUAGE DeriveGeneric #-}
-{-# LANGUAGE DeriveAnyClass #-}
-{-# LANGUAGE DerivingStrategies #-}
+{-# LANGUAGE DataKinds                  #-}
+{-# LANGUAGE DeriveAnyClass             #-}
+{-# LANGUAGE DeriveGeneric              #-}
+{-# LANGUAGE DerivingStrategies         #-}
+{-# LANGUAGE FlexibleInstances          #-}
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
--- | 
+{-# LANGUAGE KindSignatures             #-}
+{-# LANGUAGE LambdaCase                 #-}
+{-# LANGUAGE RecordWildCards            #-}
+{-# LANGUAGE StandaloneDeriving         #-}
+{-# LANGUAGE StandaloneKindSignatures   #-}
+{-# LANGUAGE TypeApplications           #-}
+{-# LANGUAGE TypeFamilies               #-}
+-- |
 
 module Main where
 
 
-import Data.Maybe (fromMaybe, fromJust)
-import Data.Time.Calendar.MonthDay (monthAndDayToDayOfYearValid)
-import qualified Data.Time.Calendar.OrdinalDate as Day
-import qualified Data.ByteString.Lazy as LB
-import qualified Data.Aeson as A
+import qualified Data.Aeson                           as A
+import qualified Data.ByteString.Lazy                 as LB
+import           Data.Default.Class                   (def)
+import           Data.Maybe                           (fromJust, fromMaybe)
+import           Data.Time.Calendar.MonthDay          (monthAndDayToDayOfYearValid)
+import qualified Data.Time.Calendar.OrdinalDate       as Day
+import           Network.Wai.Handler.Warp             (run)
 import           Network.Wai.Middleware.RequestLogger (OutputFormat (..),
                                                        RequestLoggerSettings (..),
                                                        mkRequestLogger)
-import Network.Wai.Handler.Warp (run)
-import Data.Default.Class (def)
 
-import GTFS
-import Server
+import           GTFS
+import           Server
 
 
 main :: IO ()