module Sound.Tidal.Config where


data Config = Config {Config -> Bool
cCtrlListen :: Bool,
                      Config -> String
cCtrlAddr :: String,
                      Config -> Int
cCtrlPort :: Int,
                      Config -> Double
cFrameTimespan :: Double,
                      Config -> String
cTempoAddr :: String,
                      Config -> Int
cTempoPort :: Int,
                      Config -> Int
cTempoClientPort :: Int,
                      Config -> Bool
cSendParts :: Bool,
                      Config -> Int
cSkipTicks :: Int
                     }

defaultConfig :: Config
defaultConfig :: Config
defaultConfig = Config :: Bool
-> String
-> Int
-> Double
-> String
-> Int
-> Int
-> Bool
-> Int
-> Config
Config {cCtrlListen :: Bool
cCtrlListen = Bool
True,
                        cCtrlAddr :: String
cCtrlAddr ="127.0.0.1",
                        cCtrlPort :: Int
cCtrlPort = 6010,
                        cFrameTimespan :: Double
cFrameTimespan = 1Double -> Double -> Double
forall a. Fractional a => a -> a -> a
/20,
                        cTempoAddr :: String
cTempoAddr = "127.0.0.1",
                        cTempoPort :: Int
cTempoPort = 9160,
                        cTempoClientPort :: Int
cTempoClientPort = 0, -- choose at random
                        cSendParts :: Bool
cSendParts = Bool
False,
                        cSkipTicks :: Int
cSkipTicks = 10
                       }