module Sound.SC3.UGen.Record.PauseSelf where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PauseSelf = PauseSelf { input :: S.UGen } deriving (Show) pauseSelf :: PauseSelf pauseSelf = PauseSelf { input = 0.0 } mkPauseSelf :: PauseSelf -> S.UGen mkPauseSelf (PauseSelf a') = S.mkOsc S.KR "PauseSelf" [a'] 1 instance Make PauseSelf where ugen = mkPauseSelf