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