-- | (Undocumented class) module Sound.SC3.UGen.Record.FMHEncode0 where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FMHEncode0 = FMHEncode0 { input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, gain :: S.UGen } deriving (Show) fMHEncode0 :: FMHEncode0 fMHEncode0 = FMHEncode0 { input = 0.0, azimuth = 0.0, elevation = 0.0, gain = 1.0 } mkFMHEncode0 :: FMHEncode0 -> S.UGen mkFMHEncode0 (FMHEncode0 a' b' c' d') = S.mkOsc S.AR "FMHEncode0" [a',b',c',d'] 9 instance Make FMHEncode0 where ugen = mkFMHEncode0