-- | (Undocumented class)
module Sound.SC3.UGen.Record.AtsNoiSynth where
import qualified Sound.SC3.UGen as S
import Sound.SC3.UGen.Record
data AtsNoiSynth = AtsNoiSynth {
  atsbuffer :: S.UGen,
  numPartials :: S.UGen,
  partialStart :: S.UGen,
  partialSkip :: S.UGen,
  filePointer :: S.UGen,
  sinePct :: S.UGen,
  noisePct :: S.UGen,
  freqMul :: S.UGen,
  freqAdd :: S.UGen,
  numBands :: S.UGen,
  bandStart :: S.UGen,
  bandSkip :: S.UGen
  } deriving (Show)
atsNoiSynth :: AtsNoiSynth
atsNoiSynth = AtsNoiSynth {
  atsbuffer = 0.0,
  numPartials = 0.0,
  partialStart = 0.0,
  partialSkip = 1.0,
  filePointer = 0.0,
  sinePct = 1.0,
  noisePct = 1.0,
  freqMul = 1.0,
  freqAdd = 0.0,
  numBands = 25.0,
  bandStart = 0.0,
  bandSkip = 1.0
  }
mkAtsNoiSynth :: AtsNoiSynth -> S.UGen
mkAtsNoiSynth (AtsNoiSynth  a' b' c' d' e' f' g' h' i' j' k' l') = S.mkOsc S.AR "AtsNoiSynth" [a',b',c',d',e',f',g',h',i',j',k',l'] 1
instance Make AtsNoiSynth where
  ugen = mkAtsNoiSynth