-- | (Undocumented class) module Sound.SC3.UGen.Record.ArrayMax where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data ArrayMax = ArrayMax { rate :: S.Rate, array :: S.UGen } deriving (Show) arrayMax :: ArrayMax arrayMax = ArrayMax { rate = S.AR, array = 0.0 } mkArrayMax :: ArrayMax -> S.UGen mkArrayMax (ArrayMax r a') = S.mkOsc r "ArrayMax" [a'] 2 instance Make ArrayMax where ugen = mkArrayMax