module Types where
data Options = Options
{ optFullScreen :: Bool
, optFlipScreens :: Bool
, optFile :: String
}
deriving (Show)