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