-- | (Undocumented class) module Sound.SC3.UGen.Record.B2Ster where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data B2Ster = B2Ster { w :: S.UGen, x :: S.UGen, y :: S.UGen } deriving (Show) b2Ster :: B2Ster b2Ster = B2Ster { w = 0.0, x = 0.0, y = 0.0 } mkB2Ster :: B2Ster -> S.UGen mkB2Ster (B2Ster a' b' c') = S.mkOsc S.AR "B2Ster" [a',b',c'] 2 instance Make B2Ster where ugen = mkB2Ster