defaultParams :: DB.SourceFile -> DB.Unit -> Params
defaultParams f u =
    Params {
        file         = f
      , unit         = u
      , offset       = 0
      , duration     = DB.unitDuration u
      , rate         = 1
      , pan          = 0
      , attackTime   = 0
      , releaseTime  = 0
      , sustainLevel = 1
      , gateLevel    = 0
      , sendLevel1   = 0
      , sendLevel2   = 0
      , fxParam1     = 0
      , fxParam2     = 0
      }
defaultParams :: DB.SourceFile -> DB.Unit -> Params
defaultParams f u =
    Params {
        file         = f
      , unit         = u
      , offset       = 0
      , duration     = DB.unitDuration u
      , rate         = 1
      , pan          = 0
      , attackTime   = 0
      , releaseTime  = 0
      , sustainLevel = 1
      , gateLevel    = 0
      , sendLevel1   = 0
      , sendLevel2   = 0
      , fxParam1     = 0
      , fxParam2     = 0
      }
defaultParams f u =
    Params {
        file         = f
      , unit         = u
      , offset       = 0
      , duration     = DB.unitDuration u
      , rate         = 1
      , pan          = 0
      , attackTime   = 0
      , releaseTime  = 0
      , sustainLevel = 1
      , gateLevel    = 0
      , sendLevel1   = 0
      , sendLevel2   = 0
      , fxParam1     = 0
      , fxParam2     = 0
      }