-- | (Undocumented class) module Sound.SC3.UGen.Record.NLFiltC where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data NLFiltC = NLFiltC { rate :: S.Rate, input :: S.UGen, a :: S.UGen, b :: S.UGen, d :: S.UGen, c :: S.UGen, l :: S.UGen } deriving (Show) nLFiltC :: NLFiltC nLFiltC = NLFiltC { rate = S.AR, input = 0.0, a = 0.0, b = 0.0, d = 0.0, c = 0.0, l = 0.0 } mkNLFiltC :: NLFiltC -> S.UGen mkNLFiltC (NLFiltC r a' b' c' d' e' f') = S.mkOsc r "NLFiltC" [a',b',c',d',e',f'] 1 instance Make NLFiltC where ugen = mkNLFiltC