-- | (Undocumented class) module Sound.SC3.UGen.Record.JoshMultiOutGrain where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data JoshMultiOutGrain = JoshMultiOutGrain { maxSize :: S.UGen } deriving (Show) joshMultiOutGrain :: JoshMultiOutGrain joshMultiOutGrain = JoshMultiOutGrain { maxSize = 0.0 } mkJoshMultiOutGrain :: JoshMultiOutGrain -> S.UGen mkJoshMultiOutGrain (JoshMultiOutGrain a') = S.mkOsc S.AR "JoshMultiOutGrain" [a'] 1 instance Make JoshMultiOutGrain where ugen = mkJoshMultiOutGrain