restructure GTFS types

unfortunately doesn't quite get rid of all the type family still
since it's just too useful … but does reduce it somewhat.

Also, maps are much easier for looking things up than vectors!

1 files changed, 1 insertions, 1 deletions

diff --git a/app/Main.hs b/app/Main.hs
index de77adc..5b4224a 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -33,7 +33,7 @@ import Server
 
 main :: IO ()
 main = do
-  gtfs <- loadGtfs @Deep "./gtfs.zip"
+  gtfs <- loadGtfs "./gtfs.zip"
   app <- application gtfs
   loggerMiddleware <- mkRequestLogger
     $ def { outputFormat = Detailed True }