-- | (Undocumented class) module Sound.SC3.UGen.Record.BFManipulate where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BFManipulate = BFManipulate { w :: S.UGen, x :: S.UGen, y :: S.UGen, z :: S.UGen, rotate :: S.UGen, tilt :: S.UGen, tumble :: S.UGen } deriving (Show) bFManipulate :: BFManipulate bFManipulate = BFManipulate { w = 0.0, x = 0.0, y = 0.0, z = 0.0, rotate = 0.0, tilt = 0.0, tumble = 0.0 } mkBFManipulate :: BFManipulate -> S.UGen mkBFManipulate (BFManipulate a' b' c' d' e' f' g') = S.mkOsc S.AR "BFManipulate" [a',b',c',d',e',f',g'] 4 instance Make BFManipulate where ugen = mkBFManipulate