Add hello world example to readme & format code

docs/Examples/AsyncResponse/Main.purs

@@ -30,7 +30,7 @@ router { route: SayHello } = readTextFile UTF8 filePath >>= ok
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, onStarted } { route, router } 
+  serve { port: 8080, onStarted } { route, router }
   where
   onStarted = do
     log " ┌────────────────────────────────────────────┐"

docs/Examples/BinaryRequest/Main.purs

@@ -28,7 +28,7 @@ router { body } = toBuffer body >>= sha256sum >>> ok
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, onStarted } { route, router } 
+  serve { port: 8080, onStarted } { route, router }
   where
   onStarted = do
     log " ┌─────────────────────────────────────────────────────────┐"

docs/Examples/BinaryResponse/Main.purs

@@ -18,6 +18,7 @@ route :: RD.RouteDuplex' Route
 route = RD.root $ RG.sum
   { "SayHello": RG.noArgs
   }
+
 -- | The path to the file containing the response to send
 filePath :: String
 filePath = "./docs/Examples/BinaryResponse/circle.png"
@@ -32,7 +33,7 @@ router = const $ readFile filePath >>= ok' responseHeaders
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, onStarted } { route, router } 
+  serve { port: 8080, onStarted } { route, router }
   where
   onStarted = do
     log " ┌──────────────────────────────────────┐"

docs/Examples/Chunked/Main.purs

@@ -34,7 +34,7 @@ router = const $ runScript "echo 'hello '; sleep 1; echo 'world!'" >>= ok
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, onStarted } { route, router } 
+  serve { port: 8080, onStarted } { route, router }
   where
   onStarted = do
     log " ┌──────────────────────────────────────┐"

docs/Examples/CustomStack/Main.purs

@@ -42,7 +42,7 @@ sayHello _ = do
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, onStarted } { route, router: readerMiddleware sayHello } 
+  serve { port: 8080, onStarted } { route, router: readerMiddleware sayHello }
   where
   onStarted = do
     log " ┌───────────────────────────────────────┐"

docs/Examples/HelloWorld/Main.purs

@@ -3,7 +3,6 @@ module Examples.HelloWorld.Main where
 import Prelude
 
 import Data.Generic.Rep (class Generic)
-import Data.Maybe (Maybe(..))
 import Effect.Console (log)
 import HTTPurple (ServerM, ok, serve)
 import Routing.Duplex as RD

docs/Examples/SSL/Main.purs

@@ -35,14 +35,14 @@ sayHello _ = ok "hello world!"
 -- | Boot up the server
 main :: ServerM
 main =
-  serve { port: 8080, certFile: cert, keyFile: key, onStarted } { route, router: sayHello } 
-  where 
-    onStarted = 
-      do
-        log " ┌───────────────────────────────────────────┐"
-        log " │ Server now up on port 8080                │"
-        log " │                                           │"
-        log " │ To test, run:                             │"
-        log " │  > curl --insecure https://localhost:8080 │"
-        log " │    # => hello world!                      │"
-        log " └───────────────────────────────────────────┘"
+  serve { port: 8080, certFile: cert, keyFile: key, onStarted } { route, router: sayHello }
+  where
+  onStarted =
+    do
+      log " ┌───────────────────────────────────────────┐"
+      log " │ Server now up on port 8080                │"
+      log " │                                           │"
+      log " │ To test, run:                             │"
+      log " │  > curl --insecure https://localhost:8080 │"
+      log " │    # => hello world!                      │"
+      log " └───────────────────────────────────────────┘"