note what next

hello world exaple is based on
https://github.com/yesodweb/yesod?tab=readme-ov-file#getting-started

README.md

@@ -60,3 +60,11 @@ _Do not look below this line_
 * can we lose this "if isJust lat && isJust lon && isJust ts" wart?
 * probably we should store points in a more efficient form than
  a singly-linked list
+
+* need a web server in haskell that
+ - accepts file upload and parses the gpx file
+ - serves the data points in some format elm can digest easily
+* need a database of some kind so the data can be saved
+* and boring stuff like auth[zn]
+* frontend can get data from backend
+* for DX, backend can serve the js files needed by frontend

app/Main.hs

@@ -1,10 +1,27 @@
+{-# LANGUAGE OverloadedStrings     #-}
+{-# LANGUAGE QuasiQuotes           #-}
+{-# LANGUAGE TemplateHaskell       #-}
+{-# LANGUAGE TypeFamilies          #-}
 module Main where
 
-import Control.Exception
 import Track(parseFile)
 import Data.List as List
 
+import           Yesod.Core
+
+data HelloWorld = HelloWorld
+
+mkYesod "HelloWorld" [parseRoutes|
+/ HomeR GET
+|]
+
+instance Yesod HelloWorld
+
+getHomeR :: Handler Html
+getHomeR = defaultLayout [whamlet|Hello World!|]
+
 main :: IO ()
 main = do
   points <- Track.parseFile "track.gpx"
-  putStrLn ("loaded " ++ (show (List.length points)))
+  putStrLn ("loaded " ++ (show (List.length points)) ++ " points from GPX")
+  warp 3000 HelloWorld

souplesse.cabal

@@ -71,6 +71,7 @@ executable souplesse
     build-depends:
         base ^>=4.18.2.1
       , souplesse-lib
+      , yesod-core == 1.6.25.1
 
     -- Directories containing source files.
     hs-source-dirs:   app