-- | (Undocumented class) module Sound.SC3.UGen.Record.PV_Freeze where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PV_Freeze = PV_Freeze { buffer :: S.UGen, freeze :: S.UGen } deriving (Show) pv_Freeze :: PV_Freeze pv_Freeze = PV_Freeze { buffer = 0.0, freeze = 0.0 } mkPV_Freeze :: PV_Freeze -> S.UGen mkPV_Freeze (PV_Freeze a' b') = S.mkOsc S.KR "PV_Freeze" [a',b'] 1 instance Make PV_Freeze where ugen = mkPV_Freeze