-- | (Undocumented class) module Sound.SC3.UGen.Record.Logger where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Logger = Logger { inputArray :: S.UGen, trig :: S.UGen, bufnum :: S.UGen, reset :: S.UGen } deriving (Show) logger :: Logger logger = Logger { inputArray = 0.0, trig = 0.0, bufnum = 0.0, reset = 0.0 } mkLogger :: Logger -> S.UGen mkLogger (Logger a' b' c' d') = S.mkOsc S.KR "Logger" [a',b',c',d'] 1 instance Make Logger where ugen = mkLogger