Project setup and implementation sketch

test/Main.hs

@@ -0,0 +1,18 @@
+{-# LANGUAGE DeriveGeneric #-}
+
+module Main (main) where
+
+import GHC.Generics (Generic)
+
+import Database.PostgreSQL.Opium (FromRow)
+
+data Person = Person
+  { name :: String
+  , age :: Int
+--  , lovesCats :: Bool
+  } deriving (Generic)
+
+instance FromRow Person where
+
+main :: IO ()
+main = putStrLn "TBD"