-- | (Undocumented class) module Sound.SC3.UGen.Record.AudioMSG where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data AudioMSG = AudioMSG { input :: S.UGen, index :: S.UGen } deriving (Show) audioMSG :: AudioMSG audioMSG = AudioMSG { input = 0.0, index = 0.0 } mkAudioMSG :: AudioMSG -> S.UGen mkAudioMSG (AudioMSG a' b') = S.mkOsc S.AR "AudioMSG" [a',b'] 1 instance Make AudioMSG where ugen = mkAudioMSG