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