-- --------------------------------------------------------------- [ Utility ]

-- | Make an error message
err :: String -> IO (Failable ())
err s = return $ Left s
err :: String -> IO (Failable ())
err s = return $ Left s
err s = return $ Left s