-- | (Undocumented class) module Sound.SC3.UGen.Record.RegaliaMitraEQ where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RegaliaMitraEQ = RegaliaMitraEQ { input :: S.UGen, freq :: S.UGen, rq :: S.UGen, k :: S.UGen } deriving (Show) regaliaMitraEQ :: RegaliaMitraEQ regaliaMitraEQ = RegaliaMitraEQ { input = 0.0, freq = 440.0, rq = 0.1, k = 0.0 } mkRegaliaMitraEQ :: RegaliaMitraEQ -> S.UGen mkRegaliaMitraEQ (RegaliaMitraEQ a' b' c' d') = S.mkOsc S.AR "RegaliaMitraEQ" [a',b',c',d'] 1 instance Make RegaliaMitraEQ where ugen = mkRegaliaMitraEQ