-- | (Undocumented class) module Sound.SC3.UGen.Record.WarpZ where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data WarpZ = WarpZ { bufnum :: S.UGen, pointer :: S.UGen, freqScale :: S.UGen, windowSize :: S.UGen, envbufnum :: S.UGen, overlaps :: S.UGen, windowRandRatio :: S.UGen, interp :: S.UGen, zeroSearch :: S.UGen, zeroStart :: S.UGen } deriving (Show) warpZ :: WarpZ warpZ = WarpZ { bufnum = 0.0, pointer = 0.0, freqScale = 1.0, windowSize = 0.2, envbufnum = -1.0, overlaps = 8.0, windowRandRatio = 0.0, interp = 1.0, zeroSearch = 0.0, zeroStart = 0.0 } mkWarpZ :: WarpZ -> S.UGen mkWarpZ (WarpZ a' b' c' d' e' f' g' h' i' j') = S.mkOsc S.AR "WarpZ" [a',b',c',d',e',f',g',h',i',j'] undefined instance Make WarpZ where ugen = mkWarpZ