-- | (Undocumented class) module Sound.SC3.UGen.Record.PanX where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PanX = PanX { rate :: S.Rate, input :: S.UGen, pos :: S.UGen, level :: S.UGen, width :: S.UGen } deriving (Show) panX :: PanX panX = PanX { rate = S.AR, input = 0.0, pos = 0.0, level = 1.0, width = 2.0 } mkPanX :: PanX -> S.UGen mkPanX (PanX r a' b' c' d') = S.mkOsc r "PanX" [a',b',c',d'] 1 instance Make PanX where ugen = mkPanX