module Sound.SC3.UGen.Record.IndexInBetween where import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data IndexInBetween = IndexInBetween { rate :: S.Rate, bufnum :: S.UGen, input :: S.UGen } deriving (Show) indexInBetween :: IndexInBetween indexInBetween = IndexInBetween { rate = S.AR, bufnum = 0.0, input = 0.0 } mkIndexInBetween :: IndexInBetween -> S.UGen mkIndexInBetween (IndexInBetween r a' b') = S.mkOsc r "IndexInBetween" [a',b'] 1 instance Make IndexInBetween where ugen = mkIndexInBetween