integrate into startup

src/Main.hs

@@ -48,6 +48,7 @@ main = do
   execute_ conn initUser
   execute_ conn initProduct
   execute_ conn initToken
+  execute_ conn initAmount
   withStdoutLogger $ \log -> do
     let settings = setPort 3000 $ setLogger log defaultSettings
         initState = ReadState

src/Model.hs

@@ -5,3 +5,4 @@ module Model
 import Model.User as M
 import Model.Product as M
 import Model.Auth as M
+import Model.Amount as M