-- | SC3 Ugen bindings (auto-generated).
module Sound.Sc3.Ugen.Bindings.Db.External where

-- import Sound.Sc3.Common.Enum
-- import Sound.Sc3.Common.Envelope
import Sound.Sc3.Common.Rate
import Sound.Sc3.Common.Uid
import Sound.Sc3.Common.Unsafe

import Sound.Sc3.Ugen.Primitive
import Sound.Sc3.Ugen.Ugen
import Sound.Sc3.Ugen.Util

{- | (Undocumented class)

 A2B [AudioRate] a=0 b=0 c=0 d=0
-}
a2b :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
a2b :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
a2b Rate
rate Ugen
a Ugen
b Ugen
c Ugen
d = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"A2B" [Ugen
a, Ugen
b, Ugen
c, Ugen
d] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Emulator of the AY (aka YM) soundchip, used in Spectrum/Atari

 AY [AudioRate] tonea=1777 toneb=1666 tonec=1555 noise=1 control=7 vola=15 volb=15 volc=15 envfreq=4 envstyle=1 chiptype=0
-}
ay :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
ay :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
ay Rate
rate Ugen
tonea Ugen
toneb Ugen
tonec Ugen
noise Ugen
control_ Ugen
vola Ugen
volb Ugen
volc Ugen
envfreq Ugen
envstyle Ugen
chiptype = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AY" [Ugen
tonea, Ugen
toneb, Ugen
tonec, Ugen
noise, Ugen
control_, Ugen
vola, Ugen
volb, Ugen
volc, Ugen
envfreq, Ugen
envstyle, Ugen
chiptype] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | AY-3-891X Chip Sound Simulator

 AY8910 [AudioRate] r0=0 r1=0 r2=0 r3=0 r4=0 r5=0 r6=0 r7=0 r8=0 r9=0 rA=0 rB=0 rC=0 rD=0 rate=1
-}
ay8910 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
ay8910 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
ay8910 Rate
rate Ugen
r0 Ugen
r1 Ugen
r2 Ugen
r3 Ugen
r4 Ugen
r5 Ugen
r6 Ugen
r7 Ugen
r8 Ugen
r9 Ugen
rA Ugen
rB Ugen
rC Ugen
rD Ugen
rate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AY8910" [Ugen
r0, Ugen
r1, Ugen
r2, Ugen
r3, Ugen
r4, Ugen
r5, Ugen
r6, Ugen
r7, Ugen
r8, Ugen
r9, Ugen
rA, Ugen
rB, Ugen
rC, Ugen
rD, Ugen
rate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Allpass1 [AudioRate] in=0 freq=1200
-}
allpass1 :: Rate -> Ugen -> Ugen -> Ugen
allpass1 :: Rate -> Ugen -> Ugen -> Ugen
allpass1 Rate
rate Ugen
in_ Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Allpass1" [Ugen
in_, Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Allpass2 [AudioRate] in=0 freq=1200 rq=1
-}
allpass2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
allpass2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
allpass2 Rate
rate Ugen
in_ Ugen
freq Ugen
rq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Allpass2" [Ugen
in_, Ugen
freq, Ugen
rq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | amplitude follower (deprecated)

 AmplitudeMod [ControlRate,AudioRate] in=0 attackTime=0.01 releaseTime=0.01
-}
amplitudeMod :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
amplitudeMod :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
amplitudeMod Rate
rate Ugen
in_ Ugen
attackTime Ugen
releaseTime = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AmplitudeMod" [Ugen
in_, Ugen
attackTime, Ugen
releaseTime] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogBassDrum [AudioRate] trig=0 infsustain=0 accent=0.5 freq=50 tone=0.5 decay=0.5 attackfm=0.5 selffm=0.25
-}
analogBassDrum :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogBassDrum :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
analogBassDrum Rate
rate Ugen
trig_ Ugen
infsustain Ugen
accent Ugen
freq Ugen
tone Ugen
decay_ Ugen
attackfm Ugen
selffm = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AnalogBassDrum" [Ugen
trig_, Ugen
infsustain, Ugen
accent, Ugen
freq, Ugen
tone, Ugen
decay_, Ugen
attackfm, Ugen
selffm] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogFoldOsc [AudioRate] freq=100 amp=1
-}
analogFoldOsc :: Rate -> Ugen -> Ugen -> Ugen
analogFoldOsc :: Rate -> Ugen -> Ugen -> Ugen
analogFoldOsc Rate
rate Ugen
freq Ugen
amp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AnalogFoldOsc" [Ugen
freq, Ugen
amp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogPhaser [AudioRate] input=0 lfoinput=0 skew=0 feedback=0.25 modulation=0.5 stages=8;    FILTER: TRUE
-}
analogPhaser :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPhaser :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPhaser Ugen
input Ugen
lfoinput Ugen
skew Ugen
feedback Ugen
modulation Ugen
stages = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AnalogPhaser" [Ugen
input, Ugen
lfoinput, Ugen
skew, Ugen
feedback, Ugen
modulation, Ugen
stages] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogPhaserMod [ControlRate,AudioRate] input=0 skew=0 modulation=0.5 stages=8;    FILTER: TRUE
-}
analogPhaserMod :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPhaserMod :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPhaserMod Ugen
input Ugen
skew Ugen
modulation Ugen
stages = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AnalogPhaserMod" [Ugen
input, Ugen
skew, Ugen
modulation, Ugen
stages] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogPulseShaper [AudioRate] pulseinput=0 width=0.5 decay=0.5 double=0.5
-}
analogPulseShaper :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPulseShaper :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogPulseShaper Rate
rate Ugen
pulseinput Ugen
width Ugen
decay_ Ugen
double = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AnalogPulseShaper" [Ugen
pulseinput, Ugen
width, Ugen
decay_, Ugen
double] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogSnareDrum [AudioRate] trig=0 infsustain=0 accent=0.1 freq=200 tone=0.5 decay=0.5 snappy=0.5
-}
analogSnareDrum :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogSnareDrum :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogSnareDrum Rate
rate Ugen
trig_ Ugen
infsustain Ugen
accent Ugen
freq Ugen
tone Ugen
decay_ Ugen
snappy = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AnalogSnareDrum" [Ugen
trig_, Ugen
infsustain, Ugen
accent, Ugen
freq, Ugen
tone, Ugen
decay_, Ugen
snappy] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogTape [AudioRate] input=0 bias=0.5 saturation=0.5 drive=0.5 oversample=1 mode=0;    FILTER: TRUE
-}
analogTape :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogTape :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogTape Ugen
input Ugen
bias Ugen
saturation Ugen
drive Ugen
oversample Ugen
mode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AnalogTape" [Ugen
input, Ugen
bias, Ugen
saturation, Ugen
drive, Ugen
oversample, Ugen
mode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AnalogVintageDistortion [AudioRate] input=0 drivegain=0.5 bias=0 lowgain=0.1 highgain=0.1 shelvingfreq=600 oversample=0;    FILTER: TRUE
-}
analogVintageDistortion :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogVintageDistortion :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analogVintageDistortion Ugen
input Ugen
drivegain Ugen
bias Ugen
lowgain Ugen
highgain Ugen
shelvingfreq Ugen
oversample = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AnalogVintageDistortion" [Ugen
input, Ugen
drivegain, Ugen
bias, Ugen
lowgain, Ugen
highgain, Ugen
shelvingfreq, Ugen
oversample] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | event analyser (BBCut)

 AnalyseEvents2 [AudioRate] in=0 bufnum=0 threshold=0.34 triggerid=101 circular=0 pitch=0
-}
analyseEvents2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analyseEvents2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
analyseEvents2 Rate
rate Ugen
in_ Ugen
bufnum Ugen
threshold Ugen
triggerid Ugen
circular Ugen
pitch_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AnalyseEvents2" [Ugen
in_, Ugen
bufnum, Ugen
threshold, Ugen
triggerid, Ugen
circular, Ugen
pitch_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 2-species Predator-Prey model

 ArneodoCoulletTresser [AudioRate] freq=22050 alpha=1.5 h=0.05 xi=0.5 yi=0.5 zi=0.5
-}
arneodoCoulletTresser :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
arneodoCoulletTresser :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
arneodoCoulletTresser Rate
rate Ugen
freq Ugen
alpha Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"ArneodoCoulletTresser" [Ugen
freq, Ugen
alpha, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | detect the largest value (and its position) in an array of Ugens

 ArrayMax [ControlRate,AudioRate] *array=0;    MCE=1, FILTER: TRUE
-}
arrayMax :: Ugen -> Ugen
arrayMax :: Ugen -> Ugen
arrayMax Ugen
array = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"ArrayMax" [] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
array]) Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | detect the smallest value (and its position) in an array of Ugens

 ArrayMin [ControlRate,AudioRate] *array=0;    MCE=1, FILTER: TRUE
-}
arrayMin :: Ugen -> Ugen
arrayMin :: Ugen -> Ugen
arrayMin Ugen
array = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"ArrayMin" [] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
array]) Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sound Chip Simulator

 Astrocade [AudioRate] reg0=0 reg1=127 reg2=0 reg3=0 reg4=0 reg5=0 reg6=15 reg7=0
-}
astrocade :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
astrocade :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
astrocade Rate
rate Ugen
reg0 Ugen
reg1 Ugen
reg2 Ugen
reg3 Ugen
reg4 Ugen
reg5 Ugen
reg6 Ugen
reg7 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Astrocade" [Ugen
reg0, Ugen
reg1, Ugen
reg2, Ugen
reg3, Ugen
reg4, Ugen
reg5, Ugen
reg6, Ugen
reg7] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | TIA Chip Sound Simulator

 Atari2600 [AudioRate] audc0=1 audc1=2 audf0=3 audf1=4 audv0=5 audv1=5 rate=1
-}
atari2600 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atari2600 :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atari2600 Rate
rate Ugen
audc0 Ugen
audc1 Ugen
audf0 Ugen
audf1 Ugen
audv0 Ugen
audv1 Ugen
rate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Atari2600" [Ugen
audc0, Ugen
audc1, Ugen
audf0, Ugen
audf1, Ugen
audv0, Ugen
audv1, Ugen
rate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Use Amp data from a given partial

 AtsAmp [ControlRate,AudioRate] atsbuffer=0 partialNum=0 filePointer=0
-}
atsAmp :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsAmp :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsAmp Rate
rate Ugen
atsbuffer Ugen
partialNum Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsAmp" [Ugen
atsbuffer, Ugen
partialNum, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (put short description here)

 AtsBand [AudioRate] atsbuffer=0 band=0 filePointer=0
-}
atsBand :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsBand :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsBand Rate
rate Ugen
atsbuffer Ugen
band Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsBand" [Ugen
atsbuffer, Ugen
band, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Use Freq data from a given partial

 AtsFreq [ControlRate,AudioRate] atsbuffer=0 partialNum=0 filePointer=0
-}
atsFreq :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsFreq :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsFreq Rate
rate Ugen
atsbuffer Ugen
partialNum Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsFreq" [Ugen
atsbuffer, Ugen
partialNum, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Resynthesize sine and noise data from an ATS analysis file

 AtsNoiSynth [AudioRate] atsbuffer=0 numPartials=0 partialStart=0 partialSkip=1 filePointer=0 sinePct=1 noisePct=1 freqMul=1 freqAdd=0 numBands=25 bandStart=0 bandSkip=1
-}
atsNoiSynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atsNoiSynth :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
atsNoiSynth Rate
rate Ugen
atsbuffer Ugen
numPartials Ugen
partialStart Ugen
partialSkip Ugen
filePointer Ugen
sinePct Ugen
noisePct Ugen
freqMul Ugen
freqAdd Ugen
numBands Ugen
bandStart Ugen
bandSkip = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsNoiSynth" [Ugen
atsbuffer, Ugen
numPartials, Ugen
partialStart, Ugen
partialSkip, Ugen
filePointer, Ugen
sinePct, Ugen
noisePct, Ugen
freqMul, Ugen
freqAdd, Ugen
numBands, Ugen
bandStart, Ugen
bandSkip] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AtsNoise [ControlRate,AudioRate] atsbuffer=0 bandNum=0 filePointer=0
-}
atsNoise :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsNoise :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsNoise Rate
rate Ugen
atsbuffer Ugen
bandNum Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsNoise" [Ugen
atsbuffer, Ugen
bandNum, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | One Ugen to return both Amp and Freq info

 AtsParInfo [ControlRate,AudioRate] atsbuffer=0 partialNum=0 filePointer=0
-}
atsParInfo :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsParInfo :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
atsParInfo Rate
rate Ugen
atsbuffer Ugen
partialNum Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsParInfo" [Ugen
atsbuffer, Ugen
partialNum, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AtsPartial [AudioRate] atsbuffer=0 partial=0 filePointer=0 freqMul=1 freqAdd=0
-}
atsPartial :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atsPartial :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atsPartial Rate
rate Ugen
atsbuffer Ugen
partial Ugen
filePointer Ugen
freqMul Ugen
freqAdd = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsPartial" [Ugen
atsbuffer, Ugen
partial, Ugen
filePointer, Ugen
freqMul, Ugen
freqAdd] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Resynthesize sine data from an ATS analysis file

 AtsSynth [AudioRate] atsbuffer=0 numPartials=0 partialStart=0 partialSkip=1 filePointer=0 freqMul=1 freqAdd=0
-}
atsSynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atsSynth :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
atsSynth Rate
rate Ugen
atsbuffer Ugen
numPartials Ugen
partialStart Ugen
partialSkip Ugen
filePointer Ugen
freqMul Ugen
freqAdd = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AtsSynth" [Ugen
atsbuffer, Ugen
numPartials, Ugen
partialStart, Ugen
partialSkip, Ugen
filePointer, Ugen
freqMul, Ugen
freqAdd] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Detect onsets and assess the nature of the attack slope

 AttackSlope [ControlRate] input=0 windowsize=1024 peakpicksize=20 leak=0.999 energythreshold=0.01 sumthreshold=20 mingap=30 numslopesaveraged=10
-}
attackSlope :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
attackSlope :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
attackSlope Rate
rate Ugen
input Ugen
windowsize Ugen
peakpicksize Ugen
leak Ugen
energythreshold Ugen
sumthreshold Ugen
mingap Ugen
numslopesaveraged = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"AttackSlope" [Ugen
input, Ugen
windowsize, Ugen
peakpicksize, Ugen
leak, Ugen
energythreshold, Ugen
sumthreshold, Ugen
mingap, Ugen
numslopesaveraged] Maybe [Ugen]
forall a. Maybe a
Nothing Int
6 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 AudioMSG [AudioRate] in=0 index=0;    FILTER: TRUE
-}
audioMSG :: Ugen -> Ugen -> Ugen
audioMSG :: Ugen -> Ugen -> Ugen
audioMSG Ugen
in_ Ugen
index_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AudioMSG" [Ugen
in_, Ugen
index_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | calculates mean average of audio or control rate signal

 AverageOutput [ControlRate,AudioRate] in=0 trig=0;    FILTER: TRUE
-}
averageOutput :: Ugen -> Ugen -> Ugen
averageOutput :: Ugen -> Ugen -> Ugen
averageOutput Ugen
in_ Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"AverageOutput" [Ugen
in_, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 B2A [AudioRate] w=0 x=0 y=0 z=0
-}
b2a :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
b2a :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
b2a Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"B2A" [Ugen
w, Ugen
x, Ugen
y, Ugen
z] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 B2Ster [AudioRate] w=0 x=0 y=0
-}
b2Ster :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
b2Ster :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
b2Ster Rate
rate Ugen
w Ugen
x Ugen
y = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"B2Ster" [Ugen
w, Ugen
x, Ugen
y] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 B2UHJ [AudioRate] w=0 x=0 y=0
-}
b2uhj :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
b2uhj :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
b2uhj Rate
rate Ugen
w Ugen
x Ugen
y = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"B2UHJ" [Ugen
w, Ugen
x, Ugen
y] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | MultiOut BetaBlocker VChip

 BBlockerBuf [AudioRate] freq=0 bufnum=0 startpoint=0
-}
bBlockerBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
bBlockerBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
bBlockerBuf Rate
rate Ugen
freq Ugen
bufnum Ugen
startpoint = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BBlockerBuf" [Ugen
freq, Ugen
bufnum, Ugen
startpoint] Maybe [Ugen]
forall a. Maybe a
Nothing Int
9 (Int -> Special
Special Int
0) UgenId
NoId

{- | 3D Ambisonic decoder

 BFDecode1 [AudioRate] w=0 x=0 y=0 z=0 azimuth=0 elevation=0 wComp=0
-}
bfDecode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfDecode1 :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfDecode1 Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
azimuth Ugen
elevation Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFDecode1" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
azimuth, Ugen
elevation, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BFDecoder [] maxSize=0
-}
bfDecoder :: Rate -> Ugen -> Ugen
bfDecoder :: Rate -> Ugen -> Ugen
bfDecoder Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFDecoder" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Ambisonic B format encoder

 BFEncode1 [AudioRate] in=0 azimuth=0 elevation=0 rho=1 gain=1 wComp=0
-}
bfEncode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfEncode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfEncode1 Rate
rate Ugen
in_ Ugen
azimuth Ugen
elevation Ugen
rho Ugen
gain Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFEncode1" [Ugen
in_, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
gain, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Ambisonic B format encoder

 BFEncode2 [AudioRate] in=0 point_x=1 point_y=1 elevation=0 gain=1 wComp=0
-}
bfEncode2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfEncode2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfEncode2 Rate
rate Ugen
in_ Ugen
point_x Ugen
point_y Ugen
elevation Ugen
gain Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFEncode2" [Ugen
in_, Ugen
point_x, Ugen
point_y, Ugen
elevation, Ugen
gain, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Ambisonic B format encoder for stereo signals

 BFEncodeSter [AudioRate] l=0 r=0 azimuth=0 width=1.5708 elevation=0 rho=1 gain=1 wComp=0
-}
bfEncodeSter :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfEncodeSter :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
bfEncodeSter Rate
rate Ugen
l Ugen
r Ugen
azimuth Ugen
width Ugen
elevation Ugen
rho Ugen
gain Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFEncodeSter" [Ugen
l, Ugen
r, Ugen
azimuth, Ugen
width, Ugen
elevation, Ugen
rho, Ugen
gain, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BFGrainPanner [] maxSize=0
-}
bfGrainPanner :: Rate -> Ugen -> Ugen
bfGrainPanner :: Rate -> Ugen -> Ugen
bfGrainPanner Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFGrainPanner" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | BFormat sound manipulation

 BFManipulate [AudioRate] w=0 x=0 y=0 z=0 rotate=0 tilt=0 tumble=0
-}
bfManipulate :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfManipulate :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bfManipulate Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
rotate_ Ugen
tilt_ Ugen
tumble_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFManipulate" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
rotate_, Ugen
tilt_, Ugen
tumble_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BFPanner [] maxSize=0
-}
bfPanner :: Rate -> Ugen -> Ugen
bfPanner :: Rate -> Ugen -> Ugen
bfPanner Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BFPanner" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BLBufRd [ControlRate,AudioRate] bufnum=0 phase=0 ratio=1
-}
blBufRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blBufRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blBufRd Rate
rate Ugen
bufnum Ugen
phase Ugen
ratio = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BLBufRd" [Ugen
bufnum, Ugen
phase, Ugen
ratio] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BLOsc [ControlRate,AudioRate] freq=100 pulsewidth=0.5 waveform=0
-}
blOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blOsc Rate
rate Ugen
freq Ugen
pulsewidth Ugen
waveform = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BLOsc" [Ugen
freq, Ugen
pulsewidth, Ugen
waveform] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 24db/oct rolloff - 4nd order resonant Low/High/Band Pass Filter

 BMoog [AudioRate] in=0 freq=440 q=0.2 mode=0 saturation=0.95;    FILTER: TRUE
-}
bMoog :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bMoog :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bMoog Ugen
in_ Ugen
freq Ugen
q Ugen
mode Ugen
saturation = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"BMoog" [Ugen
in_, Ugen
freq, Ugen
q, Ugen
mode, Ugen
saturation] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Balances two signals with each other

 Balance [AudioRate] in=0 test=0 hp=10 stor=0
-}
balance :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
balance :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
balance Rate
rate Ugen
in_ Ugen
test Ugen
hp Ugen
stor = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Balance" [Ugen
in_, Ugen
test, Ugen
hp, Ugen
stor] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Extracts statistics on a beat histogram

 BeatStatistics [ControlRate] fft=0 leak=0.995 numpreviousbeats=4
-}
beatStatistics :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
beatStatistics :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
beatStatistics Rate
rate Ugen
fft_ Ugen
leak Ugen
numpreviousbeats = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BeatStatistics" [Ugen
fft_, Ugen
leak, Ugen
numpreviousbeats] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sound Chip Simulator (well...)

 Beep [AudioRate] freq=3250 vol=1
-}
beep :: Rate -> Ugen -> Ugen -> Ugen
beep :: Rate -> Ugen -> Ugen -> Ugen
beep Rate
rate Ugen
freq Ugen
vol = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Beep" [Ugen
freq, Ugen
vol] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BeepU [] maxSize=0
-}
beepU :: Rate -> Ugen -> Ugen
beepU :: Rate -> Ugen -> Ugen
beepU Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BeepU" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BinData [ControlRate,AudioRate] buffer=0 bin=0 overlaps=0.5
-}
binData :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
binData :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
binData Rate
rate Ugen
buffer Ugen
bin Ugen
overlaps = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BinData" [Ugen
buffer, Ugen
bin, Ugen
overlaps] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Band limited impulse generation

 BlitB3 [AudioRate] freq=440
-}
blitB3 :: Rate -> Ugen -> Ugen
blitB3 :: Rate -> Ugen -> Ugen
blitB3 Rate
rate Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BlitB3" [Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BlitB3D [AudioRate] freq=440
-}
blitB3D :: Rate -> Ugen -> Ugen
blitB3D :: Rate -> Ugen -> Ugen
blitB3D Rate
rate Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BlitB3D" [Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | BLIT derived sawtooth

 BlitB3Saw [AudioRate] freq=440 leak=0.99
-}
blitB3Saw :: Rate -> Ugen -> Ugen -> Ugen
blitB3Saw :: Rate -> Ugen -> Ugen -> Ugen
blitB3Saw Rate
rate Ugen
freq Ugen
leak = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BlitB3Saw" [Ugen
freq, Ugen
leak] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Bipolar BLIT derived square waveform

 BlitB3Square [AudioRate] freq=440 leak=0.99
-}
blitB3Square :: Rate -> Ugen -> Ugen -> Ugen
blitB3Square :: Rate -> Ugen -> Ugen -> Ugen
blitB3Square Rate
rate Ugen
freq Ugen
leak = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BlitB3Square" [Ugen
freq, Ugen
leak] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Bipolar BLIT derived triangle

 BlitB3Tri [AudioRate] freq=440 leak=0.99 leak2=0.99
-}
blitB3Tri :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blitB3Tri :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
blitB3Tri Rate
rate Ugen
freq Ugen
leak Ugen
leak2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BlitB3Tri" [Ugen
freq, Ugen
leak, Ugen
leak2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | breakcore simulator

 Breakcore [AudioRate] bufnum=0 capturein=0 capturetrigger=0 duration=0.1 ampdropout=0
-}
breakcore :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
breakcore :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
breakcore Rate
rate Ugen
bufnum Ugen
capturein Ugen
capturetrigger Ugen
duration Ugen
ampdropout = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Breakcore" [Ugen
bufnum, Ugen
capturein, Ugen
capturetrigger, Ugen
duration, Ugen
ampdropout] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Prigogine oscillator

 Brusselator [AudioRate] reset=0 rate=0.01 mu=1 gamma=1 initx=0.5 inity=0.5
-}
brusselator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
brusselator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
brusselator Rate
rate Ugen
reset Ugen
rate_ Ugen
mu Ugen
gamma Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Brusselator" [Ugen
reset, Ugen
rate_, Ugen
mu, Ugen
gamma, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sound sampled in a buffer

 BufGrain [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 interp=2
-}
bufGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrain Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
interp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrain" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
interp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sound sampled in a buffer and user supplied envelope

 BufGrainB [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 envbuf=0 interp=2
-}
bufGrainB :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainB :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainB Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
envbuf Ugen
interp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrainB" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
envbuf, Ugen
interp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BufGrainBBF [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 envbuf=0 azimuth=0 elevation=0 rho=1 interp=2 wComp=0
-}
bufGrainBBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainBBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
bufGrainBBF Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
envbuf Ugen
azimuth Ugen
elevation Ugen
rho Ugen
interp Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrainBBF" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
envbuf, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
interp, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BufGrainBF [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 azimuth=0 elevation=0 rho=1 interp=2 wComp=0
-}
bufGrainBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
bufGrainBF Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
azimuth Ugen
elevation Ugen
rho Ugen
interp Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrainBF" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
interp, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sound sampled in a buffer and user supplied envelopes

 BufGrainI [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 envbuf1=0 envbuf2=0 ifac=0.5 interp=2
-}
bufGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainI :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
bufGrainI Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac Ugen
interp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrainI" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac, Ugen
interp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 BufGrainIBF [AudioRate] trigger=0 dur=1 sndbuf=0 rate=1 pos=0 envbuf1=0 envbuf2=0 ifac=0.5 azimuth=0 elevation=0 rho=1 interp=2 wComp=0
-}
bufGrainIBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bufGrainIBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
bufGrainIBF Rate
rate Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac Ugen
azimuth Ugen
elevation Ugen
rho Ugen
interp Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufGrainIBF" [Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
interp, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | detect the largest value (and its position) in an array of Ugens

 BufMax [ControlRate] bufnum=0 gate=1
-}
bufMax :: Rate -> Ugen -> Ugen -> Ugen
bufMax :: Rate -> Ugen -> Ugen -> Ugen
bufMax Rate
rate Ugen
bufnum Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufMax" [Ugen
bufnum, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | detect the largest value (and its position) in an array of Ugens

 BufMin [ControlRate] bufnum=0 gate=1
-}
bufMin :: Rate -> Ugen -> Ugen -> Ugen
bufMin :: Rate -> Ugen -> Ugen -> Ugen
bufMin Rate
rate Ugen
bufnum Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"BufMin" [Ugen
bufnum, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 CQ_Diff [ControlRate] in1=0 in2=0 databufnum=0
-}
cq_Diff :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
cq_Diff :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
cq_Diff Rate
rate Ugen
in1 Ugen
in2 Ugen
databufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"CQ_Diff" [Ugen
in1, Ugen
in2, Ugen
databufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Quefrency analysis and liftering

 Cepstrum [] cepbuf=0 fftchain=0
-}
cepstrum :: Rate -> Ugen -> Ugen -> Ugen
cepstrum :: Rate -> Ugen -> Ugen -> Ugen
cepstrum Rate
rate Ugen
cepbuf Ugen
fftchain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Cepstrum" [Ugen
cepbuf, Ugen
fftchain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Chen [ControlRate,AudioRate] speed=0.5 a=0.5 b=0.3 c=0.28
-}
chen :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
chen :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
chen Rate
rate Ugen
speed Ugen
a Ugen
b Ugen
c = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Chen" [Ugen
speed, Ugen
a, Ugen
b, Ugen
c] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | Octave chroma band based representation of energy in a signal; Chromagram for nTET tuning systems with any base reference

 Chromagram [ControlRate] fft=0 fftsize=2048 n=12 tuningbase=32.7032 octaves=8 integrationflag=0 coeff=0.9 octaveratio=2 perframenormalize=0
-}
chromagram :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
chromagram :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
chromagram Rate
rate Ugen
fft_ Ugen
fftsize Ugen
n Ugen
tuningbase Ugen
octaves Ugen
integrationflag Ugen
coeff Ugen
octaveratio Ugen
perframenormalize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Chromagram" [Ugen
fft_, Ugen
fftsize, Ugen
n, Ugen
tuningbase, Ugen
octaves, Ugen
integrationflag, Ugen
coeff, Ugen
octaveratio, Ugen
perframenormalize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
12 (Int -> Special
Special Int
0) UgenId
NoId

{- | circular linear lag

 CircleRamp [ControlRate,AudioRate] in=0 lagTime=0.1 circmin=-180 circmax=180
-}
circleRamp :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
circleRamp :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
circleRamp Rate
rate Ugen
in_ Ugen
lagTime Ugen
circmin Ugen
circmax = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"CircleRamp" [Ugen
in_, Ugen
lagTime, Ugen
circmin, Ugen
circmax] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Clipper32 [AudioRate] in=0 lo=-0.8 hi=0.8
-}
clipper32 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper32 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper32 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Clipper32" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Clipper4 [AudioRate] in=0 lo=-0.8 hi=0.8
-}
clipper4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper4 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Clipper4" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Clipper8 [AudioRate] in=0 lo=-0.8 hi=0.8
-}
clipper8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
clipper8 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Clipper8" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Clockmus [ControlRate]
-}
clockmus :: Rate -> Ugen
clockmus :: Rate -> Ugen
clockmus Rate
rate = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Clockmus" [] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 CombLP [AudioRate] in=0 gate=1 maxdelaytime=0.2 delaytime=0.2 decaytime=1 coef=0.5
-}
combLP :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
combLP :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
combLP Rate
rate Ugen
in_ Ugen
gate_ Ugen
maxdelaytime Ugen
delaytime Ugen
decaytime Ugen
coef = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"CombLP" [Ugen
in_, Ugen
gate_, Ugen
maxdelaytime, Ugen
delaytime, Ugen
decaytime, Ugen
coef] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | FM-modulable resonating filter

 ComplexRes [AudioRate] in=0 freq=100 decay=0.2;    FILTER: TRUE
-}
complexRes :: Ugen -> Ugen -> Ugen -> Ugen
complexRes :: Ugen -> Ugen -> Ugen -> Ugen
complexRes Ugen
in_ Ugen
freq Ugen
decay_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"ComplexRes" [Ugen
in_, Ugen
freq, Ugen
decay_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Concatenative Cross-Synthesis on Live Streams

 Concat [AudioRate] control=0 source=0 storesize=1 seektime=1 seekdur=1 matchlength=0.05 freezestore=0 zcr=1 lms=1 sc=1 st=0 randscore=0
-}
concat :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
concat :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
concat Rate
rate Ugen
control_ Ugen
source Ugen
storesize Ugen
seektime Ugen
seekdur Ugen
matchlength Ugen
freezestore Ugen
zcr Ugen
lms Ugen
sc Ugen
st Ugen
randscore = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Concat" [Ugen
control_, Ugen
source, Ugen
storesize, Ugen
seektime, Ugen
seekdur, Ugen
matchlength, Ugen
freezestore, Ugen
zcr, Ugen
lms, Ugen
sc, Ugen
st, Ugen
randscore] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Concatenative Cross-Synthesis on Live Streams

 Concat2 [AudioRate] control=0 source=0 storesize=1 seektime=1 seekdur=1 matchlength=0.05 freezestore=0 zcr=1 lms=1 sc=1 st=0 randscore=0 threshold=0.01
-}
concat2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
concat2 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
concat2 Rate
rate Ugen
control_ Ugen
source Ugen
storesize Ugen
seektime Ugen
seekdur Ugen
matchlength Ugen
freezestore Ugen
zcr Ugen
lms Ugen
sc Ugen
st Ugen
randscore Ugen
threshold = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Concat2" [Ugen
control_, Ugen
source, Ugen
storesize, Ugen
seektime, Ugen
seekdur, Ugen
matchlength, Ugen
freezestore, Ugen
zcr, Ugen
lms, Ugen
sc, Ugen
st, Ugen
randscore, Ugen
threshold] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | an amplitude tracking based onset detector

 Coyote [ControlRate] in=0 trackFall=0.2 slowLag=0.2 fastLag=0.01 fastMul=0.5 thresh=0.05 minDur=0.1
-}
coyote :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
coyote :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
coyote Rate
rate Ugen
in_ Ugen
trackFall Ugen
slowLag Ugen
fastLag Ugen
fastMul Ugen
thresh Ugen
minDur = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Coyote" [Ugen
in_, Ugen
trackFall, Ugen
slowLag, Ugen
fastLag, Ugen
fastMul, Ugen
thresh, Ugen
minDur] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Measure the temporal crest factor of a signal

 Crest [ControlRate] in=0 numsamps=400 gate=1
-}
crest :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
crest :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
crest Rate
rate Ugen
in_ Ugen
numsamps Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Crest" [Ugen
in_, Ugen
numsamps, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | class B/AB power amp distortion simulation

 CrossoverDistortion [AudioRate] in=0 amp=0.5 smooth=0.5;    FILTER: TRUE
-}
crossoverDistortion :: Ugen -> Ugen -> Ugen -> Ugen
crossoverDistortion :: Ugen -> Ugen -> Ugen -> Ugen
crossoverDistortion Ugen
in_ Ugen
amp Ugen
smooth = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"CrossoverDistortion" [Ugen
in_, Ugen
amp, Ugen
smooth] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 DCompressor [AudioRate] input=0 sidechainIn=0 sidechain=0 ratio=4 threshold=-40 attack=0.1 release=100.1 makeup=0.5 automakeup=1;    FILTER: TRUE
-}
dCompressor :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dCompressor :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dCompressor Ugen
input Ugen
sidechainIn Ugen
sidechain Ugen
ratio Ugen
threshold Ugen
attack Ugen
release Ugen
makeup Ugen
automakeup = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DCompressor" [Ugen
input, Ugen
sidechainIn, Ugen
sidechain, Ugen
ratio, Ugen
threshold, Ugen
attack, Ugen
release, Ugen
makeup, Ugen
automakeup] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Digitally modelled analog filter

 DFM1 [AudioRate] in=0 freq=1000 res=0.1 inputgain=1 type=0 noiselevel=0.0003;    FILTER: TRUE
-}
dfm1 :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dfm1 :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dfm1 Ugen
in_ Ugen
freq Ugen
res Ugen
inputgain Ugen
type_ Ugen
noiselevel = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DFM1" [Ugen
in_, Ugen
freq, Ugen
res, Ugen
inputgain, Ugen
type_, Ugen
noiselevel] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Demand rate implementation of a Wiard noise ring

 DNoiseRing [DemandRate] change=0.5 chance=0.5 shift=1 numBits=8 resetval=0;    DEMAND/NONDET
-}
dNoiseRingId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dNoiseRingId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dNoiseRingId a
z Ugen
change Ugen
chance Ugen
shift Ugen
numBits Ugen
resetval = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
DemandRate) String
"DNoiseRing" [Ugen
change, Ugen
chance, Ugen
shift, Ugen
numBits, Ugen
resetval] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of DNoiseRing.
dNoiseRingM :: Uid m => Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dNoiseRingM :: forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dNoiseRingM = (Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn5 Ugen Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e f.
Uid m =>
(Int -> Fn5 a b c d e f) -> Fn5 a b c d e (m f)
liftUid5 Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dNoiseRingId

-- | Unsafe variant of DNoiseRing.
dNoiseRing :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dNoiseRing :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dNoiseRing = (Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d e r.
(a -> b -> c -> d -> e -> IO r) -> a -> b -> c -> d -> e -> r
liftUnsafe5 Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dNoiseRingM

{- | Triangle via 3rd order differerentiated polynomial waveform

 DPW3Tri [AudioRate] freq=440
-}
dpw3Tri :: Rate -> Ugen -> Ugen
dpw3Tri :: Rate -> Ugen -> Ugen
dpw3Tri Rate
rate Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DPW3Tri" [Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sawtooth via 4th order differerentiated polynomial waveform

 DPW4Saw [AudioRate] freq=440
-}
dpw4Saw :: Rate -> Ugen -> Ugen
dpw4Saw :: Rate -> Ugen -> Ugen
dpw4Saw Rate
rate Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DPW4Saw" [Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGBowed [AudioRate] freq=440 velb=0.5 force=1 gate=1 pos=0.14 release=0.1 c1=1 c3=3 impZ=0.55 fB=2
-}
dwgBowed :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgBowed :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgBowed Rate
rate Ugen
freq Ugen
velb Ugen
force Ugen
gate_ Ugen
pos Ugen
release Ugen
c1 Ugen
c3 Ugen
impZ Ugen
fB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGBowed" [Ugen
freq, Ugen
velb, Ugen
force, Ugen
gate_, Ugen
pos, Ugen
release, Ugen
c1, Ugen
c3, Ugen
impZ, Ugen
fB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGBowedSimple [AudioRate] freq=440 velb=0.5 force=1 gate=1 pos=0.14 release=0.1 c1=1 c3=30
-}
dwgBowedSimple :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgBowedSimple :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgBowedSimple Rate
rate Ugen
freq Ugen
velb Ugen
force Ugen
gate_ Ugen
pos Ugen
release Ugen
c1 Ugen
c3 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGBowedSimple" [Ugen
freq, Ugen
velb, Ugen
force, Ugen
gate_, Ugen
pos, Ugen
release, Ugen
c1, Ugen
c3] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGBowedTor [AudioRate] freq=440 velb=0.5 force=1 gate=1 pos=0.14 release=0.1 c1=1 c3=3 impZ=0.55 fB=2 mistune=5.2 c1tor=1 c3tor=3000 iZtor=1.8
-}
dwgBowedTor :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgBowedTor :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgBowedTor Rate
rate Ugen
freq Ugen
velb Ugen
force Ugen
gate_ Ugen
pos Ugen
release Ugen
c1 Ugen
c3 Ugen
impZ Ugen
fB Ugen
mistune Ugen
c1tor Ugen
c3tor Ugen
iZtor = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGBowedTor" [Ugen
freq, Ugen
velb, Ugen
force, Ugen
gate_, Ugen
pos, Ugen
release, Ugen
c1, Ugen
c3, Ugen
impZ, Ugen
fB, Ugen
mistune, Ugen
c1tor, Ugen
c3tor, Ugen
iZtor] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Clarinet physical model.

 DWGClarinet3 [AudioRate] freq=440.0 pm=1.0 pc=1.0 m=0.8 gate=1.0 release=1.0e-2 c1=0.25 c3=7.0
-}
dwgClarinet3 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgClarinet3 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgClarinet3 Rate
rate Ugen
freq Ugen
pm Ugen
pc Ugen
m Ugen
gate_ Ugen
release Ugen
c1 Ugen
c3 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGClarinet3" [Ugen
freq, Ugen
pm, Ugen
pc, Ugen
m, Ugen
gate_, Ugen
release, Ugen
c1, Ugen
c3] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Reimplementation of STK flute model.

 DWGFlute [AudioRate] freq=400.0 pm=1.0 endr=0.5 jetr=0.25 jetRa=0.33 gate=1.0 release=0.1
-}
dwgFlute :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgFlute :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgFlute Rate
rate Ugen
freq Ugen
pm Ugen
endr Ugen
jetr Ugen
jetRa Ugen
gate_ Ugen
release = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGFlute" [Ugen
freq, Ugen
pm, Ugen
endr, Ugen
jetr, Ugen
jetRa, Ugen
gate_, Ugen
release] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGPlucked [AudioRate] freq=440 amp=0.5 gate=1 pos=0.14 c1=1 c3=30 inp=0 release=0.1
-}
dwgPlucked :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgPlucked :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgPlucked Rate
rate Ugen
freq Ugen
amp Ugen
gate_ Ugen
pos Ugen
c1 Ugen
c3 Ugen
inp Ugen
release = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGPlucked" [Ugen
freq, Ugen
amp, Ugen
gate_, Ugen
pos, Ugen
c1, Ugen
c3, Ugen
inp, Ugen
release] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGPlucked2 [AudioRate] freq=440 amp=0.5 gate=1 pos=0.14 c1=1 c3=30 inp=0 release=0.1 mistune=1.008 mp=0.55 gc=0.01
-}
dwgPlucked2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgPlucked2 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgPlucked2 Rate
rate Ugen
freq Ugen
amp Ugen
gate_ Ugen
pos Ugen
c1 Ugen
c3 Ugen
inp Ugen
release Ugen
mistune Ugen
mp Ugen
gc = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGPlucked2" [Ugen
freq, Ugen
amp, Ugen
gate_, Ugen
pos, Ugen
c1, Ugen
c3, Ugen
inp, Ugen
release, Ugen
mistune, Ugen
mp, Ugen
gc] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plucked physical model.

 DWGPluckedStiff [AudioRate] freq=440 amp=0.5 gate=1 pos=0.14 c1=1 c3=30 inp=0 release=0.1 fB=2
-}
dwgPluckedStiff :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgPluckedStiff :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgPluckedStiff Rate
rate Ugen
freq Ugen
amp Ugen
gate_ Ugen
pos Ugen
c1 Ugen
c3 Ugen
inp Ugen
release Ugen
fB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DWGPluckedStiff" [Ugen
freq, Ugen
amp, Ugen
gate_, Ugen
pos, Ugen
c1, Ugen
c3, Ugen
inp, Ugen
release, Ugen
fB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 DWGSoundBoard [AudioRate] inp=0 c1=20 c3=20 mix=0.8 d1=199 d2=211 d3=223 d4=227 d5=229 d6=233 d7=239 d8=241;    FILTER: TRUE
-}
dwgSoundBoard :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dwgSoundBoard :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dwgSoundBoard Ugen
inp Ugen
c1 Ugen
c3 Ugen
mix Ugen
d1 Ugen
d2 Ugen
d3 Ugen
d4 Ugen
d5 Ugen
d6 Ugen
d7 Ugen
d8 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DWGSoundBoard" [Ugen
inp, Ugen
c1, Ugen
c3, Ugen
mix, Ugen
d1, Ugen
d2, Ugen
d3, Ugen
d4, Ugen
d5, Ugen
d6, Ugen
d7, Ugen
d8] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | demand rate brownian movement with Gendyn distributions

 Dbrown2 [] lo=0 hi=0 step=0 dist=0 length=100000000
-}
dbrown2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbrown2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbrown2 Rate
rate Ugen
lo Ugen
hi Ugen
step Ugen
dist Ugen
length_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Dbrown2" [Ugen
lo, Ugen
hi, Ugen
step, Ugen
dist, Ugen
length_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | demand rate tag system on a buffer

 DbufTag [DemandRate] bufnum=0 v=0 axiom=0 rules=0 recycle=0 mode=0;    DEMAND/NONDET
-}
dbufTagId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbufTagId :: forall a.
ID a =>
a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbufTagId a
z Ugen
bufnum Ugen
v Ugen
axiom Ugen
rules Ugen
recycle Ugen
mode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
DemandRate) String
"DbufTag" [Ugen
bufnum, Ugen
v, Ugen
axiom, Ugen
rules, Ugen
recycle, Ugen
mode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of DbufTag.
dbufTagM :: Uid m => Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dbufTagM :: forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dbufTagM = (Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn6 Ugen Ugen Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e f g.
Uid m =>
(Int -> Fn6 a b c d e f g) -> Fn6 a b c d e f (m g)
liftUid6 Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a.
ID a =>
a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbufTagId

-- | Unsafe variant of DbufTag.
dbufTag :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbufTag :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dbufTag = (Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d e f r.
(a -> b -> c -> d -> e -> f -> IO r)
-> a -> b -> c -> d -> e -> f -> r
liftUnsafe6 Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dbufTagM

{- | Samplerate and bitrate reduction

 Decimator [AudioRate] in=0 rate=44100 bits=24
-}
decimator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
decimator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
decimator Rate
rate Ugen
in_ Ugen
rate_ Ugen
bits = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Decimator" [Ugen
in_, Ugen
rate_, Ugen
bits] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Demand version of the BetaBlocker VChip

 DetaBlockerBuf [DemandRate] bufnum=0 startpoint=0;    DEMAND/NONDET
-}
detaBlockerBufId :: ID a => a -> Ugen -> Ugen -> Ugen
detaBlockerBufId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen
detaBlockerBufId a
z Ugen
bufnum Ugen
startpoint = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
DemandRate) String
"DetaBlockerBuf" [Ugen
bufnum, Ugen
startpoint] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of DetaBlockerBuf.
detaBlockerBufM :: Uid m => Ugen -> Ugen -> m Ugen
detaBlockerBufM :: forall (m :: * -> *). Uid m => Ugen -> Ugen -> m Ugen
detaBlockerBufM = (Int -> Ugen -> Ugen -> Ugen) -> Fn2 Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c.
Uid m =>
(Int -> Fn2 a b c) -> Fn2 a b (m c)
liftUid2 Int -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen
detaBlockerBufId

-- | Unsafe variant of DetaBlockerBuf.
detaBlockerBuf :: Ugen -> Ugen -> Ugen
detaBlockerBuf :: Ugen -> Ugen -> Ugen
detaBlockerBuf = (Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen
forall a b r. (a -> b -> IO r) -> a -> b -> r
liftUnsafe2 Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Ugen -> Ugen -> m Ugen
detaBlockerBufM

{- | demand rate finite state machine

 Dfsm [DemandRate] rules=0 n=1 rgen=0;    DEMAND/NONDET
-}
dfsmId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
dfsmId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
dfsmId a
z Ugen
rules Ugen
n Ugen
rgen = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
DemandRate) String
"Dfsm" [Ugen
rules, Ugen
n, Ugen
rgen] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of Dfsm.
dfsmM :: Uid m => Ugen -> Ugen -> Ugen -> m Ugen
dfsmM :: forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
dfsmM = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
dfsmId

-- | Unsafe variant of Dfsm.
dfsm :: Ugen -> Ugen -> Ugen -> Ugen
dfsm :: Ugen -> Ugen -> Ugen -> Ugen
dfsm = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
dfsmM

{- | (Undocumented class)

 Dgauss [] lo=0 hi=0 length=100000000
-}
dgauss :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
dgauss :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
dgauss Rate
rate Ugen
lo Ugen
hi Ugen
length_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Dgauss" [Ugen
lo, Ugen
hi, Ugen
length_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Ring modulation based on the physical model of a diode.

 DiodeRingMod [AudioRate] car=0 mod=0;    FILTER: TRUE
-}
diodeRingMod :: Ugen -> Ugen -> Ugen
diodeRingMod :: Ugen -> Ugen -> Ugen
diodeRingMod Ugen
car Ugen
mod_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DiodeRingMod" [Ugen
car, Ugen
mod_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | port of some ladspa plugins

 Disintegrator [AudioRate] in=0 probability=0.5 multiplier=0;    FILTER: TRUE, NONDET
-}
disintegratorId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
disintegratorId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
disintegratorId a
z Ugen
in_ Ugen
probability Ugen
multiplier = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Disintegrator" [Ugen
in_, Ugen
probability, Ugen
multiplier] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of Disintegrator.
disintegratorM :: Uid m => Ugen -> Ugen -> Ugen -> m Ugen
disintegratorM :: forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
disintegratorM = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
disintegratorId

-- | Unsafe variant of Disintegrator.
disintegrator :: Ugen -> Ugen -> Ugen -> Ugen
disintegrator :: Ugen -> Ugen -> Ugen -> Ugen
disintegrator = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
disintegratorM

{- | discrete time neurodynamics

 Dneuromodule [ControlRate,AudioRate,DemandRate] dt=0 *theta=0 *x=0 *weights=0;    MCE=3, NC INPUT: True, NONDET
-}
dneuromoduleId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dneuromoduleId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dneuromoduleId Int
numChannels a
z Ugen
dt Ugen
theta Ugen
x Ugen
weights = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
DemandRate) String
"Dneuromodule" [Ugen
dt] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
theta, Ugen
x, Ugen
weights]) Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of Dneuromodule.
dneuromoduleM :: Uid m => Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dneuromoduleM :: forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dneuromoduleM = (Int -> Fn5 Int Ugen Ugen Ugen Ugen Ugen)
-> Fn5 Int Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e f.
Uid m =>
(Int -> Fn5 a b c d e f) -> Fn5 a b c d e (m f)
liftUid5 Int -> Fn5 Int Ugen Ugen Ugen Ugen Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dneuromoduleId

-- | Unsafe variant of Dneuromodule.
dneuromodule :: Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dneuromodule :: Fn5 Int Ugen Ugen Ugen Ugen Ugen
dneuromodule = (Int -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Fn5 Int Ugen Ugen Ugen Ugen Ugen
forall a b c d e r.
(a -> b -> c -> d -> e -> IO r) -> a -> b -> c -> d -> e -> r
liftUnsafe5 Int -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
dneuromoduleM

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 DoubleNestedAllpassC [AudioRate] in=0 maxdelay1=0.0047 delay1=0.0047 gain1=0.15 maxdelay2=0.022 delay2=0.022 gain2=0.25 maxdelay3=0.0083 delay3=0.0083 gain3=0.3;    FILTER: TRUE
-}
doubleNestedAllpassC :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleNestedAllpassC :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
doubleNestedAllpassC Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 Ugen
maxdelay3 Ugen
delay3 Ugen
gain3 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DoubleNestedAllpassC" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2, Ugen
maxdelay3, Ugen
delay3, Ugen
gain3] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 DoubleNestedAllpassL [AudioRate] in=0 maxdelay1=0.0047 delay1=0.0047 gain1=0.15 maxdelay2=0.022 delay2=0.022 gain2=0.25 maxdelay3=0.0083 delay3=0.0083 gain3=0.3;    FILTER: TRUE
-}
doubleNestedAllpassL :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleNestedAllpassL :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
doubleNestedAllpassL Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 Ugen
maxdelay3 Ugen
delay3 Ugen
gain3 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DoubleNestedAllpassL" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2, Ugen
maxdelay3, Ugen
delay3, Ugen
gain3] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 DoubleNestedAllpassN [AudioRate] in=0 maxdelay1=0.0047 delay1=0.0047 gain1=0.15 maxdelay2=0.022 delay2=0.022 gain2=0.25 maxdelay3=0.0083 delay3=0.0083 gain3=0.3;    FILTER: TRUE
-}
doubleNestedAllpassN :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleNestedAllpassN :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
doubleNestedAllpassN Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 Ugen
maxdelay3 Ugen
delay3 Ugen
gain3 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"DoubleNestedAllpassN" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2, Ugen
maxdelay3, Ugen
delay3, Ugen
gain3] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Forced DoubleWell Oscillator

 DoubleWell [AudioRate] reset=0 ratex=0.01 ratey=0.01 f=1 w=0.001 delta=1 initx=0 inity=0
-}
doubleWell :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleWell :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
doubleWell Rate
rate Ugen
reset Ugen
ratex Ugen
ratey Ugen
f Ugen
w Ugen
delta Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DoubleWell" [Ugen
reset, Ugen
ratex, Ugen
ratey, Ugen
f, Ugen
w, Ugen
delta, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Forced DoubleWell Oscillator

 DoubleWell2 [AudioRate] reset=0 ratex=0.01 ratey=0.01 f=1 w=0.001 delta=1 initx=0 inity=0
-}
doubleWell2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleWell2 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
doubleWell2 Rate
rate Ugen
reset Ugen
ratex Ugen
ratey Ugen
f Ugen
w Ugen
delta Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DoubleWell2" [Ugen
reset, Ugen
ratex, Ugen
ratey, Ugen
f, Ugen
w, Ugen
delta, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Forced DoubleWell Oscillator

 DoubleWell3 [AudioRate] reset=0 rate=0.01 f=0 delta=0.25 initx=0 inity=0
-}
doubleWell3 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleWell3 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
doubleWell3 Rate
rate Ugen
reset Ugen
rate_ Ugen
f Ugen
delta Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DoubleWell3" [Ugen
reset, Ugen
rate_, Ugen
f, Ugen
delta, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 DriveNoise [AudioRate] in=0 amount=1 multi=5
-}
driveNoise :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
driveNoise :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
driveNoise Rate
rate Ugen
in_ Ugen
amount Ugen
multi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DriveNoise" [Ugen
in_, Ugen
amount, Ugen
multi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Crosscorrelation search and drum pattern matching beat tracker

 DrumTrack [ControlRate] in=0 lock=0 dynleak=0 tempowt=0 phasewt=0 basswt=0 patternwt=1 prior=0 kicksensitivity=1 snaresensitivity=1 debugmode=0
-}
drumTrack :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
drumTrack :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
drumTrack Rate
rate Ugen
in_ Ugen
lock Ugen
dynleak Ugen
tempowt Ugen
phasewt Ugen
basswt Ugen
patternwt Ugen
prior Ugen
kicksensitivity Ugen
snaresensitivity Ugen
debugmode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DrumTrack" [Ugen
in_, Ugen
lock, Ugen
dynleak, Ugen
tempowt, Ugen
phasewt, Ugen
basswt, Ugen
patternwt, Ugen
prior, Ugen
kicksensitivity, Ugen
snaresensitivity, Ugen
debugmode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | demand rate tag system

 Dtag [] bufsize=0 v=0 axiom=0 rules=0 recycle=0 mode=0
-}
dtag :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dtag :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dtag Rate
rate Ugen
bufsize Ugen
v Ugen
axiom Ugen
rules Ugen
recycle Ugen
mode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Dtag" [Ugen
bufsize, Ugen
v, Ugen
axiom, Ugen
rules, Ugen
recycle, Ugen
mode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Envelope Follower Filter

 EnvDetect [AudioRate] in=0 attack=100 release=0
-}
envDetect :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
envDetect :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
envDetect Rate
rate Ugen
in_ Ugen
attack Ugen
release = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"EnvDetect" [Ugen
in_, Ugen
attack, Ugen
release] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Envelope Follower

 EnvFollow [ControlRate,AudioRate] input=0 decaycoeff=0.99
-}
envFollow :: Rate -> Ugen -> Ugen -> Ugen
envFollow :: Rate -> Ugen -> Ugen -> Ugen
envFollow Rate
rate Ugen
input Ugen
decaycoeff = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"EnvFollow" [Ugen
input, Ugen
decaycoeff] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTComplexDev [ControlRate] buffer=0 rectify=0 powthresh=0.1
-}
fftComplexDev :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftComplexDev :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftComplexDev Rate
rate Ugen
buffer Ugen
rectify Ugen
powthresh = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTComplexDev" [Ugen
buffer, Ugen
rectify, Ugen
powthresh] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral crest measure

 FFTCrest [ControlRate] buffer=0 freqlo=0 freqhi=50000
-}
fftCrest :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftCrest :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftCrest Rate
rate Ugen
buffer Ugen
freqlo Ugen
freqhi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTCrest" [Ugen
buffer, Ugen
freqlo, Ugen
freqhi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTDiffMags [ControlRate] bufferA=0 bufferB=0
-}
fftDiffMags :: Rate -> Ugen -> Ugen -> Ugen
fftDiffMags :: Rate -> Ugen -> Ugen -> Ugen
fftDiffMags Rate
rate Ugen
bufferA Ugen
bufferB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTDiffMags" [Ugen
bufferA, Ugen
bufferB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTFlux [ControlRate] buffer=0 normalise=1
-}
fftFlux :: Rate -> Ugen -> Ugen -> Ugen
fftFlux :: Rate -> Ugen -> Ugen -> Ugen
fftFlux Rate
rate Ugen
buffer Ugen
normalise = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTFlux" [Ugen
buffer, Ugen
normalise] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTFluxPos [ControlRate] buffer=0 normalise=1
-}
fftFluxPos :: Rate -> Ugen -> Ugen -> Ugen
fftFluxPos :: Rate -> Ugen -> Ugen -> Ugen
fftFluxPos Rate
rate Ugen
buffer Ugen
normalise = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTFluxPos" [Ugen
buffer, Ugen
normalise] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTMKL [ControlRate] buffer=0 epsilon=0.0
-}
fftmkl :: Rate -> Ugen -> Ugen -> Ugen
fftmkl :: Rate -> Ugen -> Ugen -> Ugen
fftmkl Rate
rate Ugen
buffer Ugen
epsilon = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTMKL" [Ugen
buffer, Ugen
epsilon] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Find peak value in an FFT frame

 FFTPeak [ControlRate] buffer=0 freqlo=0 freqhi=50000
-}
fftPeak :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftPeak :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftPeak Rate
rate Ugen
buffer Ugen
freqlo Ugen
freqhi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTPeak" [Ugen
buffer, Ugen
freqlo, Ugen
freqhi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTPhaseDev [ControlRate] buffer=0 weight=0 powthresh=0.1
-}
fftPhaseDev :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftPhaseDev :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftPhaseDev Rate
rate Ugen
buffer Ugen
weight Ugen
powthresh = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTPhaseDev" [Ugen
buffer, Ugen
weight, Ugen
powthresh] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Instantaneous spectral power

 FFTPower [ControlRate] buffer=0 square=1
-}
fftPower :: Rate -> Ugen -> Ugen -> Ugen
fftPower :: Rate -> Ugen -> Ugen -> Ugen
fftPower Rate
rate Ugen
buffer Ugen
square = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTPower" [Ugen
buffer, Ugen
square] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral slope

 FFTSlope [ControlRate] buffer=0
-}
fftSlope :: Rate -> Ugen -> Ugen
fftSlope :: Rate -> Ugen -> Ugen
fftSlope Rate
rate Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTSlope" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral spread

 FFTSpread [ControlRate] buffer=0 centroid=0
-}
fftSpread :: Rate -> Ugen -> Ugen -> Ugen
fftSpread :: Rate -> Ugen -> Ugen -> Ugen
fftSpread Rate
rate Ugen
buffer Ugen
centroid = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTSpread" [Ugen
buffer, Ugen
centroid] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral flatness, divided into subbands

 FFTSubbandFlatness [ControlRate] chain=0 cutfreqs=0
-}
fftSubbandFlatness :: Rate -> Ugen -> Ugen -> Ugen
fftSubbandFlatness :: Rate -> Ugen -> Ugen -> Ugen
fftSubbandFlatness Rate
rate Ugen
chain Ugen
cutfreqs = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTSubbandFlatness" [Ugen
chain, Ugen
cutfreqs] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FFTSubbandFlux [ControlRate] chain=0 cutfreqs=0 posonly=0
-}
fftSubbandFlux :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftSubbandFlux :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
fftSubbandFlux Rate
rate Ugen
chain Ugen
cutfreqs Ugen
posonly = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTSubbandFlux" [Ugen
chain, Ugen
cutfreqs, Ugen
posonly] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral power, divided into subbands

 FFTSubbandPower [ControlRate] chain=0 cutfreqs=0 square=1 scalemode=1
-}
fftSubbandPower :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fftSubbandPower :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fftSubbandPower Rate
rate Ugen
chain Ugen
cutfreqs Ugen
square Ugen
scalemode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FFTSubbandPower" [Ugen
chain, Ugen
cutfreqs, Ugen
square, Ugen
scalemode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Phase modulation oscillator matrix.

 FM7 [AudioRate] *ctlMatrix=0 *modMatrix=0;    MCE=2
-}
fm7 :: Rate -> Ugen -> Ugen -> Ugen
fm7 :: Rate -> Ugen -> Ugen -> Ugen
fm7 Rate
rate Ugen
ctlMatrix Ugen
modMatrix = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FM7" [] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
ctlMatrix, Ugen
modMatrix]) Int
6 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with FM grains

 FMGrain [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1;    FILTER: TRUE
-}
fmGrain :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrain :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrain Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"FMGrain" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with FM grains and user supplied envelope

 FMGrainB [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1 envbuf=0;    FILTER: TRUE
-}
fmGrainB :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainB :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainB Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
envbuf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"FMGrainB" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
envbuf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FMGrainBBF [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1 envbuf=0 azimuth=0 elevation=0 rho=1 wComp=0
-}
fmGrainBBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainBBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fmGrainBBF Rate
rate Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
envbuf Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMGrainBBF" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
envbuf, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FMGrainBF [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1 azimuth=0 elevation=0 rho=1 wComp=0
-}
fmGrainBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fmGrainBF Rate
rate Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMGrainBF" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with FM grains and user supplied envelopes

 FMGrainI [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1 envbuf1=0 envbuf2=0 ifac=0.5
-}
fmGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainI :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fmGrainI Rate
rate Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMGrainI" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FMGrainIBF [AudioRate] trigger=0 dur=1 carfreq=440 modfreq=200 index=1 envbuf1=0 envbuf2=0 ifac=0.5 azimuth=0 elevation=0 rho=1 wComp=0
-}
fmGrainIBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmGrainIBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fmGrainIBF Rate
rate Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMGrainIBF" [Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Decode an FMH signal for a specific speaker

 FMHDecode1 [AudioRate] w=0 x=0 y=0 z=0 r=0 s=0 t=0 u=0 v=0 azimuth=0 elevation=0
-}
fmhDecode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhDecode1 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fmhDecode1 Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
r Ugen
s Ugen
t Ugen
u Ugen
v Ugen
azimuth Ugen
elevation = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMHDecode1" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
r, Ugen
s, Ugen
t, Ugen
u, Ugen
v, Ugen
azimuth, Ugen
elevation] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FMHEncode0 [AudioRate] in=0 azimuth=0 elevation=0 gain=1
-}
fmhEncode0 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode0 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode0 Rate
rate Ugen
in_ Ugen
azimuth Ugen
elevation Ugen
gain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMHEncode0" [Ugen
in_, Ugen
azimuth, Ugen
elevation, Ugen
gain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
9 (Int -> Special
Special Int
0) UgenId
NoId

{- | Second Order Ambisonic encoder

 FMHEncode1 [AudioRate] in=0 azimuth=0 elevation=0 rho=1 gain=1 wComp=0
-}
fmhEncode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode1 Rate
rate Ugen
in_ Ugen
azimuth Ugen
elevation Ugen
rho Ugen
gain Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMHEncode1" [Ugen
in_, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
gain, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
9 (Int -> Special
Special Int
0) UgenId
NoId

{- | Second Order Ambisonic encoder

 FMHEncode2 [AudioRate] in=0 point_x=0 point_y=0 elevation=0 gain=1 wComp=0
-}
fmhEncode2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fmhEncode2 Rate
rate Ugen
in_ Ugen
point_x Ugen
point_y Ugen
elevation Ugen
gain Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FMHEncode2" [Ugen
in_, Ugen
point_x, Ugen
point_y, Ugen
elevation, Ugen
gain, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
9 (Int -> Special
Special Int
0) UgenId
NoId

{- | Storing feature data from Ugens in NRT mode

 FeatureSave [ControlRate] features=0 trig=0
-}
featureSave :: Rate -> Ugen -> Ugen -> Ugen
featureSave :: Rate -> Ugen -> Ugen -> Ugen
featureSave Rate
rate Ugen
features Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FeatureSave" [Ugen
features, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | FitzHughNagumo Neuron Firing Oscillator

 Fhn2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 urate=0.1 wrate=0.1 b0=0.6 b1=0.8 i=0 u0=0 w0=0
-}
fhn2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fhn2DC :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fhn2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
urate Ugen
wrate Ugen
b0 Ugen
b1 Ugen
i Ugen
u0 Ugen
w0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Fhn2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
urate, Ugen
wrate, Ugen
b0, Ugen
b1, Ugen
i, Ugen
u0, Ugen
w0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | FitzHughNagumo Neuron Firing Oscillator

 Fhn2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 urate=0.1 wrate=0.1 b0=0.6 b1=0.8 i=0 u0=0 w0=0
-}
fhn2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fhn2DL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fhn2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
urate Ugen
wrate Ugen
b0 Ugen
b1 Ugen
i Ugen
u0 Ugen
w0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Fhn2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
urate, Ugen
wrate, Ugen
b0, Ugen
b1, Ugen
i, Ugen
u0, Ugen
w0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | FitzHughNagumo Neuron Firing Oscillator

 Fhn2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 urate=0.1 wrate=0.1 b0=0.6 b1=0.8 i=0 u0=0 w0=0
-}
fhn2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fhn2DN :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fhn2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
urate Ugen
wrate Ugen
b0 Ugen
b1 Ugen
i Ugen
u0 Ugen
w0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Fhn2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
urate, Ugen
wrate, Ugen
b0, Ugen
b1, Ugen
i, Ugen
u0, Ugen
w0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FhnTrig [ControlRate,AudioRate] minfreq=4 maxfreq=10 urate=0.1 wrate=0.1 b0=0.6 b1=0.8 i=0 u0=0 w0=0
-}
fhnTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fhnTrig :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
fhnTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
urate Ugen
wrate Ugen
b0 Ugen
b1 Ugen
i Ugen
u0 Ugen
w0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FhnTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
urate, Ugen
wrate, Ugen
b0, Ugen
b1, Ugen
i, Ugen
u0, Ugen
w0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FincoSprottL [AudioRate] freq=22050 a=2.45 h=0.05 xi=0 yi=0 zi=0
-}
fincoSprottL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottL Rate
rate Ugen
freq Ugen
a Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FincoSprottL" [Ugen
freq, Ugen
a, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FincoSprottM [AudioRate] freq=22050 a=-7 b=4 h=0.05 xi=0 yi=0 zi=0
-}
fincoSprottM :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottM :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottM Rate
rate Ugen
freq Ugen
a Ugen
b Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FincoSprottM" [Ugen
freq, Ugen
a, Ugen
b, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 FincoSprottS [AudioRate] freq=22050 a=8 b=2 h=0.05 xi=0 yi=0 zi=0
-}
fincoSprottS :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottS :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fincoSprottS Rate
rate Ugen
freq Ugen
a Ugen
b Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FincoSprottS" [Ugen
freq, Ugen
a, Ugen
b, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | Neuron Firing Model Oscillator

 FitzHughNagumo [AudioRate] reset=0 rateu=0.01 ratew=0.01 b0=1 b1=1 initu=0 initw=0
-}
fitzHughNagumo :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fitzHughNagumo :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
fitzHughNagumo Rate
rate Ugen
reset Ugen
rateu Ugen
ratew Ugen
b0 Ugen
b1 Ugen
initu Ugen
initw = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FitzHughNagumo" [Ugen
reset, Ugen
rateu, Ugen
ratew, Ugen
b0, Ugen
b1, Ugen
initu, Ugen
initw] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | calculates spectral MSE distance of two fft chains

 FrameCompare [ControlRate] buffer1=0 buffer2=0 wAmount=0.5
-}
frameCompare :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
frameCompare :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
frameCompare Rate
rate Ugen
buffer1 Ugen
buffer2 Ugen
wAmount = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"FrameCompare" [Ugen
buffer1, Ugen
buffer2, Ugen
wAmount] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | A physical model of a system with dry-friction. A chaotic filter.

 Friction [ControlRate,AudioRate] in=0 friction=0.5 spring=0.414 damp=0.313 mass=0.1 beltmass=1
-}
friction :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
friction :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
friction Rate
rate Ugen
in_ Ugen
friction_ Ugen
spring_ Ugen
damp Ugen
mass Ugen
beltmass = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Friction" [Ugen
in_, Ugen
friction_, Ugen
spring_, Ugen
damp, Ugen
mass, Ugen
beltmass] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Single gammatone filter

 Gammatone [AudioRate] input=0 centrefrequency=440 bandwidth=200;    FILTER: TRUE
-}
gammatone :: Ugen -> Ugen -> Ugen -> Ugen
gammatone :: Ugen -> Ugen -> Ugen -> Ugen
gammatone Ugen
input Ugen
centrefrequency Ugen
bandwidth = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Gammatone" [Ugen
input, Ugen
centrefrequency, Ugen
bandwidth] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Gaussian classifier

 GaussClass [ControlRate] in=0 bufnum=0 gate=0
-}
gaussClass :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
gaussClass :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
gaussClass Rate
rate Ugen
in_ Ugen
bufnum Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GaussClass" [Ugen
in_, Ugen
bufnum, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | impulses around a certain frequency

 GaussTrig [ControlRate,AudioRate] freq=440 dev=0.3
-}
gaussTrig :: Rate -> Ugen -> Ugen -> Ugen
gaussTrig :: Rate -> Ugen -> Ugen -> Ugen
gaussTrig Rate
rate Ugen
freq Ugen
dev = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GaussTrig" [Ugen
freq, Ugen
dev] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | gingerbreadman map 2D chaotic generator

 Gbman2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 x0=1.2 y0=2.1
-}
gbman2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Gbman2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | gingerbreadman map 2D chaotic generator

 Gbman2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 x0=1.2 y0=2.1
-}
gbman2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Gbman2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | gingerbreadman map 2D chaotic generator

 Gbman2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 x0=1.2 y0=2.1
-}
gbman2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbman2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Gbman2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 GbmanTrig [ControlRate,AudioRate] minfreq=5 maxfreq=10 x0=1.2 y0=2.1
-}
gbmanTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbmanTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gbmanTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GbmanTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Dynamic stochastic synthesis generator

 Gendy4 [ControlRate,AudioRate] ampdist=1 durdist=1 adparam=1 ddparam=1 minfreq=440 maxfreq=660 ampscale=0.5 durscale=0.5 initCPs=12 knum=0
-}
gendy4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gendy4 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
gendy4 Rate
rate Ugen
ampdist Ugen
durdist Ugen
adparam Ugen
ddparam Ugen
minfreq Ugen
maxfreq Ugen
ampscale Ugen
durscale Ugen
initCPs Ugen
knum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Gendy4" [Ugen
ampdist, Ugen
durdist, Ugen
adparam, Ugen
ddparam, Ugen
minfreq, Ugen
maxfreq, Ugen
ampscale, Ugen
durscale, Ugen
initCPs, Ugen
knum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Dynamic stochastic synthesis generator

 Gendy5 [ControlRate,AudioRate] ampdist=1 durdist=1 adparam=1 ddparam=1 minfreq=440 maxfreq=660 ampscale=0.5 durscale=0.5 initCPs=12 knum=0
-}
gendy5 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gendy5 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
gendy5 Rate
rate Ugen
ampdist Ugen
durdist Ugen
adparam Ugen
ddparam Ugen
minfreq Ugen
maxfreq Ugen
ampscale Ugen
durscale Ugen
initCPs Ugen
knum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Gendy5" [Ugen
ampdist, Ugen
durdist, Ugen
adparam, Ugen
ddparam, Ugen
minfreq, Ugen
maxfreq, Ugen
ampscale, Ugen
durscale, Ugen
initCPs, Ugen
knum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Read (numeric) shell environment variables into a synth

 Getenv [] key=0 defaultval=0
-}
getenv :: Rate -> Ugen -> Ugen -> Ugen
getenv :: Rate -> Ugen -> Ugen -> Ugen
getenv Rate
rate Ugen
key Ugen
defaultval = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Getenv" [Ugen
key, Ugen
defaultval] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | backward compatibility

 GlitchBPF [ControlRate,AudioRate] in=0 freq=440 rq=1
-}
glitchBPF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
glitchBPF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
glitchBPF Rate
rate Ugen
in_ Ugen
freq Ugen
rq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GlitchBPF" [Ugen
in_, Ugen
freq, Ugen
rq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | backward compatibility

 GlitchBRF [ControlRate,AudioRate] in=0 freq=440 rq=1
-}
glitchBRF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
glitchBRF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
glitchBRF Rate
rate Ugen
in_ Ugen
freq Ugen
rq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GlitchBRF" [Ugen
in_, Ugen
freq, Ugen
rq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | backward compatibility

 GlitchHPF [ControlRate,AudioRate] in=0 freq=440
-}
glitchHPF :: Rate -> Ugen -> Ugen -> Ugen
glitchHPF :: Rate -> Ugen -> Ugen -> Ugen
glitchHPF Rate
rate Ugen
in_ Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GlitchHPF" [Ugen
in_, Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | backward compatibility

 GlitchRHPF [ControlRate,AudioRate] in=0 freq=440 rq=1;    FILTER: TRUE
-}
glitchRHPF :: Ugen -> Ugen -> Ugen -> Ugen
glitchRHPF :: Ugen -> Ugen -> Ugen -> Ugen
glitchRHPF Ugen
in_ Ugen
freq Ugen
rq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"GlitchRHPF" [Ugen
in_, Ugen
freq, Ugen
rq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Calculate a single DFT bin, to detect presence of a frequency

 Goertzel [ControlRate] in=0 bufsize=1024 freq=0 hop=1
-}
goertzel :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
goertzel :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
goertzel Rate
rate Ugen
in_ Ugen
bufsize Ugen
freq Ugen
hop = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Goertzel" [Ugen
in_, Ugen
bufsize, Ugen
freq, Ugen
hop] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 GrainBufJ [AudioRate] numChannels=1 trigger=0 dur=1 sndbuf=0 rate=1 pos=0 loop=0 interp=2 grainAmp=1 pan=0 envbufnum=-1 maxGrains=512
-}
grainBufJ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
grainBufJ :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
grainBufJ Rate
rate Ugen
numChannels Ugen
trigger Ugen
dur Ugen
sndbuf Ugen
rate_ Ugen
pos Ugen
loop Ugen
interp Ugen
grainAmp Ugen
pan Ugen
envbufnum Ugen
maxGrains = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GrainBufJ" [Ugen
numChannels, Ugen
trigger, Ugen
dur, Ugen
sndbuf, Ugen
rate_, Ugen
pos, Ugen
loop, Ugen
interp, Ugen
grainAmp, Ugen
pan, Ugen
envbufnum, Ugen
maxGrains] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 GrainFMJ [AudioRate] numChannels=1 trigger=0 dur=1 carfreq=440 modfreq=200 index=1 grainAmp=1 pan=0 envbufnum=-1 maxGrains=512
-}
grainFMJ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
grainFMJ :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
grainFMJ Rate
rate Ugen
numChannels Ugen
trigger Ugen
dur Ugen
carfreq Ugen
modfreq Ugen
index_ Ugen
grainAmp Ugen
pan Ugen
envbufnum Ugen
maxGrains = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GrainFMJ" [Ugen
numChannels, Ugen
trigger, Ugen
dur, Ugen
carfreq, Ugen
modfreq, Ugen
index_, Ugen
grainAmp, Ugen
pan, Ugen
envbufnum, Ugen
maxGrains] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 GrainInJ [AudioRate] numChannels=1 trigger=0 dur=1 in=0 grainAmp=1 pan=0 envbufnum=-1 maxGrains=512
-}
grainInJ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
grainInJ :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
grainInJ Rate
rate Ugen
numChannels Ugen
trigger Ugen
dur Ugen
in_ Ugen
grainAmp Ugen
pan Ugen
envbufnum Ugen
maxGrains = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GrainInJ" [Ugen
numChannels, Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
grainAmp, Ugen
pan, Ugen
envbufnum, Ugen
maxGrains] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 GrainSinJ [AudioRate] numChannels=1 trigger=0 dur=1 freq=440 grainAmp=1 pan=0 envbufnum=-1 maxGrains=512
-}
grainSinJ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
grainSinJ :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
grainSinJ Rate
rate Ugen
numChannels Ugen
trigger Ugen
dur Ugen
freq Ugen
grainAmp Ugen
pan Ugen
envbufnum Ugen
maxGrains = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GrainSinJ" [Ugen
numChannels, Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
grainAmp, Ugen
pan, Ugen
envbufnum, Ugen
maxGrains] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | dynamical system simulation (Newtonian gravitational force)

 GravityGrid [AudioRate] reset=0 rate=0.1 newx=0 newy=0 bufnum=0
-}
gravityGrid :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gravityGrid :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gravityGrid Rate
rate Ugen
reset Ugen
rate_ Ugen
newx Ugen
newy Ugen
bufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GravityGrid" [Ugen
reset, Ugen
rate_, Ugen
newx, Ugen
newy, Ugen
bufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | dynamical system simulation (Newtonian gravitational force)

 GravityGrid2 [AudioRate] reset=0 rate=0.1 newx=0 newy=0 bufnum=0
-}
gravityGrid2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gravityGrid2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
gravityGrid2 Rate
rate Ugen
reset Ugen
rate_ Ugen
newx Ugen
newy Ugen
bufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"GravityGrid2" [Ugen
reset, Ugen
rate_, Ugen
newx, Ugen
newy, Ugen
bufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | algorithmic delay

 GreyholeRaw [AudioRate] in1=0 in2=0 damping=0 delaytime=2 diffusion=0.5 feedback=0.9 moddepth=0.1 modfreq=2 size=1;    FILTER: TRUE
-}
greyholeRaw :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
greyholeRaw :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
greyholeRaw Ugen
in1 Ugen
in2 Ugen
damping Ugen
delaytime Ugen
diffusion Ugen
feedback Ugen
moddepth Ugen
modfreq Ugen
size = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0, Int
1]) String
"GreyholeRaw" [Ugen
in1, Ugen
in2, Ugen
damping, Ugen
delaytime, Ugen
diffusion, Ugen
feedback, Ugen
moddepth, Ugen
modfreq, Ugen
size] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Simple cochlear hair cell model

 HairCell [ControlRate,AudioRate] input=0 spontaneousrate=0 boostrate=200 restorerate=1000 loss=0.99;    FILTER: TRUE
-}
hairCell :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
hairCell :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
hairCell Ugen
input Ugen
spontaneousrate Ugen
boostrate Ugen
restorerate Ugen
loss = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"HairCell" [Ugen
input, Ugen
spontaneousrate, Ugen
boostrate, Ugen
restorerate, Ugen
loss] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 HarmonicOsc [ControlRate,AudioRate] freq=100 firstharmonic=1 *amplitudes=0;    MCE=1
-}
harmonicOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
harmonicOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
harmonicOsc Rate
rate Ugen
freq Ugen
firstharmonic Ugen
amplitudes = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"HarmonicOsc" [Ugen
freq, Ugen
firstharmonic] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
amplitudes]) Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | henon map 2D chaotic generator

 Henon2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1.4 b=0.3 x0=0.30502 y0=0.20939
-}
henon2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Henon2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | henon map 2D chaotic generator

 Henon2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1.4 b=0.3 x0=0.30502 y0=0.20939
-}
henon2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Henon2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | henon map 2D chaotic generator

 Henon2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1.4 b=0.3 x0=0.30502 y0=0.20939
-}
henon2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henon2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Henon2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 HenonTrig [ControlRate,AudioRate] minfreq=5 maxfreq=10 a=1.4 b=0.3 x0=0.30502 y0=0.20939
-}
henonTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henonTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
henonTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"HenonTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Transform a cepstrum back to a spectrum

 ICepstrum [] cepchain=0 fftbuf=0
-}
iCepstrum :: Rate -> Ugen -> Ugen -> Ugen
iCepstrum :: Rate -> Ugen -> Ugen -> Ugen
iCepstrum Rate
rate Ugen
cepchain Ugen
fftbuf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"ICepstrum" [Ugen
cepchain, Ugen
fftbuf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 24db/oct rolloff, 4nd order resonant Low Pass Filter

 IirFilter [AudioRate] in=0 freq=440 rq=1;    FILTER: TRUE
-}
iirFilter :: Ugen -> Ugen -> Ugen -> Ugen
iirFilter :: Ugen -> Ugen -> Ugen -> Ugen
iirFilter Ugen
in_ Ugen
freq Ugen
rq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"IirFilter" [Ugen
in_, Ugen
freq, Ugen
rq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrain [AudioRate] trigger=0 dur=1 in=0
-}
inGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
inGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
inGrain Rate
rate Ugen
trigger Ugen
dur Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrain" [Ugen
trigger, Ugen
dur, Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrainB [AudioRate] trigger=0 dur=1 in=0 envbuf=0
-}
inGrainB :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainB :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainB Rate
rate Ugen
trigger Ugen
dur Ugen
in_ Ugen
envbuf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrainB" [Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
envbuf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrainBBF [AudioRate] trigger=0 dur=1 in=0 envbuf=0 azimuth=0 elevation=0 rho=1 wComp=0
-}
inGrainBBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainBBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
inGrainBBF Rate
rate Ugen
trigger Ugen
dur Ugen
in_ Ugen
envbuf Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrainBBF" [Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
envbuf, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrainBF [AudioRate] trigger=0 dur=1 in=0 azimuth=0 elevation=0 rho=1 wComp=0
-}
inGrainBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainBF :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainBF Rate
rate Ugen
trigger Ugen
dur Ugen
in_ Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrainBF" [Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrainI [AudioRate] trigger=0 dur=1 in=0 envbuf1=0 envbuf2=0 ifac=0.5
-}
inGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainI Rate
rate Ugen
trigger Ugen
dur Ugen
in_ Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrainI" [Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 InGrainIBF [AudioRate] trigger=0 dur=1 in=0 envbuf1=0 envbuf2=0 ifac=0.5 azimuth=0 elevation=0 rho=1 wComp=0
-}
inGrainIBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
inGrainIBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
inGrainIBF Rate
rate Ugen
trigger Ugen
dur Ugen
in_ Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InGrainIBF" [Ugen
trigger, Ugen
dur, Ugen
in_, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Distortion by subtracting magnitude from 1

 InsideOut [ControlRate,AudioRate] in=0
-}
insideOut :: Rate -> Ugen -> Ugen
insideOut :: Rate -> Ugen -> Ugen
insideOut Rate
rate Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"InsideOut" [Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | instruction synthesis (breakpoint set interpreter)

 Instruction [AudioRate] bufnum=0
-}
instruction :: Rate -> Ugen -> Ugen
instruction :: Rate -> Ugen -> Ugen
instruction Rate
rate Ugen
bufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Instruction" [Ugen
bufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Raw version of the JPverb algorithmic reverberator, designed to produce long tails with chorusing

 JPverbRaw [ControlRate,AudioRate] in1=0 in2=0 damp=0 earlydiff=0.707 highband=2000 highx=1 lowband=500 lowx=1 mdepth=0.1 mfreq=2 midx=1 size=1 t60=1;    FILTER: TRUE
-}
jPverbRaw :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
jPverbRaw :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
jPverbRaw Ugen
in1 Ugen
in2 Ugen
damp Ugen
earlydiff Ugen
highband Ugen
highx Ugen
lowband Ugen
lowx Ugen
mdepth Ugen
mfreq Ugen
midx Ugen
size Ugen
t60 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"JPverbRaw" [Ugen
in1, Ugen
in2, Ugen
damp, Ugen
earlydiff, Ugen
highband, Ugen
highx, Ugen
lowband, Ugen
lowx, Ugen
mdepth, Ugen
mfreq, Ugen
midx, Ugen
size, Ugen
t60] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | k-means classification in real time

 KMeansRT [ControlRate] bufnum=0 inputdata=0 k=5 gate=1 reset=0 learn=1
-}
kMeansRT :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
kMeansRT :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
kMeansRT Rate
rate Ugen
bufnum Ugen
inputdata Ugen
k Ugen
gate_ Ugen
reset Ugen
learn = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"KMeansRT" [Ugen
bufnum, Ugen
inputdata, Ugen
k, Ugen
gate_, Ugen
reset, Ugen
learn] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Running score of maximum correlation of chromagram with key profiles

 KeyClarity [ControlRate] chain=0 keydecay=2 chromaleak=0.5
-}
keyClarity :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
keyClarity :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
keyClarity Rate
rate Ugen
chain Ugen
keydecay Ugen
chromaleak = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"KeyClarity" [Ugen
chain, Ugen
keydecay, Ugen
chromaleak] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Find best correlated key mode with chromagram between major, minor and chromatic cluster

 KeyMode [ControlRate] chain=0 keydecay=2 chromaleak=0.5
-}
keyMode :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
keyMode :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
keyMode Rate
rate Ugen
chain Ugen
keydecay Ugen
chromaleak = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"KeyMode" [Ugen
chain, Ugen
keydecay, Ugen
chromaleak] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | K-means Oscillator

 KmeansToBPSet1 [AudioRate] freq=440 numdatapoints=20 maxnummeans=4 nummeans=4 tnewdata=1 tnewmeans=1 soft=1 bufnum=0
-}
kmeansToBPSet1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
kmeansToBPSet1 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
kmeansToBPSet1 Rate
rate Ugen
freq Ugen
numdatapoints Ugen
maxnummeans Ugen
nummeans Ugen
tnewdata Ugen
tnewmeans Ugen
soft Ugen
bufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"KmeansToBPSet1" [Ugen
freq, Ugen
numdatapoints, Ugen
maxnummeans, Ugen
nummeans, Ugen
tnewdata, Ugen
tnewmeans, Ugen
soft, Ugen
bufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{-
-- | Run any LADSPA plugin inside SuperCollider
--
--  LADSPA [AudioRate] nChans=0 id=0 args=0
ladspa :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
ladspa rate nChans id_ args = mkUgen Nothing [AudioRate] (Left rate) "LADSPA" [nChans,id_,args] Nothing 0 (Special 0) NoId
-}

{- | random walk step

 LFBrownNoise0 [ControlRate,AudioRate] freq=20 dev=1 dist=0;    NONDET
-}
lfBrownNoise0Id :: ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise0Id :: forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise0Id a
z Rate
rate Ugen
freq Ugen
dev Ugen
dist = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LFBrownNoise0" [Ugen
freq, Ugen
dev, Ugen
dist] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of LFBrownNoise0.
lfBrownNoise0M :: Uid m => Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise0M :: forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise0M = (Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn4 Rate Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e.
Uid m =>
(Int -> Fn4 a b c d e) -> Fn4 a b c d (m e)
liftUid4 Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise0Id

-- | Unsafe variant of LFBrownNoise0.
lfBrownNoise0 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise0 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise0 = (Rate -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d r.
(a -> b -> c -> d -> IO r) -> a -> b -> c -> d -> r
liftUnsafe4 Rate -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise0M

{- | random walk linear interp

 LFBrownNoise1 [ControlRate,AudioRate] freq=20 dev=1 dist=0;    NONDET
-}
lfBrownNoise1Id :: ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise1Id :: forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise1Id a
z Rate
rate Ugen
freq Ugen
dev Ugen
dist = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LFBrownNoise1" [Ugen
freq, Ugen
dev, Ugen
dist] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of LFBrownNoise1.
lfBrownNoise1M :: Uid m => Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise1M :: forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise1M = (Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn4 Rate Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e.
Uid m =>
(Int -> Fn4 a b c d e) -> Fn4 a b c d (m e)
liftUid4 Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise1Id

-- | Unsafe variant of LFBrownNoise1.
lfBrownNoise1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise1 = (Rate -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d r.
(a -> b -> c -> d -> IO r) -> a -> b -> c -> d -> r
liftUnsafe4 Rate -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise1M

{- | random walk cubic interp

 LFBrownNoise2 [ControlRate,AudioRate] freq=20 dev=1 dist=0;    NONDET
-}
lfBrownNoise2Id :: ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise2Id :: forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise2Id a
z Rate
rate Ugen
freq Ugen
dev Ugen
dist = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LFBrownNoise2" [Ugen
freq, Ugen
dev, Ugen
dist] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of LFBrownNoise2.
lfBrownNoise2M :: Uid m => Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise2M :: forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise2M = (Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn4 Rate Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e.
Uid m =>
(Int -> Fn4 a b c d e) -> Fn4 a b c d (m e)
liftUid4 Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise2Id

-- | Unsafe variant of LFBrownNoise2.
lfBrownNoise2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lfBrownNoise2 = (Rate -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Rate -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d r.
(a -> b -> c -> d -> IO r) -> a -> b -> c -> d -> r
liftUnsafe4 Rate -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Rate -> Ugen -> Ugen -> Ugen -> m Ugen
lfBrownNoise2M

{- | Live Linear Predictive Coding Analysis and Resynthesis

 LPCAnalyzer [AudioRate] input=0 source=0.01 n=256 p=10 testE=0 delta=0.999 windowtype=0;    FILTER: TRUE
-}
lpcAnalyzer :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpcAnalyzer :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpcAnalyzer Ugen
input Ugen
source Ugen
n Ugen
p Ugen
testE Ugen
delta Ugen
windowtype = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0, Int
1]) String
"LPCAnalyzer" [Ugen
input, Ugen
source, Ugen
n, Ugen
p, Ugen
testE, Ugen
delta, Ugen
windowtype] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Linear Predictive Coding Gone Wrong

 LPCError [AudioRate] input=0 p=10
-}
lpcError :: Rate -> Ugen -> Ugen -> Ugen
lpcError :: Rate -> Ugen -> Ugen -> Ugen
lpcError Rate
rate Ugen
input Ugen
p = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LPCError" [Ugen
input, Ugen
p] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Utilize LPC data

 LPCSynth [AudioRate] buffer=0 signal=0 pointer=0
-}
lpcSynth :: Ugen -> Ugen -> Ugen -> Ugen
lpcSynth :: Ugen -> Ugen -> Ugen -> Ugen
lpcSynth Ugen
buffer Ugen
signal Ugen
pointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
AudioRate) String
"LPCSynth" [Ugen
buffer, Ugen
signal, Ugen
pointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Utilize LPC data

 LPCVals [ControlRate,AudioRate] buffer=0 pointer=0
-}
lpcVals :: Ugen -> Ugen -> Ugen
lpcVals :: Ugen -> Ugen -> Ugen
lpcVals Ugen
buffer Ugen
pointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
AudioRate) String
"LPCVals" [Ugen
buffer, Ugen
pointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LPF1 [ControlRate,AudioRate] in=0 freq=1000
-}
lpf1 :: Rate -> Ugen -> Ugen -> Ugen
lpf1 :: Rate -> Ugen -> Ugen -> Ugen
lpf1 Rate
rate Ugen
in_ Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LPF1" [Ugen
in_, Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LPF18 [AudioRate] in=0 freq=100 res=1 dist=0.4
-}
lpf18 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpf18 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpf18 Rate
rate Ugen
in_ Ugen
freq Ugen
res Ugen
dist = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LPF18" [Ugen
in_, Ugen
freq, Ugen
res, Ugen
dist] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LPFVS6 [ControlRate,AudioRate] in=0 freq=1000 slope=0.5
-}
lpfvs6 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lpfvs6 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lpfvs6 Rate
rate Ugen
in_ Ugen
freq Ugen
slope_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LPFVS6" [Ugen
in_, Ugen
freq, Ugen
slope_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LPG [AudioRate] input=0 controlinput=0 controloffset=0 controlscale=1 vca=1 resonance=1.5 lowpassmode=1 linearity=1;    FILTER: TRUE
-}
lpg :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpg :: Ugen
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lpg Ugen
input Ugen
controlinput Ugen
controloffset Ugen
controlscale Ugen
vca Ugen
resonance Ugen
lowpassmode Ugen
linearity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"LPG" [Ugen
input, Ugen
controlinput, Ugen
controloffset, Ugen
controlscale, Ugen
vca, Ugen
resonance, Ugen
lowpassmode, Ugen
linearity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Linear Time Invariant General Filter Equation

 LTI [AudioRate] input=0 bufnuma=0 bufnumb=1
-}
lti :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lti :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
lti Rate
rate Ugen
input Ugen
bufnuma Ugen
bufnumb = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LTI" [Ugen
input, Ugen
bufnuma, Ugen
bufnumb] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | latoocarfian 2D chaotic generator

 Latoocarfian2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1 b=3 c=0.5 d=0.5 x0=0.34082 y0=-0.3827
-}
latoocarfian2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
latoocarfian2DC :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
latoocarfian2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
c Ugen
d Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Latoocarfian2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
c, Ugen
d, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | latoocarfian 2D chaotic generator

 Latoocarfian2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1 b=3 c=0.5 d=0.5 x0=0.34082 y0=-0.3827
-}
latoocarfian2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
latoocarfian2DL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
latoocarfian2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
c Ugen
d Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Latoocarfian2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
c, Ugen
d, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | latoocarfian 2D chaotic generator

 Latoocarfian2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 a=1 b=3 c=0.5 d=0.5 x0=0.34082 y0=-0.3827
-}
latoocarfian2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
latoocarfian2DN :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
latoocarfian2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
c Ugen
d Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Latoocarfian2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
c, Ugen
d, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LatoocarfianTrig [ControlRate,AudioRate] minfreq=5 maxfreq=10 a=1 b=3 c=0.5 d=0.5 x0=0.34082 y0=-0.3827
-}
latoocarfianTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
latoocarfianTrig :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
latoocarfianTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
a Ugen
b Ugen
c Ugen
d Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LatoocarfianTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
a, Ugen
b, Ugen
c, Ugen
d, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Emit a sequence of triggers at specified time offsets

 ListTrig [ControlRate] bufnum=0 reset=0 offset=0 numframes=0
-}
listTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
listTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
listTrig Rate
rate Ugen
bufnum Ugen
reset Ugen
offset Ugen
numframes = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"ListTrig" [Ugen
bufnum, Ugen
reset, Ugen
offset, Ugen
numframes] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Emit a sequence of triggers at specified time offsets

 ListTrig2 [ControlRate] bufnum=0 reset=0 numframes=0
-}
listTrig2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
listTrig2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
listTrig2 Rate
rate Ugen
bufnum Ugen
reset Ugen
numframes = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"ListTrig2" [Ugen
bufnum, Ugen
reset, Ugen
numframes] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Store values to a buffer, whenever triggered

 Logger [ControlRate] inputArray=0 trig=0 bufnum=0 reset=0
-}
logger :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
logger :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
logger Rate
rate Ugen
inputArray Ugen
trig_ Ugen
bufnum Ugen
reset = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Logger" [Ugen
inputArray, Ugen
trig_, Ugen
bufnum, Ugen
reset] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | sample looping oscillator

 LoopBuf [AudioRate] bufnum=0 rate=1 gate=1 startPos=0 startLoop=0 endLoop=0 interpolation=2;    NC INPUT: True
-}
loopBuf :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
loopBuf :: Int
-> Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
loopBuf Int
numChannels Rate
rate Ugen
bufnum Ugen
rate_ Ugen
gate_ Ugen
startPos Ugen
startLoop Ugen
endLoop Ugen
interpolation = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LoopBuf" [Ugen
bufnum, Ugen
rate_, Ugen
gate_, Ugen
startPos, Ugen
startLoop, Ugen
endLoop, Ugen
interpolation] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | lorenz 2D chaotic generator

 Lorenz2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 s=10 r=28 b=2.66667 h=0.02 x0=0.09088 y0=2.97077 z0=24.28204
-}
lorenz2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lorenz2DC :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
lorenz2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
s Ugen
r Ugen
b Ugen
h Ugen
x0 Ugen
y0 Ugen
z0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Lorenz2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
s, Ugen
r, Ugen
b, Ugen
h, Ugen
x0, Ugen
y0, Ugen
z0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | lorenz 2D chaotic generator

 Lorenz2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 s=10 r=28 b=2.66667 h=0.02 x0=0.09088 y0=2.97077 z0=24.28204
-}
lorenz2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lorenz2DL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
lorenz2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
s Ugen
r Ugen
b Ugen
h Ugen
x0 Ugen
y0 Ugen
z0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Lorenz2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
s, Ugen
r, Ugen
b, Ugen
h, Ugen
x0, Ugen
y0, Ugen
z0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | lorenz 2D chaotic generator

 Lorenz2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 s=10 r=28 b=2.66667 h=0.02 x0=0.09088 y0=2.97077 z0=24.28204
-}
lorenz2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lorenz2DN :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
lorenz2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
s Ugen
r Ugen
b Ugen
h Ugen
x0 Ugen
y0 Ugen
z0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Lorenz2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
s, Ugen
r, Ugen
b, Ugen
h, Ugen
x0, Ugen
y0, Ugen
z0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | lorenz chaotic trigger generator

 LorenzTrig [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 s=10 r=28 b=2.66667 h=0.02 x0=0.09088 y0=2.97077 z0=24.28204
-}
lorenzTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lorenzTrig :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
lorenzTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
s Ugen
r Ugen
b Ugen
h Ugen
x0 Ugen
y0 Ugen
z0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LorenzTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
s, Ugen
r, Ugen
b, Ugen
h, Ugen
x0, Ugen
y0, Ugen
z0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | simple resonating lowpass filter

 Lores [AudioRate] in=0 freq=880 res=0.5;    FILTER: TRUE
-}
lores :: Ugen -> Ugen -> Ugen -> Ugen
lores :: Ugen -> Ugen -> Ugen -> Ugen
lores Ugen
in_ Ugen
freq Ugen
res = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Lores" [Ugen
in_, Ugen
freq, Ugen
res] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 2-species Predator-Prey model

 LotkaVolterra [AudioRate] freq=22050 a=1.5 b=1.5 c=0.5 d=1.5 h=0.05 xi=1 yi=0.2
-}
lotkaVolterra :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
lotkaVolterra :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
lotkaVolterra Rate
rate Ugen
freq Ugen
a Ugen
b Ugen
c Ugen
d Ugen
h Ugen
xi Ugen
yi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"LotkaVolterra" [Ugen
freq, Ugen
a, Ugen
b, Ugen
c, Ugen
d, Ugen
h, Ugen
xi, Ugen
yi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 MCLDChaosGen [] maxSize=0
-}
mcldChaosGen :: Rate -> Ugen -> Ugen
mcldChaosGen :: Rate -> Ugen -> Ugen
mcldChaosGen Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MCLDChaosGen" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | POKEY Chip Sound Simulator

 MZPokey [AudioRate] audf1=0 audc1=0 audf2=0 audc2=0 audf3=0 audc3=0 audf4=0 audc4=0 audctl=0
-}
mzPokey :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
mzPokey :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
mzPokey Rate
rate Ugen
audf1 Ugen
audc1 Ugen
audf2 Ugen
audc2 Ugen
audf3 Ugen
audc3 Ugen
audf4 Ugen
audc4 Ugen
audctl = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MZPokey" [Ugen
audf1, Ugen
audc1, Ugen
audf2, Ugen
audc2, Ugen
audf3, Ugen
audc3, Ugen
audf4, Ugen
audc4, Ugen
audctl] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | First order Markov Chain implementation for audio signals

 MarkovSynth [AudioRate] in=0 isRecording=1 waitTime=2 tableSize=10
-}
markovSynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
markovSynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
markovSynth Rate
rate Ugen
in_ Ugen
isRecording Ugen
waitTime Ugen
tableSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MarkovSynth" [Ugen
in_, Ugen
isRecording, Ugen
waitTime, Ugen
tableSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Real time sparse representation

 MatchingP [ControlRate,AudioRate] dict=0 in=0 dictsize=1 ntofind=1 hop=1 method=0
-}
matchingP :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
matchingP :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
matchingP Rate
rate Ugen
dict Ugen
in_ Ugen
dictsize Ugen
ntofind Ugen
hop Ugen
method = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MatchingP" [Ugen
dict, Ugen
in_, Ugen
dictsize, Ugen
ntofind, Ugen
hop, Ugen
method] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 MatchingPResynth [ControlRate,AudioRate] dict=0 method=0 trigger=0 residual=0 activs=0
-}
matchingPResynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
matchingPResynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
matchingPResynth Rate
rate Ugen
dict Ugen
method Ugen
trigger Ugen
residual Ugen
activs = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MatchingPResynth" [Ugen
dict, Ugen
method, Ugen
trigger, Ugen
residual, Ugen
activs] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | maximum within last x samples

 Max [ControlRate] in=0 numsamp=64
-}
max :: Rate -> Ugen -> Ugen -> Ugen
max :: Rate -> Ugen -> Ugen -> Ugen
max Rate
rate Ugen
in_ Ugen
numsamp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Max" [Ugen
in_, Ugen
numsamp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Tracks and prints amplitudes

 Maxamp [AudioRate] in=0 numSamps=1000
-}
maxamp :: Rate -> Ugen -> Ugen -> Ugen
maxamp :: Rate -> Ugen -> Ugen -> Ugen
maxamp Rate
rate Ugen
in_ Ugen
numSamps = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Maxamp" [Ugen
in_, Ugen
numSamps] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Piano synthesiser

 MdaPiano [AudioRate] freq=440 gate=1 vel=100 decay=0.8 release=0.8 hard=0.8 velhard=0.8 muffle=0.8 velmuff=0.8 velcurve=0.8 stereo=0.2 tune=0.5 random=0.1 stretch=0.1 sustain=0
-}
mdaPiano :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
mdaPiano :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
mdaPiano Rate
rate Ugen
freq Ugen
gate_ Ugen
vel Ugen
decay_ Ugen
release Ugen
hard Ugen
velhard Ugen
muffle Ugen
velmuff Ugen
velcurve Ugen
stereo Ugen
tune Ugen
random Ugen
stretch Ugen
sustain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MdaPiano" [Ugen
freq, Ugen
gate_, Ugen
vel, Ugen
decay_, Ugen
release, Ugen
hard, Ugen
velhard, Ugen
muffle, Ugen
velmuff, Ugen
velcurve, Ugen
stereo, Ugen
tune, Ugen
random, Ugen
stretch, Ugen
sustain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Mean of recent values, triggered

 MeanTriggered [ControlRate,AudioRate] in=0 trig=0 length=10
-}
meanTriggered :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
meanTriggered :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
meanTriggered Rate
rate Ugen
in_ Ugen
trig_ Ugen
length_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MeanTriggered" [Ugen
in_, Ugen
trig_, Ugen
length_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Meddis cochlear hair cell model

 Meddis [ControlRate,AudioRate] input=0;    FILTER: TRUE
-}
meddis :: Ugen -> Ugen
meddis :: Ugen -> Ugen
meddis Ugen
input = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Meddis" [Ugen
input] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Separate harmonic and percussive parts of a signal

 MedianSeparation [] fft=0 fftharmonic=0 fftpercussive=0 fftsize=1024 mediansize=17 hardorsoft=0 p=2 medianormax=0
-}
medianSeparation :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
medianSeparation :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
medianSeparation Rate
rate Ugen
fft_ Ugen
fftharmonic Ugen
fftpercussive Ugen
fftsize Ugen
mediansize Ugen
hardorsoft Ugen
p Ugen
medianormax = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MedianSeparation" [Ugen
fft_, Ugen
fftharmonic, Ugen
fftpercussive, Ugen
fftsize, Ugen
mediansize, Ugen
hardorsoft, Ugen
p, Ugen
medianormax] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Median of recent values, triggered

 MedianTriggered [ControlRate,AudioRate] in=0 trig=0 length=10
-}
medianTriggered :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
medianTriggered :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
medianTriggered Rate
rate Ugen
in_ Ugen
trig_ Ugen
length_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MedianTriggered" [Ugen
in_, Ugen
trig_, Ugen
length_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Waveguide mesh physical models of drum membranes

 MembraneCircle [AudioRate] excitation=0 tension=0.05 loss=0.99999
-}
membraneCircle :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
membraneCircle :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
membraneCircle Rate
rate Ugen
excitation Ugen
tension Ugen
loss = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MembraneCircle" [Ugen
excitation, Ugen
tension, Ugen
loss] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Waveguide mesh physical models of drum membranes

 MembraneHexagon [AudioRate] excitation=0 tension=0.05 loss=0.99999
-}
membraneHexagon :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
membraneHexagon :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
membraneHexagon Rate
rate Ugen
excitation Ugen
tension Ugen
loss = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MembraneHexagon" [Ugen
excitation, Ugen
tension, Ugen
loss] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Metronome

 Metro [ControlRate,AudioRate] bpm=0 numBeats=0
-}
metro :: Rate -> Ugen -> Ugen -> Ugen
metro :: Rate -> Ugen -> Ugen -> Ugen
metro Rate
rate Ugen
bpm Ugen
numBeats = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Metro" [Ugen
bpm, Ugen
numBeats] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a macro oscillator

 MiBraids [AudioRate] pitch=60 timbre=0.5 color=0.5 model=0 trig=0 resamp=0 decim=0 bits=0 ws=0
-}
miBraids :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miBraids :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miBraids Rate
rate Ugen
pitch_ Ugen
timbre Ugen
color Ugen
model Ugen
trig_ Ugen
resamp Ugen
decim Ugen
bits Ugen
ws = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiBraids" [Ugen
pitch_, Ugen
timbre, Ugen
color, Ugen
model, Ugen
trig_, Ugen
resamp, Ugen
decim, Ugen
bits, Ugen
ws] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | granular audio processor and texture synthesizer

 MiClouds [AudioRate] pit=0 pos=0.5 size=0.25 dens=0.4 tex=0.5 drywet=0.5 in_gain=1 spread=0.5 rvb=0 fb=0 freeze=0 mode=0 lofi=0 trig=0 *inputArray=0;    MCE=1, REORDERS INPUTS: [14,0,1,2,3,4,5,6,7,8,9,10,11,12,13]
-}
miClouds :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miClouds :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miClouds Rate
rate Ugen
pit Ugen
pos Ugen
size Ugen
dens Ugen
tex Ugen
drywet Ugen
in_gain Ugen
spread Ugen
rvb Ugen
fb Ugen
freeze Ugen
mode Ugen
lofi Ugen
trig_ Ugen
inputArray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiClouds" [Ugen
pit, Ugen
pos, Ugen
size, Ugen
dens, Ugen
tex, Ugen
drywet, Ugen
in_gain, Ugen
spread, Ugen
rvb, Ugen
fb, Ugen
freeze, Ugen
mode, Ugen
lofi, Ugen
trig_] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
inputArray]) Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Physical modelling based on Modal Synthesis.

 MiElements [AudioRate] blow_in=0 strike_in=0 gate=0 pit=48 strength=0.5 contour=0.2 bow_level=0 blow_level=0 strike_level=0 flow=0.5 mallet=0.5 bow_timb=0.5 blow_timb=0.5 strike_timb=0.5 geom=0.25 bright=0.5 damp=0.7 pos=0.2 space=0.3 model=0 easteregg=0
-}
miElements :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miElements :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miElements Rate
rate Ugen
blow_in Ugen
strike_in Ugen
gate_ Ugen
pit Ugen
strength Ugen
contour Ugen
bow_level Ugen
blow_level Ugen
strike_level Ugen
flow Ugen
mallet Ugen
bow_timb Ugen
blow_timb Ugen
strike_timb Ugen
geom Ugen
bright Ugen
damp Ugen
pos Ugen
space Ugen
model Ugen
easteregg = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiElements" [Ugen
blow_in, Ugen
strike_in, Ugen
gate_, Ugen
pit, Ugen
strength, Ugen
contour, Ugen
bow_level, Ugen
blow_level, Ugen
strike_level, Ugen
flow, Ugen
mallet, Ugen
bow_timb, Ugen
blow_timb, Ugen
strike_timb, Ugen
geom, Ugen
bright, Ugen
damp, Ugen
pos, Ugen
space, Ugen
model, Ugen
easteregg] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | topographic drum sequencer

 MiGrids [AudioRate] bpm=120 map_x=0.5 map_y=0.5 chaos=0 bd_density=0.25 sd_density=0.25 hh_density=0.25 mode=1 swing=0 config=0
-}
miGrids :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miGrids :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miGrids Rate
rate Ugen
bpm Ugen
map_x Ugen
map_y Ugen
chaos Ugen
bd_density Ugen
sd_density Ugen
hh_density Ugen
mode Ugen
swing Ugen
config = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiGrids" [Ugen
bpm, Ugen
map_x, Ugen
map_y, Ugen
chaos, Ugen
bd_density, Ugen
sd_density, Ugen
hh_density, Ugen
mode, Ugen
swing, Ugen
config] Maybe [Ugen]
forall a. Maybe a
Nothing Int
6 (Int -> Special
Special Int
0) UgenId
NoId

{- | µ-law audio companding

 MiMu [AudioRate] in=0 gain=1 bypass=0
-}
miMu :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
miMu :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
miMu Rate
rate Ugen
in_ Ugen
gain Ugen
bypass = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiMu" [Ugen
in_, Ugen
gain, Ugen
bypass] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | FM Synth-Voice based on 'ominous'

 MiOmi [AudioRate] audio_in=0 gate=0 pit=48 contour=0.2 detune=0.25 level1=0.5 level2=0.5 ratio1=0.5 ratio2=0.5 fm1=0 fm2=0 fb=0 xfb=0 filter_mode=0 cutoff=0.5 reson=0 strength=0.5 env=0.5 rotate=0.2 space=0.5
-}
miOmi :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miOmi :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miOmi Rate
rate Ugen
audio_in Ugen
gate_ Ugen
pit Ugen
contour Ugen
detune Ugen
level1 Ugen
level2 Ugen
ratio1 Ugen
ratio2 Ugen
fm1 Ugen
fm2 Ugen
fb Ugen
xfb Ugen
filter_mode Ugen
cutoff Ugen
reson Ugen
strength Ugen
env Ugen
rotate_ Ugen
space = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiOmi" [Ugen
audio_in, Ugen
gate_, Ugen
pit, Ugen
contour, Ugen
detune, Ugen
level1, Ugen
level2, Ugen
ratio1, Ugen
ratio2, Ugen
fm1, Ugen
fm2, Ugen
fb, Ugen
xfb, Ugen
filter_mode, Ugen
cutoff, Ugen
reson, Ugen
strength, Ugen
env, Ugen
rotate_, Ugen
space] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | a macro oscillator

 MiPlaits [AudioRate] pitch=60 engine=0 harm=0.1 timbre=0.5 morph=0.5 trigger=0 level=0 fm_mod=0 timb_mod=0 morph_mod=0 decay=0.5 lpg_colour=0.5
-}
miPlaits :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miPlaits :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miPlaits Rate
rate Ugen
pitch_ Ugen
engine Ugen
harm Ugen
timbre Ugen
morph Ugen
trigger Ugen
level Ugen
fm_mod Ugen
timb_mod Ugen
morph_mod Ugen
decay_ Ugen
lpg_colour = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiPlaits" [Ugen
pitch_, Ugen
engine, Ugen
harm, Ugen
timbre, Ugen
morph, Ugen
trigger, Ugen
level, Ugen
fm_mod, Ugen
timb_mod, Ugen
morph_mod, Ugen
decay_, Ugen
lpg_colour] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | a resonator

 MiRings [AudioRate] in=0 trig=0 pit=60 struct=0.25 bright=0.5 damp=0.7 pos=0.25 model=0 poly=1 intern_exciter=0 easteregg=0 bypass=0
-}
miRings :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miRings :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miRings Rate
rate Ugen
in_ Ugen
trig_ Ugen
pit Ugen
struct Ugen
bright Ugen
damp Ugen
pos Ugen
model Ugen
poly Ugen
intern_exciter Ugen
easteregg Ugen
bypass = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiRings" [Ugen
in_, Ugen
trig_, Ugen
pit, Ugen
struct, Ugen
bright, Ugen
damp, Ugen
pos, Ugen
model, Ugen
poly, Ugen
intern_exciter, Ugen
easteregg, Ugen
bypass] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Classic resonant LP filter

 MiRipples [AudioRate] in=0 cf=0.3 reson=0.2 drive=1;    FILTER: TRUE
-}
miRipples :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miRipples :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miRipples Ugen
in_ Ugen
cf Ugen
reson Ugen
drive = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"MiRipples" [Ugen
in_, Ugen
cf, Ugen
reson, Ugen
drive] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a quad LFO

 MiTides [AudioRate] freq=1 shape=0.5 slope=0.5 smooth=0.5 shift=0.2 trig=0 clock=0 output_mode=3 ramp_mode=1 ratio=9 rate=1
-}
miTides :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miTides :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miTides Rate
rate Ugen
freq Ugen
shape Ugen
slope_ Ugen
smooth Ugen
shift Ugen
trig_ Ugen
clock Ugen
output_mode Ugen
ramp_mode Ugen
ratio Ugen
rate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiTides" [Ugen
freq, Ugen
shape, Ugen
slope_, Ugen
smooth, Ugen
shift, Ugen
trig_, Ugen
clock, Ugen
output_mode, Ugen
ramp_mode, Ugen
ratio, Ugen
rate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | stereo reverb

 MiVerb [AudioRate] time=0.7 drywet=0.5 damp=0.5 hp=0.05 freeze=0 diff=0.625 *inputArray=0;    MCE=1, FILTER: TRUE, REORDERS INPUTS: [6,0,1,2,3,4,5]
-}
miVerb :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miVerb :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miVerb Ugen
time Ugen
drywet Ugen
damp Ugen
hp Ugen
freeze Ugen
diff Ugen
inputArray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
6]) String
"MiVerb" [Ugen
time, Ugen
drywet, Ugen
damp, Ugen
hp, Ugen
freeze, Ugen
diff] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
inputArray]) Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | a meta modulator

 MiWarps [AudioRate] carrier=0 modulator=0 lev1=0.5 lev2=0.5 algo=0 timb=0 osc=0 freq=110 vgain=1 easteregg=0
-}
miWarps :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
miWarps :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
miWarps Rate
rate Ugen
carrier Ugen
modulator Ugen
lev1 Ugen
lev2 Ugen
algo Ugen
timb Ugen
osc_ Ugen
freq Ugen
vgain Ugen
easteregg = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MiWarps" [Ugen
carrier, Ugen
modulator, Ugen
lev1, Ugen
lev2, Ugen
algo, Ugen
timb, Ugen
osc_, Ugen
freq, Ugen
vgain, Ugen
easteregg] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granulates real-time input

 MonoGrain [AudioRate] in=0 winsize=0.1 grainrate=10 winrandpct=0
-}
monoGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
monoGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
monoGrain Rate
rate Ugen
in_ Ugen
winsize Ugen
grainrate Ugen
winrandpct = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MonoGrain" [Ugen
in_, Ugen
winsize, Ugen
grainrate, Ugen
winrandpct] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granulates real-time input with Ambisonic panning

 MonoGrainBF [AudioRate] in=0 winsize=0.1 grainrate=10 winrandpct=0 azimuth=0 azrand=0 elevation=0 elrand=0 rho=1
-}
monoGrainBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
monoGrainBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
monoGrainBF Rate
rate Ugen
in_ Ugen
winsize Ugen
grainrate Ugen
winrandpct Ugen
azimuth Ugen
azrand Ugen
elevation Ugen
elrand Ugen
rho = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"MonoGrainBF" [Ugen
in_, Ugen
winsize, Ugen
grainrate, Ugen
winrandpct, Ugen
azimuth, Ugen
azrand, Ugen
elevation, Ugen
elrand, Ugen
rho] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Moog Filter Emulation

 MoogLadder [ControlRate,AudioRate] in=0 ffreq=440 res=0;    FILTER: TRUE
-}
moogLadder :: Ugen -> Ugen -> Ugen -> Ugen
moogLadder :: Ugen -> Ugen -> Ugen -> Ugen
moogLadder Ugen
in_ Ugen
ffreq Ugen
res = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"MoogLadder" [Ugen
in_, Ugen
ffreq, Ugen
res] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Moog  filter emulation

 MoogVCF [AudioRate] in=0 fco=0 res=0;    FILTER: TRUE
-}
moogVCF :: Ugen -> Ugen -> Ugen -> Ugen
moogVCF :: Ugen -> Ugen -> Ugen -> Ugen
moogVCF Ugen
in_ Ugen
fco Ugen
res = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"MoogVCF" [Ugen
in_, Ugen
fco, Ugen
res] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Stereo reverb

 NHHall [AudioRate] in1=0.0 in2=0.0 rt60=1.0 stereo=0.5 lowFreq=200.0 lowRatio=0.5 hiFreq=4000.0 hiRatio=0.5 earlyDiffusion=0.5 lateDiffusion=0.5 modRate=0.2 modDepth=0.3
-}
nhHall :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nhHall :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
nhHall Ugen
in1 Ugen
in2 Ugen
rt60 Ugen
stereo Ugen
lowFreq Ugen
lowRatio Ugen
hiFreq Ugen
hiRatio Ugen
earlyDiffusion Ugen
lateDiffusion Ugen
modRate Ugen
modDepth = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0, Int
1]) String
"NHHall" [Ugen
in1, Ugen
in2, Ugen
rt60, Ugen
stereo, Ugen
lowFreq, Ugen
lowRatio, Ugen
hiFreq, Ugen
hiRatio, Ugen
earlyDiffusion, Ugen
lateDiffusion, Ugen
modRate, Ugen
modDepth] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Non Linear Filter Equation

 NL [AudioRate] input=0 bufnuma=0 bufnumb=1 guard1=1000 guard2=100
-}
nl :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nl :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nl Rate
rate Ugen
input Ugen
bufnuma Ugen
bufnumb Ugen
guard1 Ugen
guard2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NL" [Ugen
input, Ugen
bufnuma, Ugen
bufnumb, Ugen
guard1, Ugen
guard2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Arbitrary Non Linear Filter Equation

 NL2 [AudioRate] input=0 bufnum=0 maxsizea=10 maxsizeb=10 guard1=1000 guard2=100
-}
nl2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nl2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nl2 Rate
rate Ugen
input Ugen
bufnum Ugen
maxsizea Ugen
maxsizeb Ugen
guard1 Ugen
guard2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NL2" [Ugen
input, Ugen
bufnum, Ugen
maxsizea, Ugen
maxsizeb, Ugen
guard1, Ugen
guard2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Non-linear Filter

 NLFiltC [ControlRate,AudioRate] input=0 a=0 b=0 d=0 c=0 l=0
-}
nlFiltC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltC Rate
rate Ugen
input Ugen
a Ugen
b Ugen
d Ugen
c Ugen
l = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NLFiltC" [Ugen
input, Ugen
a, Ugen
b, Ugen
d, Ugen
c, Ugen
l] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Non-linear Filter

 NLFiltL [ControlRate,AudioRate] input=0 a=0 b=0 d=0 c=0 l=0
-}
nlFiltL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltL Rate
rate Ugen
input Ugen
a Ugen
b Ugen
d Ugen
c Ugen
l = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NLFiltL" [Ugen
input, Ugen
a, Ugen
b, Ugen
d, Ugen
c, Ugen
l] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Non-linear Filter

 NLFiltN [ControlRate,AudioRate] input=0 a=0 b=0 d=0 c=0 l=0
-}
nlFiltN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nlFiltN Rate
rate Ugen
input Ugen
a Ugen
b Ugen
d Ugen
c Ugen
l = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NLFiltN" [Ugen
input, Ugen
a, Ugen
b, Ugen
d, Ugen
c, Ugen
l] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | physical modeling simulation; N tubes

 NTube [AudioRate] input=0 lossarray=1 karray=0 delaylengtharray=0
-}
nTube :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nTube :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nTube Rate
rate Ugen
input Ugen
lossarray Ugen
karray Ugen
delaylengtharray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NTube" [Ugen
input, Ugen
lossarray, Ugen
karray, Ugen
delaylengtharray] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Find the nearest-neighbours in a set of points

 NearestN [ControlRate] treebuf=0 in=0 gate=1 num=1
-}
nearestN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nearestN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nearestN Rate
rate Ugen
treebuf Ugen
in_ Ugen
gate_ Ugen
num = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NearestN" [Ugen
treebuf, Ugen
in_, Ugen
gate_, Ugen
num] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 NeedleRect [AudioRate] rate=1 imgWidth=100 imgHeight=100 rectX=0 rectY=0 rectW=100 rectH=100
-}
needleRect :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
needleRect :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
needleRect Rate
rate Ugen
rate_ Ugen
imgWidth Ugen
imgHeight Ugen
rectX Ugen
rectY Ugen
rectW Ugen
rectH = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NeedleRect" [Ugen
rate_, Ugen
imgWidth, Ugen
imgHeight, Ugen
rectX, Ugen
rectY, Ugen
rectW, Ugen
rectH] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 NeoFormant [ControlRate,AudioRate] formantfreq=100 carrierfreq=200 phaseshift=0.5
-}
neoFormant :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
neoFormant :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
neoFormant Rate
rate Ugen
formantfreq Ugen
carrierfreq Ugen
phaseshift = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NeoFormant" [Ugen
formantfreq, Ugen
carrierfreq, Ugen
phaseshift] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 NeoVarSawOsc [ControlRate,AudioRate] freq=100 pw=0.5 waveshape=0.5
-}
neoVarSawOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
neoVarSawOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
neoVarSawOsc Rate
rate Ugen
freq Ugen
pw Ugen
waveshape = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"NeoVarSawOsc" [Ugen
freq, Ugen
pw, Ugen
waveshape] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | APU Chip Sound Simulator

 Nes2 [AudioRate] trig=0 a0=0 a1=0 a2=0 a3=0 b0=0 b1=0 b2=0 b3=0 c0=0 c2=0 c3=0 d0=0 d2=0 d3=0 e0=0 e1=0 e2=0 e3=0 smask=0
-}
nes2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nes2 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
nes2 Rate
rate Ugen
trig_ Ugen
a0 Ugen
a1 Ugen
a2 Ugen
a3 Ugen
b0 Ugen
b1 Ugen
b2 Ugen
b3 Ugen
c0 Ugen
c2 Ugen
c3 Ugen
d0 Ugen
d2 Ugen
d3 Ugen
e0 Ugen
e1 Ugen
e2 Ugen
e3 Ugen
smask = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Nes2" [Ugen
trig_, Ugen
a0, Ugen
a1, Ugen
a2, Ugen
a3, Ugen
b0, Ugen
b1, Ugen
b2, Ugen
b3, Ugen
c0, Ugen
c2, Ugen
c3, Ugen
d0, Ugen
d2, Ugen
d3, Ugen
e0, Ugen
e1, Ugen
e2, Ugen
e3, Ugen
smask] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 NestedAllpassC [AudioRate] in=0 maxdelay1=0.036 delay1=0.036 gain1=0.08 maxdelay2=0.03 delay2=0.03 gain2=0.3;    FILTER: TRUE
-}
nestedAllpassC :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassC :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassC Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"NestedAllpassC" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 NestedAllpassL [AudioRate] in=0 maxdelay1=0.036 delay1=0.036 gain1=0.08 maxdelay2=0.03 delay2=0.03 gain2=0.3;    FILTER: TRUE
-}
nestedAllpassL :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassL :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassL Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"NestedAllpassL" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Nested Allpass filters as proposed by Vercoe and Pluckett

 NestedAllpassN [AudioRate] in=0 maxdelay1=0.036 delay1=0.036 gain1=0.08 maxdelay2=0.03 delay2=0.03 gain2=0.3;    FILTER: TRUE
-}
nestedAllpassN :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassN :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
nestedAllpassN Ugen
in_ Ugen
maxdelay1 Ugen
delay1_ Ugen
gain1 Ugen
maxdelay2 Ugen
delay2_ Ugen
gain2 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"NestedAllpassN" [Ugen
in_, Ugen
maxdelay1, Ugen
delay1_, Ugen
gain1, Ugen
maxdelay2, Ugen
delay2_, Ugen
gain2] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSFold4 [AudioRate] in=0 lo=0 hi=0
-}
osFold4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osFold4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osFold4 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSFold4" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSFold8 [AudioRate] in=0 lo=0 hi=0
-}
osFold8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osFold8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osFold8 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSFold8" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSTrunc4 [AudioRate] in=0 quant=0.5
-}
osTrunc4 :: Rate -> Ugen -> Ugen -> Ugen
osTrunc4 :: Rate -> Ugen -> Ugen -> Ugen
osTrunc4 Rate
rate Ugen
in_ Ugen
quant = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSTrunc4" [Ugen
in_, Ugen
quant] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSTrunc8 [AudioRate] in=0 quant=0.5
-}
osTrunc8 :: Rate -> Ugen -> Ugen -> Ugen
osTrunc8 :: Rate -> Ugen -> Ugen -> Ugen
osTrunc8 Rate
rate Ugen
in_ Ugen
quant = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSTrunc8" [Ugen
in_, Ugen
quant] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSWrap4 [AudioRate] in=0 lo=0 hi=0
-}
osWrap4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osWrap4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osWrap4 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSWrap4" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OSWrap8 [AudioRate] in=0 lo=0 hi=0
-}
osWrap8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osWrap8 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
osWrap8 Rate
rate Ugen
in_ Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OSWrap8" [Ugen
in_, Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Extract basic statistics from a series of onset triggers

 OnsetStatistics [ControlRate] input=0 windowsize=1 hopsize=0.1
-}
onsetStatistics :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
onsetStatistics :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
onsetStatistics Rate
rate Ugen
input Ugen
windowsize Ugen
hopsize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OnsetStatistics" [Ugen
input, Ugen
windowsize, Ugen
hopsize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | Chemical reaction modelling Oscillator

 Oregonator [AudioRate] reset=0 rate=0.01 epsilon=1 mu=1 q=1 initx=0.5 inity=0.5 initz=0.5
-}
oregonator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oregonator :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
oregonator Rate
rate Ugen
reset Ugen
rate_ Ugen
epsilon Ugen
mu Ugen
q Ugen
initx Ugen
inity Ugen
initz = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Oregonator" [Ugen
reset, Ugen
rate_, Ugen
epsilon, Ugen
mu, Ugen
q, Ugen
initx, Ugen
inity, Ugen
initz] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OscBank [ControlRate,AudioRate] freq=100 gain=1 saw8=0.5 square8=0.5 saw4=0.5 square4=0.5 saw2=0.5 square2=0.5 saw1=0.5
-}
oscBank :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oscBank :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
oscBank Rate
rate Ugen
freq Ugen
gain Ugen
saw8 Ugen
square8 Ugen
saw4 Ugen
square4 Ugen
saw2 Ugen
square2 Ugen
saw1 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OscBank" [Ugen
freq, Ugen
gain, Ugen
saw8, Ugen
square8, Ugen
saw4, Ugen
square4, Ugen
saw2, Ugen
square2, Ugen
saw1] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Piano physical model.

 OteyPiano [AudioRate] freq=440 vel=1 t_gate=0 rmin=0.35 rmax=2 rampl=4 rampr=8 rcore=1 lmin=0.07 lmax=1.4 lampl=-4 lampr=4 rho=1 e=1 zb=1 zh=0 mh=1 k=0.2 alpha=1 p=1 hpos=0.142 loss=1 detune=0.0003 hammer_type=1
-}
oteyPiano :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oteyPiano :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
oteyPiano Rate
rate Ugen
freq Ugen
vel Ugen
t_gate Ugen
rmin Ugen
rmax Ugen
rampl Ugen
rampr Ugen
rcore Ugen
lmin Ugen
lmax Ugen
lampl Ugen
lampr Ugen
rho Ugen
e Ugen
zb Ugen
zh Ugen
mh Ugen
k Ugen
alpha Ugen
p Ugen
hpos Ugen
loss Ugen
detune Ugen
hammer_type = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OteyPiano" [Ugen
freq, Ugen
vel, Ugen
t_gate, Ugen
rmin, Ugen
rmax, Ugen
rampl, Ugen
rampr, Ugen
rcore, Ugen
lmin, Ugen
lmax, Ugen
lampl, Ugen
lampr, Ugen
rho, Ugen
e, Ugen
zb, Ugen
zh, Ugen
mh, Ugen
k, Ugen
alpha, Ugen
p, Ugen
hpos, Ugen
loss, Ugen
detune, Ugen
hammer_type] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Piano physical model.

 OteyPianoStrings [AudioRate] freq=440 vel=1 t_gate=0 rmin=0.35 rmax=2 rampl=4 rampr=8 rcore=1 lmin=0.07 lmax=1.4 lampl=-4 lampr=4 rho=1 e=1 zb=1 zh=0 mh=1 k=0.2 alpha=1 p=1 hpos=0.142 loss=1 detune=0.0003 hammer_type=1
-}
oteyPianoStrings :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oteyPianoStrings :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
oteyPianoStrings Rate
rate Ugen
freq Ugen
vel Ugen
t_gate Ugen
rmin Ugen
rmax Ugen
rampl Ugen
rampr Ugen
rcore Ugen
lmin Ugen
lmax Ugen
lampl Ugen
lampr Ugen
rho Ugen
e Ugen
zb Ugen
zh Ugen
mh Ugen
k Ugen
alpha Ugen
p Ugen
hpos Ugen
loss Ugen
detune Ugen
hammer_type = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"OteyPianoStrings" [Ugen
freq, Ugen
vel, Ugen
t_gate, Ugen
rmin, Ugen
rmax, Ugen
rampl, Ugen
rampr, Ugen
rcore, Ugen
lmin, Ugen
lmax, Ugen
lampl, Ugen
lampr, Ugen
rho, Ugen
e, Ugen
zb, Ugen
zh, Ugen
mh, Ugen
k, Ugen
alpha, Ugen
p, Ugen
hpos, Ugen
loss, Ugen
detune, Ugen
hammer_type] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 OteySoundBoard [AudioRate] inp=0 c1=20 c3=20 mix=0.8;    FILTER: TRUE
-}
oteySoundBoard :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oteySoundBoard :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
oteySoundBoard Ugen
inp Ugen
c1 Ugen
c3 Ugen
mix = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"OteySoundBoard" [Ugen
inp, Ugen
c1, Ugen
c3, Ugen
mix] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return mag and freq data from a CSound pv

 PVInfo [ControlRate,AudioRate] pvbuffer=0 binNum=0 filePointer=0
-}
pvInfo :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
pvInfo :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
pvInfo Rate
rate Ugen
pvbuffer Ugen
binNum Ugen
filePointer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PVInfo" [Ugen
pvbuffer, Ugen
binNum, Ugen
filePointer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Resynthesize Csound PV data

 PVSynth [AudioRate] pvbuffer=0 numBins=0 binStart=0 binSkip=1 filePointer=0 freqMul=1 freqAdd=0
-}
pvSynth :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pvSynth :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pvSynth Rate
rate Ugen
pvbuffer Ugen
numBins Ugen
binStart Ugen
binSkip Ugen
filePointer Ugen
freqMul Ugen
freqAdd = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PVSynth" [Ugen
pvbuffer, Ugen
numBins, Ugen
binStart, Ugen
binSkip, Ugen
filePointer, Ugen
freqMul, Ugen
freqAdd] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plays FFT data to a memory buffer

 PV_BinBufRd [ControlRate] buffer=0 playbuf=0 point=1 binStart=0 binSkip=1 numBins=1 clear=0
-}
pv_BinBufRd :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_BinBufRd :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_BinBufRd Ugen
buffer Ugen
playbuf_ Ugen
point Ugen
binStart Ugen
binSkip Ugen
numBins Ugen
clear = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_BinBufRd" [Ugen
buffer, Ugen
playbuf_, Ugen
point, Ugen
binStart, Ugen
binSkip, Ugen
numBins, Ugen
clear] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Delay and Feedback on a bin by bin basis.

 PV_BinDelay [ControlRate] buffer=0 maxdelay=0 delaybuf=0 fbbuf=0 hop=0.5
-}
pv_BinDelay :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_BinDelay :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_BinDelay Ugen
buffer Ugen
maxdelay Ugen
delaybuf Ugen
fbbuf Ugen
hop = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_BinDelay" [Ugen
buffer, Ugen
maxdelay, Ugen
delaybuf, Ugen
fbbuf, Ugen
hop] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_BinFilter [ControlRate] buffer=0 start=0 end=0
-}
pv_BinFilter :: Ugen -> Ugen -> Ugen -> Ugen
pv_BinFilter :: Ugen -> Ugen -> Ugen -> Ugen
pv_BinFilter Ugen
buffer Ugen
start Ugen
end = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_BinFilter" [Ugen
buffer, Ugen
start, Ugen
end] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plays FFT data to a memory buffer

 PV_BinPlayBuf [ControlRate] buffer=0 playbuf=0 rate=1 offset=0 binStart=0 binSkip=1 numBins=1 loop=0 clear=0
-}
pv_BinPlayBuf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_BinPlayBuf :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
pv_BinPlayBuf Ugen
buffer Ugen
playbuf_ Ugen
rate_ Ugen
offset Ugen
binStart Ugen
binSkip Ugen
numBins Ugen
loop Ugen
clear = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_BinPlayBuf" [Ugen
buffer, Ugen
playbuf_, Ugen
rate_, Ugen
offset, Ugen
binStart, Ugen
binSkip, Ugen
numBins, Ugen
loop, Ugen
clear] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plays FFT data from a memory buffer

 PV_BufRd [ControlRate] buffer=0 playbuf=0 point=1
-}
pv_BufRd :: Ugen -> Ugen -> Ugen -> Ugen
pv_BufRd :: Ugen -> Ugen -> Ugen -> Ugen
pv_BufRd Ugen
buffer Ugen
playbuf_ Ugen
point = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_BufRd" [Ugen
buffer, Ugen
playbuf_, Ugen
point] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | returns common magnitudes

 PV_CommonMag [ControlRate] bufferA=0 bufferB=0 tolerance=0 remove=0
-}
pv_CommonMag :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_CommonMag :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_CommonMag Ugen
bufferA Ugen
bufferB Ugen
tolerance Ugen
remove = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_CommonMag" [Ugen
bufferA, Ugen
bufferB, Ugen
tolerance, Ugen
remove] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | multiplies common magnitudes

 PV_CommonMul [ControlRate] bufferA=0 bufferB=0 tolerance=0 remove=0
-}
pv_CommonMul :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_CommonMul :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_CommonMul Ugen
bufferA Ugen
bufferB Ugen
tolerance Ugen
remove = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_CommonMul" [Ugen
bufferA, Ugen
bufferB, Ugen
tolerance, Ugen
remove] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | simple spectral compression/expansion

 PV_Compander [ControlRate] buffer=0 thresh=50 slopeBelow=1 slopeAbove=1
-}
pv_Compander :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_Compander :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_Compander Ugen
buffer Ugen
thresh Ugen
slopeBelow Ugen
slopeAbove = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Compander" [Ugen
buffer, Ugen
thresh, Ugen
slopeBelow, Ugen
slopeAbove] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | zero bins with interpolation

 PV_Cutoff [ControlRate] bufferA=0 bufferB=0 wipe=0
-}
pv_Cutoff :: Ugen -> Ugen -> Ugen -> Ugen
pv_Cutoff :: Ugen -> Ugen -> Ugen -> Ugen
pv_Cutoff Ugen
bufferA Ugen
bufferB Ugen
wipe = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Cutoff" [Ugen
bufferA, Ugen
bufferB, Ugen
wipe] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return the even numbered bins in an FFT buffer

 PV_EvenBin [ControlRate] buffer=0
-}
pv_EvenBin :: Ugen -> Ugen
pv_EvenBin :: Ugen -> Ugen
pv_EvenBin Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_EvenBin" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | extract a repeating loop out from audio

 PV_ExtractRepeat [ControlRate] buffer=0 loopbuf=0 loopdur=0 memorytime=30 which=0 ffthop=0.5 thresh=1
-}
pv_ExtractRepeat :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_ExtractRepeat :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_ExtractRepeat Ugen
buffer Ugen
loopbuf_ Ugen
loopdur Ugen
memorytime Ugen
which Ugen
ffthop Ugen
thresh = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_ExtractRepeat" [Ugen
buffer, Ugen
loopbuf_, Ugen
loopdur, Ugen
memorytime, Ugen
which, Ugen
ffthop, Ugen
thresh] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Freeze FFT frames

 PV_Freeze [ControlRate] buffer=0 freeze=0
-}
pv_Freeze :: Ugen -> Ugen -> Ugen
pv_Freeze :: Ugen -> Ugen -> Ugen
pv_Freeze Ugen
buffer Ugen
freeze = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Freeze" [Ugen
buffer, Ugen
freeze] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Store FFT data in another buffer for other use

 PV_FreqBuffer [ControlRate] buffer=0 databuffer=0
-}
pv_FreqBuffer :: Ugen -> Ugen -> Ugen
pv_FreqBuffer :: Ugen -> Ugen -> Ugen
pv_FreqBuffer Ugen
buffer Ugen
databuffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_FreqBuffer" [Ugen
buffer, Ugen
databuffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Invert FFT frames

 PV_Invert [ControlRate] buffer=0
-}
pv_Invert :: Ugen -> Ugen
pv_Invert :: Ugen -> Ugen
pv_Invert Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Invert" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Store FFT data in another buffer for other use

 PV_MagBuffer [ControlRate] buffer=0 databuffer=0
-}
pv_MagBuffer :: Ugen -> Ugen -> Ugen
pv_MagBuffer :: Ugen -> Ugen -> Ugen
pv_MagBuffer Ugen
buffer Ugen
databuffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagBuffer" [Ugen
buffer, Ugen
databuffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_MagExp [ControlRate] buffer=0
-}
pv_MagExp :: Ugen -> Ugen
pv_MagExp :: Ugen -> Ugen
pv_MagExp Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagExp" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | reduces magnitudes above or below thresh

 PV_MagGate [ControlRate] buffer=0 thresh=1 remove=0
-}
pv_MagGate :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagGate :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagGate Ugen
buffer Ugen
thresh Ugen
remove = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagGate" [Ugen
buffer, Ugen
thresh, Ugen
remove] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_MagLog [ControlRate] buffer=0
-}
pv_MagLog :: Ugen -> Ugen
pv_MagLog :: Ugen -> Ugen
pv_MagLog Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagLog" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Remap magnitudes to a new mag curve

 PV_MagMap [ControlRate] buffer=0 mapbuf=0
-}
pv_MagMap :: Ugen -> Ugen -> Ugen
pv_MagMap :: Ugen -> Ugen -> Ugen
pv_MagMap Ugen
buffer Ugen
mapbuf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagMap" [Ugen
buffer, Ugen
mapbuf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | subtract spectral energy

 PV_MagMinus [ControlRate] bufferA=0 bufferB=0 remove=1
-}
pv_MagMinus :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagMinus :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagMinus Ugen
bufferA Ugen
bufferB Ugen
remove = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagMinus" [Ugen
bufferA, Ugen
bufferB, Ugen
remove] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_MagMulAdd [ControlRate] buffer=0
-}
pv_MagMulAdd :: Ugen -> Ugen
pv_MagMulAdd :: Ugen -> Ugen
pv_MagMulAdd Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagMulAdd" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_MagScale [ControlRate] bufferA=0 bufferB=0
-}
pv_MagScale :: Ugen -> Ugen -> Ugen
pv_MagScale :: Ugen -> Ugen -> Ugen
pv_MagScale Ugen
bufferA Ugen
bufferB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagScale" [Ugen
bufferA, Ugen
bufferB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Smooth spectral magnitudes over time

 PV_MagSmooth [ControlRate] buffer=0 factor=0.1
-}
pv_MagSmooth :: Ugen -> Ugen -> Ugen
pv_MagSmooth :: Ugen -> Ugen -> Ugen
pv_MagSmooth Ugen
buffer Ugen
factor = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagSmooth" [Ugen
buffer, Ugen
factor] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_MagSubtract [ControlRate] bufferA=0 bufferB=0 zerolimit=0
-}
pv_MagSubtract :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagSubtract :: Ugen -> Ugen -> Ugen -> Ugen
pv_MagSubtract Ugen
bufferA Ugen
bufferB Ugen
zerolimit = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MagSubtract" [Ugen
bufferA, Ugen
bufferB, Ugen
zerolimit] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return the N strongest bins

 PV_MaxMagN [ControlRate] buffer=0 numbins=0
-}
pv_MaxMagN :: Ugen -> Ugen -> Ugen
pv_MaxMagN :: Ugen -> Ugen -> Ugen
pv_MaxMagN Ugen
buffer Ugen
numbins = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MaxMagN" [Ugen
buffer, Ugen
numbins] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return the N weakest bins

 PV_MinMagN [ControlRate] buffer=0 numbins=0
-}
pv_MinMagN :: Ugen -> Ugen -> Ugen
pv_MinMagN :: Ugen -> Ugen -> Ugen
pv_MinMagN Ugen
buffer Ugen
numbins = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_MinMagN" [Ugen
buffer, Ugen
numbins] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | one kind of spectral morphing

 PV_Morph [ControlRate] bufferA=0 bufferB=0 morph=0
-}
pv_Morph :: Ugen -> Ugen -> Ugen -> Ugen
pv_Morph :: Ugen -> Ugen -> Ugen -> Ugen
pv_Morph Ugen
bufferA Ugen
bufferB Ugen
morph = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Morph" [Ugen
bufferA, Ugen
bufferB, Ugen
morph] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return only bins that are unstable

 PV_NoiseSynthF [ControlRate] buffer=0 threshold=0.1 numFrames=2 initflag=0
-}
pv_NoiseSynthF :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_NoiseSynthF :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_NoiseSynthF Ugen
buffer Ugen
threshold Ugen
numFrames Ugen
initflag = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_NoiseSynthF" [Ugen
buffer, Ugen
threshold, Ugen
numFrames, Ugen
initflag] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return only bins that are unstable

 PV_NoiseSynthP [ControlRate] buffer=0 threshold=0.1 numFrames=2 initflag=0
-}
pv_NoiseSynthP :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_NoiseSynthP :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_NoiseSynthP Ugen
buffer Ugen
threshold Ugen
numFrames Ugen
initflag = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_NoiseSynthP" [Ugen
buffer, Ugen
threshold, Ugen
numFrames, Ugen
initflag] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return the odd numbered bins in an FFT buffer

 PV_OddBin [ControlRate] buffer=0
-}
pv_OddBin :: Ugen -> Ugen
pv_OddBin :: Ugen -> Ugen
pv_OddBin Ugen
buffer = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_OddBin" [Ugen
buffer] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return only bins that are stable

 PV_PartialSynthF [ControlRate] buffer=0 threshold=0.1 numFrames=2 initflag=0
-}
pv_PartialSynthF :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PartialSynthF :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PartialSynthF Ugen
buffer Ugen
threshold Ugen
numFrames Ugen
initflag = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_PartialSynthF" [Ugen
buffer, Ugen
threshold, Ugen
numFrames, Ugen
initflag] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Return only bins that are stable

 PV_PartialSynthP [ControlRate] buffer=0 threshold=0.1 numFrames=2 initflag=0
-}
pv_PartialSynthP :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PartialSynthP :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PartialSynthP Ugen
buffer Ugen
threshold Ugen
numFrames Ugen
initflag = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_PartialSynthP" [Ugen
buffer, Ugen
threshold, Ugen
numFrames, Ugen
initflag] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_PitchShift [ControlRate] buffer=0 ratio=0
-}
pv_PitchShift :: Ugen -> Ugen -> Ugen
pv_PitchShift :: Ugen -> Ugen -> Ugen
pv_PitchShift Ugen
buffer Ugen
ratio = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_PitchShift" [Ugen
buffer, Ugen
ratio] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Plays FFT data to a memory buffer

 PV_PlayBuf [ControlRate] buffer=0 playbuf=0 rate=1 offset=0 loop=0
-}
pv_PlayBuf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PlayBuf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_PlayBuf Ugen
buffer Ugen
playbuf_ Ugen
rate_ Ugen
offset Ugen
loop = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_PlayBuf" [Ugen
buffer, Ugen
playbuf_, Ugen
rate_, Ugen
offset, Ugen
loop] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Records FFT data to a memory buffer

 PV_RecordBuf [ControlRate] buffer=0 recbuf=0 offset=0 run=0 loop=0 hop=0.5 wintype=0
-}
pv_RecordBuf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_RecordBuf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_RecordBuf Ugen
buffer Ugen
recbuf Ugen
offset Ugen
run Ugen
loop Ugen
hop Ugen
wintype = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_RecordBuf" [Ugen
buffer, Ugen
recbuf, Ugen
offset, Ugen
run, Ugen
loop, Ugen
hop, Ugen
wintype] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | combine low and high bins from two inputs with interpolation

 PV_SoftWipe [ControlRate] bufferA=0 bufferB=0 wipe=0
-}
pv_SoftWipe :: Ugen -> Ugen -> Ugen -> Ugen
pv_SoftWipe :: Ugen -> Ugen -> Ugen -> Ugen
pv_SoftWipe Ugen
bufferA Ugen
bufferB Ugen
wipe = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_SoftWipe" [Ugen
bufferA, Ugen
bufferB, Ugen
wipe] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | A harmonic enhancer

 PV_SpectralEnhance [ControlRate] buffer=0 numPartials=8 ratio=2 strength=0.1
-}
pv_SpectralEnhance :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_SpectralEnhance :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_SpectralEnhance Ugen
buffer Ugen
numPartials Ugen
ratio Ugen
strength = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_SpectralEnhance" [Ugen
buffer, Ugen
numPartials, Ugen
ratio, Ugen
strength] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Maps the spectral envelope of one FFT process onto another

 PV_SpectralMap [ControlRate] buffer=0 specBuffer=0 floor=0 freeze=0 mode=0 norm=0 window=0
-}
pv_SpectralMap :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_SpectralMap :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_SpectralMap Ugen
buffer Ugen
specBuffer Ugen
floor_ Ugen
freeze Ugen
mode Ugen
norm Ugen
window = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_SpectralMap" [Ugen
buffer, Ugen
specBuffer, Ugen
floor_, Ugen
freeze, Ugen
mode, Ugen
norm, Ugen
window] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_Split [ControlRate] bufferA=0 bufferB=0
-}
pv_Split :: Ugen -> Ugen -> Ugen
pv_Split :: Ugen -> Ugen -> Ugen
pv_Split Ugen
bufferA Ugen
bufferB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Split" [Ugen
bufferA, Ugen
bufferB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PV_Whiten [ControlRate] chain=0 trackbufnum=0 relaxtime=2 floor=0.1 smear=0 bindownsample=0
-}
pv_Whiten :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_Whiten :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pv_Whiten Ugen
chain Ugen
trackbufnum Ugen
relaxtime Ugen
floor_ Ugen
smear Ugen
bindownsample = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_Whiten" [Ugen
chain, Ugen
trackbufnum, Ugen
relaxtime, Ugen
floor_, Ugen
smear, Ugen
bindownsample] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | one kind of spectral morphing

 PV_XFade [ControlRate] bufferA=0 bufferB=0 fade=0
-}
pv_xFade :: Ugen -> Ugen -> Ugen -> Ugen
pv_xFade :: Ugen -> Ugen -> Ugen -> Ugen
pv_xFade Ugen
bufferA Ugen
bufferB Ugen
fade = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"PV_XFade" [Ugen
bufferA, Ugen
bufferB, Ugen
fade] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Equal power pan across an array of speakers

 PanX [ControlRate,AudioRate] numChans=0 in=0 pos=0 level=1 width=2
-}
panX :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
panX :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
panX Rate
rate Ugen
numChans Ugen
in_ Ugen
pos Ugen
level Ugen
width = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PanX" [Ugen
numChans, Ugen
in_, Ugen
pos, Ugen
level, Ugen
width] Maybe [Ugen]
forall a. Maybe a
Nothing Int
0 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PanX2D [ControlRate,AudioRate] numChansX=0 numChansY=0 in=0 posX=0 posY=0 level=1 widthX=2 widthY=2
-}
panX2D :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
panX2D :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
panX2D Rate
rate Ugen
numChansX Ugen
numChansY Ugen
in_ Ugen
posX Ugen
posY Ugen
level Ugen
widthX Ugen
widthY = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PanX2D" [Ugen
numChansX, Ugen
numChansY, Ugen
in_, Ugen
posX, Ugen
posY, Ugen
level, Ugen
widthX, Ugen
widthY] Maybe [Ugen]
forall a. Maybe a
Nothing Int
0 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PeakEQ2 [AudioRate] in=0 freq=1200 rs=1 db=0
-}
peakEQ2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
peakEQ2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
peakEQ2 Rate
rate Ugen
in_ Ugen
freq Ugen
rs Ugen
db = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PeakEQ2" [Ugen
in_, Ugen
freq, Ugen
rs, Ugen
db] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PeakEQ4 [AudioRate] in=0 freq=1200 rs=1 db=0
-}
peakEQ4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
peakEQ4 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
peakEQ4 Rate
rate Ugen
in_ Ugen
freq Ugen
rs Ugen
db = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PeakEQ4" [Ugen
in_, Ugen
freq, Ugen
rs, Ugen
db] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 3D Perlin Noise

 Perlin3 [ControlRate,AudioRate] x=0 y=0 z=0
-}
perlin3 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
perlin3 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
perlin3 Rate
rate Ugen
x Ugen
y Ugen
z = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Perlin3" [Ugen
x, Ugen
y, Ugen
z] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sample permutation Ugen.

 PermMod [AudioRate] in=0 freq=100
-}
permMod :: Rate -> Ugen -> Ugen -> Ugen
permMod :: Rate -> Ugen -> Ugen -> Ugen
permMod Rate
rate Ugen
in_ Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PermMod" [Ugen
in_, Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sample permutation Ugen with programmable pattern.

 PermModArray [AudioRate] in=0 freq=50 pattern=0
-}
permModArray :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
permModArray :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
permModArray Rate
rate Ugen
in_ Ugen
freq Ugen
pattern_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PermModArray" [Ugen
in_, Ugen
freq, Ugen
pattern_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sample permutation Ugen with tail.

 PermModT [AudioRate] in=0 outfreq=440 infreq=5000
-}
permModT :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
permModT :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
permModT Rate
rate Ugen
in_ Ugen
outfreq Ugen
infreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PermModT" [Ugen
in_, Ugen
outfreq, Ugen
infreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PhasorModal [AudioRate] input=0 freq=100 decay=0.25 damp=1 amp=0.5 phase=0;    FILTER: TRUE
-}
phasorModal :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
phasorModal :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
phasorModal Ugen
input Ugen
freq Ugen
decay_ Ugen
damp Ugen
amp Ugen
phase = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"PhasorModal" [Ugen
input, Ugen
freq, Ugen
decay_, Ugen
damp, Ugen
amp, Ugen
phase] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Tree classifier using (hyper)planes – Ugen or language-side

 PlaneTree [ControlRate] treebuf=0 in=0 gate=1
-}
planeTree :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
planeTree :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
planeTree Rate
rate Ugen
treebuf Ugen
in_ Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PlaneTree" [Ugen
treebuf, Ugen
in_, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | POKEY Chip Sound Simulator

 Pokey [AudioRate] audf1=0 audc1=0 audf2=0 audc2=0 audf3=0 audc3=0 audf4=0 audc4=0 audctl=0
-}
pokey :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
pokey :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
pokey Rate
rate Ugen
audf1 Ugen
audc1 Ugen
audf2 Ugen
audc2 Ugen
audf3 Ugen
audc3 Ugen
audf4 Ugen
audc4 Ugen
audctl = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Pokey" [Ugen
audf1, Ugen
audc1, Ugen
audf2, Ugen
audc2, Ugen
audf3, Ugen
audc3, Ugen
audf4, Ugen
audc4, Ugen
audctl] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 PosRatio [AudioRate] in=0 period=100 thresh=0.1
-}
posRatio :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
posRatio :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
posRatio Rate
rate Ugen
in_ Ugen
period Ugen
thresh = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PosRatio" [Ugen
in_, Ugen
period, Ugen
thresh] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | debug assistance

 PrintVal [ControlRate] in=0 numblocks=100 id=0
-}
printVal :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
printVal :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
printVal Rate
rate Ugen
in_ Ugen
numblocks Ugen
id_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"PrintVal" [Ugen
in_, Ugen
numblocks, Ugen
id_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | constant Q transform pitch follower

 Qitch [ControlRate] in=0 databufnum=0 ampThreshold=0.01 algoflag=1 ampbufnum=0 minfreq=0 maxfreq=2500
-}
qitch :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
qitch :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
qitch Rate
rate Ugen
in_ Ugen
databufnum Ugen
ampThreshold Ugen
algoflag Ugen
ampbufnum Ugen
minfreq Ugen
maxfreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Qitch" [Ugen
in_, Ugen
databufnum, Ugen
ampThreshold, Ugen
algoflag, Ugen
ampbufnum, Ugen
minfreq, Ugen
maxfreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Bezier [ControlRate,AudioRate] haltAfter=100 dx=0.0001 freq=440 phase=0 *param=0;    MCE=1
-}
bezier :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bezier :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
bezier Rate
rate Ugen
haltAfter Ugen
dx Ugen
freq Ugen
phase Ugen
param = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Bezier" [Ugen
haltAfter, Ugen
dx, Ugen
freq, Ugen
phase] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
param]) Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | rotating clock divider

 RCD [AudioRate] clock=0 rotate=0 reset=0 div=0 spread=0 auto=0 len=0 down=0 gates=0;    FILTER: TRUE
-}
rcd :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rcd :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rcd Ugen
clock Ugen
rotate_ Ugen
reset Ugen
div_ Ugen
spread Ugen
auto Ugen
len Ugen
down Ugen
gates = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RCD" [Ugen
clock, Ugen
rotate_, Ugen
reset, Ugen
div_, Ugen
spread, Ugen
auto, Ugen
len, Ugen
down, Ugen
gates] Maybe [Ugen]
forall a. Maybe a
Nothing Int
8 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RDL [AudioRate] numChannels=1 inputArray=0
-}
rdl :: Rate -> Ugen -> Ugen -> Ugen
rdl :: Rate -> Ugen -> Ugen -> Ugen
rdl Rate
rate Ugen
numChannels Ugen
inputArray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RDL" [Ugen
numChannels, Ugen
inputArray] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 DX7 [AudioRate] bufnum=0 on=0 off=0 data=0 vc=0 mnn=60 vel=99 pw=0 mw=0 bc=0 fc=0
-}
dx7 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
dx7 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
dx7 Rate
rate Ugen
bufnum Ugen
on Ugen
off Ugen
data_ Ugen
vc Ugen
mnn Ugen
vel Ugen
pw Ugen
mw Ugen
bc Ugen
fc = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DX7" [Ugen
bufnum, Ugen
on, Ugen
off, Ugen
data_, Ugen
vc, Ugen
mnn, Ugen
vel, Ugen
pw, Ugen
mw, Ugen
bc, Ugen
fc] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RDX7Env [AudioRate] gate=0 data=0 r1=0 r2=0 r3=0 r4=0 l1=0 l2=0 l3=0 l4=0 ol=0
-}
rdx7Env :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rdx7Env :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rdx7Env Rate
rate Ugen
gate_ Ugen
data_ Ugen
r1 Ugen
r2 Ugen
r3 Ugen
r4 Ugen
l1 Ugen
l2 Ugen
l3 Ugen
l4 Ugen
ol = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RDX7Env" [Ugen
gate_, Ugen
data_, Ugen
r1, Ugen
r2, Ugen
r3, Ugen
r4, Ugen
l1, Ugen
l2, Ugen
l3, Ugen
l4, Ugen
ol] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RDelayMap [AudioRate] bufnum=0 in=0 dynamic=0 *spec=0;    MCE=1, FILTER: TRUE
-}
rDelayMap :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rDelayMap :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rDelayMap Ugen
bufnum Ugen
in_ Ugen
dynamic Ugen
spec = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
1]) String
"RDelayMap" [Ugen
bufnum, Ugen
in_, Ugen
dynamic] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
spec]) Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RDelaySet [AudioRate] input=0 *setArray=0;    MCE=1, FILTER: TRUE
-}
rDelaySet :: Ugen -> Ugen -> Ugen
rDelaySet :: Ugen -> Ugen -> Ugen
rDelaySet Ugen
input Ugen
setArray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RDelaySet" [Ugen
input] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
setArray]) Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RDelaySetBuf [AudioRate] bufnum=0 in=0 spec=0
-}
rDelaySetBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rDelaySetBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rDelaySetBuf Rate
rate Ugen
bufnum Ugen
in_ Ugen
spec = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RDelaySetBuf" [Ugen
bufnum, Ugen
in_, Ugen
spec] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 dustRange [AudioRate] iot_min=0.1 iot_max=1
-}
dustRangeId :: ID a => a -> Rate -> Ugen -> Ugen -> Ugen
dustRangeId :: forall a. ID a => a -> Rate -> Ugen -> Ugen -> Ugen
dustRangeId a
z Rate
rate Ugen
iot_min Ugen
iot_max = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"DustRange" [Ugen
iot_min, Ugen
iot_max] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

{- | (Undocumented class)

 ExpRandN [InitialisationRate] lo=0 hi=1;    NC INPUT: True, NONDET
-}
expRandNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen
expRandNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen
expRandNId Int
numChannels a
z Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
InitialisationRate) String
"ExpRandN" [Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of ExpRandN.
expRandNM :: Uid m => Int -> Ugen -> Ugen -> m Ugen
expRandNM :: forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
expRandNM Int
nc = (Int -> Ugen -> Ugen -> Ugen) -> Fn2 Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c.
Uid m =>
(Int -> Fn2 a b c) -> Fn2 a b (m c)
liftUid2 (Int -> Int -> Ugen -> Ugen -> Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen
expRandNId Int
nc)

-- | Unsafe variant of ExpRandN.
expRandN :: Int -> Ugen -> Ugen -> Ugen
expRandN :: Int -> Ugen -> Ugen -> Ugen
expRandN Int
nc = (Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen
forall a b r. (a -> b -> IO r) -> a -> b -> r
liftUnsafe2 (Int -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
expRandNM Int
nc)

{- | (Undocumented class)

 Freezer [AudioRate] bufnum=0 left=0 right=1 gain=1 increment=1 incrementOffset=0 incrementRandom=0 rightRandom=0 syncPhaseTrigger=0 randomizePhaseTrigger=0 numberOfLoops=4
-}
freezer :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
freezer :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
freezer Ugen
bufnum Ugen
left Ugen
right Ugen
gain Ugen
increment Ugen
incrementOffset Ugen
incrementRandom Ugen
rightRandom Ugen
syncPhaseTrigger Ugen
randomizePhaseTrigger Ugen
numberOfLoops = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
AudioRate) String
"Freezer" [Ugen
bufnum, Ugen
left, Ugen
right, Ugen
gain, Ugen
increment, Ugen
incrementOffset, Ugen
incrementRandom, Ugen
rightRandom, Ugen
syncPhaseTrigger, Ugen
randomizePhaseTrigger, Ugen
numberOfLoops] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 IRandN [] numChannels=2 lo=0 hi=127
-}
iRandNId :: ID a => a -> Int -> Ugen -> Ugen -> Ugen
iRandNId :: forall a. ID a => a -> Int -> Ugen -> Ugen -> Ugen
iRandNId a
z Int
numChannels Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
InitialisationRate) String
"IRandN" [Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of IRandN.
iRandNM :: Uid m => Int -> Ugen -> Ugen -> m Ugen
iRandNM :: forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
iRandNM Int
nc = (Int -> Ugen -> Ugen -> Ugen) -> Fn2 Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c.
Uid m =>
(Int -> Fn2 a b c) -> Fn2 a b (m c)
liftUid2 (Int -> Int -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Int -> Ugen -> Ugen -> Ugen
iRandNId Int
nc)

-- | Unsafe variant of IRandN.
iRandN :: Int -> Ugen -> Ugen -> Ugen
iRandN :: Int -> Ugen -> Ugen -> Ugen
iRandN Int
nc = (Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen
forall a b r. (a -> b -> IO r) -> a -> b -> r
liftUnsafe2 (Int -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
iRandNM Int
nc)

{- | TB303 Filter Emulation

 RLPFD [ControlRate,AudioRate] in=0 ffreq=440 res=0 dist=0;    FILTER: TRUE
-}
rlpfd :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rlpfd :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rlpfd Ugen
in_ Ugen
ffreq Ugen
res Ugen
dist = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RLPFD" [Ugen
in_, Ugen
ffreq, Ugen
res, Ugen
dist] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RLagC [ControlRate] in=0 timeUp=0.1 curveUp=0 timeDown=0.1 curveDown=0;    FILTER: TRUE
-}
rLagC :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rLagC :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rLagC Ugen
in_ Ugen
timeUp Ugen
curveUp Ugen
timeDown Ugen
curveDown = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RLagC" [Ugen
in_, Ugen
timeUp, Ugen
curveUp, Ugen
timeDown, Ugen
curveDown] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 LinRandN [InitialisationRate] lo=0 hi=1 minmax=0;    NC INPUT: True, NONDET
-}
linRandNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
linRandNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
linRandNId Int
numChannels a
z Ugen
lo Ugen
hi Ugen
minmax = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
InitialisationRate) String
"LinRandN" [Ugen
lo, Ugen
hi, Ugen
minmax] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of LinRandN.
linRandNM :: Uid m => Int -> Ugen -> Ugen -> Ugen -> m Ugen
linRandNM :: forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
linRandNM Int
nc = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 (Int -> Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
linRandNId Int
nc)

-- | Unsafe variant of LinRandN.
linRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
linRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
linRandN Int
nc = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 (Int -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
linRandNM Int
nc)

{- | (Undocumented class)

 RLoopSet [AudioRate] bufnum=0 left=0 right=1 gain=1 increment=1 spec=0
-}
rLoopSet :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rLoopSet :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rLoopSet Rate
rate Ugen
bufnum Ugen
left Ugen
right Ugen
gain Ugen
increment Ugen
spec = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RLoopSet" [Ugen
bufnum, Ugen
left, Ugen
right, Ugen
gain, Ugen
increment, Ugen
spec] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RMAFoodChainL [AudioRate] freq=22050 a1=5 b1=3 d1=0.4 a2=0.1 b2=2 d2=0.01 k=1.0943 r=0.8904 h=0.05 xi=0.1 yi=0 zi=0
-}
rmaFoodChainL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rmaFoodChainL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rmaFoodChainL Rate
rate Ugen
freq Ugen
a1 Ugen
b1 Ugen
d1 Ugen
a2 Ugen
b2 Ugen
d2 Ugen
k Ugen
r Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RMAFoodChainL" [Ugen
freq, Ugen
a1, Ugen
b1, Ugen
d1, Ugen
a2, Ugen
b2, Ugen
d2, Ugen
k, Ugen
r, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RMEQ [AudioRate] in=0 freq=440 rq=0.1 k=0;    FILTER: TRUE
-}
rmeq :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rmeq :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rmeq Ugen
in_ Ugen
freq Ugen
rq Ugen
k = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RMEQ" [Ugen
in_, Ugen
freq, Ugen
rq, Ugen
k] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RMEQSuite [] maxSize=0
-}
rmeqSuite :: Rate -> Ugen -> Ugen
rmeqSuite :: Rate -> Ugen -> Ugen
rmeqSuite Rate
rate Ugen
maxSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate, Rate
AudioRate, Rate
DemandRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RMEQSuite" [Ugen
maxSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | root mean square

 RMS [ControlRate,AudioRate] in=0 lpFreq=10
-}
rms :: Rate -> Ugen -> Ugen -> Ugen
rms :: Rate -> Ugen -> Ugen -> Ugen
rms Rate
rate Ugen
in_ Ugen
lpFreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RMS" [Ugen
in_, Ugen
lpFreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RMShelf [AudioRate] in=0 freq=440 k=0
-}
rmShelf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rmShelf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rmShelf Rate
rate Ugen
in_ Ugen
freq Ugen
k = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RMShelf" [Ugen
in_, Ugen
freq, Ugen
k] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RMShelf2 [AudioRate] in=0 freq=440 k=0
-}
rmShelf2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rmShelf2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rmShelf2 Rate
rate Ugen
in_ Ugen
freq Ugen
k = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RMShelf2" [Ugen
in_, Ugen
freq, Ugen
k] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 ObxdFilter [AudioRate] in=0 cutoff=440 resonance=0 multimode=0.5 bandpass=0 fourpole=0
-}
obxdFilter :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
obxdFilter :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
obxdFilter Ugen
in_ Ugen
cutoff Ugen
resonance Ugen
multimode Ugen
bandpass Ugen
fourpole = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"ObxdFilter" [Ugen
in_, Ugen
cutoff, Ugen
resonance, Ugen
multimode, Ugen
bandpass, Ugen
fourpole] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RPVDecayTbl [] fft_buf=0 decay_rate_buf=0 history_buf=0
-}
rpvDecayTbl :: Ugen -> Ugen -> Ugen -> Ugen
rpvDecayTbl :: Ugen -> Ugen -> Ugen -> Ugen
rpvDecayTbl Ugen
fft_buf Ugen
decay_rate_buf Ugen
history_buf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
ControlRate) String
"RPVDecayTbl" [Ugen
fft_buf, Ugen
decay_rate_buf, Ugen
history_buf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RandN [InitialisationRate] lo=0 hi=1;    NC INPUT: True, NONDET
-}
randNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen
randNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen
randNId Int
numChannels a
z Ugen
lo Ugen
hi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
InitialisationRate) String
"RandN" [Ugen
lo, Ugen
hi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of RandN.
randNM :: Uid m => Int -> Ugen -> Ugen -> m Ugen
randNM :: forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
randNM Int
nc = (Int -> Ugen -> Ugen -> Ugen) -> Fn2 Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c.
Uid m =>
(Int -> Fn2 a b c) -> Fn2 a b (m c)
liftUid2 (Int -> Int -> Ugen -> Ugen -> Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen
randNId Int
nc)

-- | Unsafe variant of RandN.
randN :: Int -> Ugen -> Ugen -> Ugen
randN :: Int -> Ugen -> Ugen -> Ugen
randN Int
nc = (Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen
forall a b r. (a -> b -> IO r) -> a -> b -> r
liftUnsafe2 (Int -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Int -> Ugen -> Ugen -> m Ugen
randNM Int
nc)

{- | (Undocumented class)

 RSVFBP [AudioRate] in=0 freq=440 q=0
-}
svfBp :: Ugen -> Ugen -> Ugen -> Ugen
svfBp :: Ugen -> Ugen -> Ugen -> Ugen
svfBp Ugen
in_ Ugen
freq Ugen
q = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SvfBp" [Ugen
in_, Ugen
freq, Ugen
q] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SvfHp [AudioRate] in=0 freq=440 q=0
-}
svfHp :: Ugen -> Ugen -> Ugen -> Ugen
svfHp :: Ugen -> Ugen -> Ugen -> Ugen
svfHp Ugen
in_ Ugen
freq Ugen
q = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SvfHp" [Ugen
in_, Ugen
freq, Ugen
q] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SvflP [AudioRate] in=0 freq=440 q=0
-}
svfLp :: Ugen -> Ugen -> Ugen -> Ugen
svfLp :: Ugen -> Ugen -> Ugen -> Ugen
svfLp Ugen
in_ Ugen
freq Ugen
q = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SvfLp" [Ugen
in_, Ugen
freq, Ugen
q] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 ShufflerB [AudioRate] bufnum=0 readLocationMinima=0.01 readLocationMaxima=0.02 readIncrementMinima=1 readIncrementMaxima=1 durationMinima=0.2 durationMaxima=0.2 envelopeAmplitudeMinima=0.5 envelopeAmplitudeMaxima=0.5 envelopeShapeMinima=0.5 envelopeShapeMaxima=0.5 envelopeSkewMinima=0.5 envelopeSkewMaxima=0.5 stereoLocationMinima=0.5 stereoLocationMaxima=0.5 interOffsetTimeMinima=0.05 interOffsetTimeMaxima=0.01 ftableReadLocationIncrement=1 readIncrementQuanta=0 interOffsetTimeQuanta=0
-}
shufflerB :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
shufflerB :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
shufflerB Ugen
bufnum Ugen
readLocationMinima Ugen
readLocationMaxima Ugen
readIncrementMinima Ugen
readIncrementMaxima Ugen
durationMinima Ugen
durationMaxima Ugen
envelopeAmplitudeMinima Ugen
envelopeAmplitudeMaxima Ugen
envelopeShapeMinima Ugen
envelopeShapeMaxima Ugen
envelopeSkewMinima Ugen
envelopeSkewMaxima Ugen
stereoLocationMinima Ugen
stereoLocationMaxima Ugen
interOffsetTimeMinima Ugen
interOffsetTimeMaxima Ugen
ftableReadLocationIncrement Ugen
readIncrementQuanta Ugen
interOffsetTimeQuanta = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
AudioRate) String
"ShufflerB" [Ugen
bufnum, Ugen
readLocationMinima, Ugen
readLocationMaxima, Ugen
readIncrementMinima, Ugen
readIncrementMaxima, Ugen
durationMinima, Ugen
durationMaxima, Ugen
envelopeAmplitudeMinima, Ugen
envelopeAmplitudeMaxima, Ugen
envelopeShapeMinima, Ugen
envelopeShapeMaxima, Ugen
envelopeSkewMinima, Ugen
envelopeSkewMaxima, Ugen
stereoLocationMinima, Ugen
stereoLocationMaxima, Ugen
interOffsetTimeMinima, Ugen
interOffsetTimeMaxima, Ugen
ftableReadLocationIncrement, Ugen
readIncrementQuanta, Ugen
interOffsetTimeQuanta] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RShufflerL [AudioRate] in=0 fragmentSize=0.01 maxDelay=0.01
-}
rShufflerL :: Ugen -> Ugen -> Ugen -> Ugen
rShufflerL :: Ugen -> Ugen -> Ugen -> Ugen
rShufflerL Ugen
in_ Ugen
fragmentSize Ugen
maxDelay = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"RShufflerL" [Ugen
in_, Ugen
fragmentSize, Ugen
maxDelay] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RSmplrIndex [ControlRate] buf=0 size=0 mnn=60
-}
rSmplrIndex :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rSmplrIndex :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
rSmplrIndex Rate
rate Ugen
buf Ugen
size Ugen
mnn = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RSmplrIndex" [Ugen
buf, Ugen
size, Ugen
mnn] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 TExpRandN [ControlRate] lo=0 hi=1 trigger=0;    NC INPUT: True, FILTER: TRUE, NONDET
-}
tExpRandNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tExpRandNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tExpRandNId Int
numChannels a
z Ugen
lo Ugen
hi Ugen
trigger = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
2]) String
"TExpRandN" [Ugen
lo, Ugen
hi, Ugen
trigger] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TExpRandN.
tExpRandNM :: Uid m => Int -> Ugen -> Ugen -> Ugen -> m Ugen
tExpRandNM :: forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
tExpRandNM Int
nc = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 (Int -> Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tExpRandNId Int
nc)

-- | Unsafe variant of TExpRandN.
tExpRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
tExpRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
tExpRandN Int
nc = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 (Int -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
tExpRandNM Int
nc)

{- | (Undocumented class)

 TLinRandN [ControlRate] lo=0 hi=1 minmax=0 trigger=0;    NC INPUT: True, FILTER: TRUE, NONDET
-}
tLinRandNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tLinRandNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tLinRandNId Int
numChannels a
z Ugen
lo Ugen
hi Ugen
minmax Ugen
trigger = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
3]) String
"TLinRandN" [Ugen
lo, Ugen
hi, Ugen
minmax, Ugen
trigger] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TLinRandN.
tLinRandNM :: Uid m => Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tLinRandNM :: forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tLinRandNM Int
nc = Fn5 Int Ugen Ugen Ugen Ugen Ugen
-> Fn4 Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e.
Uid m =>
(Int -> Fn4 a b c d e) -> Fn4 a b c d (m e)
liftUid4 (Int -> Fn5 Int Ugen Ugen Ugen Ugen Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tLinRandNId Int
nc)

-- | Unsafe variant of TLinRandN.
tLinRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tLinRandN :: Fn5 Int Ugen Ugen Ugen Ugen Ugen
tLinRandN Int
nc = (Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d r.
(a -> b -> c -> d -> IO r) -> a -> b -> c -> d -> r
liftUnsafe4 (Int -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tLinRandNM Int
nc)

{- | (Undocumented class)

 TRandN [ControlRate] lo=0 hi=1 trigger=0;    NC INPUT: True, FILTER: TRUE, NONDET
-}
tRandNId :: ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tRandNId :: forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tRandNId Int
numChannels a
z Ugen
lo Ugen
hi Ugen
trigger = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
2]) String
"TRandN" [Ugen
lo, Ugen
hi, Ugen
trigger] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TRandN.
tRandNM :: Uid m => Int -> Ugen -> Ugen -> Ugen -> m Ugen
tRandNM :: forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
tRandNM Int
nc = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 (Int -> Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => Int -> a -> Ugen -> Ugen -> Ugen -> Ugen
tRandNId Int
nc)

-- | Unsafe variant of TRandN.
tRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
tRandN :: Int -> Ugen -> Ugen -> Ugen -> Ugen
tRandN Int
nc = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 (Int -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Int -> Ugen -> Ugen -> Ugen -> m Ugen
tRandNM Int
nc)

{- | (Undocumented class)

 TScramble [InitialisationRate,ControlRate] trigger=0 *inputs=0;    MCE=1, FILTER: TRUE, NONDET
-}
tScrambleId :: ID a => a -> Ugen -> Ugen -> Ugen
tScrambleId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen
tScrambleId a
z Ugen
trigger Ugen
inputs = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
InitialisationRate, Rate
ControlRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"TScramble" [Ugen
trigger] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
inputs]) ([Ugen] -> Int
forall a. [a] -> Int
forall (t :: * -> *) a. Foldable t => t a -> Int
length (Ugen -> [Ugen]
mceChannels Ugen
inputs) Int -> Int -> Int
forall a. Num a => a -> a -> a
+ Int
0) (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TScramble.
tScrambleM :: Uid m => Ugen -> Ugen -> m Ugen
tScrambleM :: forall (m :: * -> *). Uid m => Ugen -> Ugen -> m Ugen
tScrambleM = (Int -> Ugen -> Ugen -> Ugen) -> Fn2 Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c.
Uid m =>
(Int -> Fn2 a b c) -> Fn2 a b (m c)
liftUid2 Int -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen
tScrambleId

-- | Unsafe variant of TScramble.
tScramble :: Ugen -> Ugen -> Ugen
tScramble :: Ugen -> Ugen -> Ugen
tScramble = (Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen
forall a b r. (a -> b -> IO r) -> a -> b -> r
liftUnsafe2 Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Ugen -> Ugen -> m Ugen
tScrambleM

{- | (Undocumented class)

 RTracePlay [ControlRate,AudioRate] bufnum=0 degree=4 rate=0 axis=1
-}
rTracePlay :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rTracePlay :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rTracePlay Rate
rate Ugen
bufnum Ugen
degree Ugen
rate_ Ugen
axis = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RTracePlay" [Ugen
bufnum, Ugen
degree, Ugen
rate_, Ugen
axis] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RTraceRd [ControlRate,AudioRate] bufnum=0 degree=4 index=0 axis=1
-}
rTraceRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rTraceRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rTraceRd Rate
rate Ugen
bufnum Ugen
degree Ugen
index_ Ugen
axis = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RTraceRd" [Ugen
bufnum, Ugen
degree, Ugen
index_, Ugen
axis] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | differential pulse-code modulation

 RedDPCMdecode [ControlRate,AudioRate] in=0
-}
redDPCMdecode :: Rate -> Ugen -> Ugen
redDPCMdecode :: Rate -> Ugen -> Ugen
redDPCMdecode Rate
rate Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedDPCMdecode" [Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | differential pulse-code modulation

 RedDPCMencode [ControlRate,AudioRate] in=0 round=0
-}
redDPCMencode :: Rate -> Ugen -> Ugen -> Ugen
redDPCMencode :: Rate -> Ugen -> Ugen -> Ugen
redDPCMencode Rate
rate Ugen
in_ Ugen
round_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedDPCMencode" [Ugen
in_, Ugen
round_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | look before you leap

 RedLbyl [ControlRate,AudioRate] in=0 thresh=0.5 samples=2
-}
redLbyl :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
redLbyl :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
redLbyl Rate
rate Ugen
in_ Ugen
thresh Ugen
samples = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedLbyl" [Ugen
in_, Ugen
thresh, Ugen
samples] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a really bad pseudo-random noise generator

 RedNoise [ControlRate,AudioRate] clock=0
-}
redNoise :: Rate -> Ugen -> Ugen
redNoise :: Rate -> Ugen -> Ugen
redNoise Rate
rate Ugen
clock = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedNoise" [Ugen
clock] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a phasor that can loop

 RedPhasor [ControlRate,AudioRate] trig=0 rate=1 start=0 end=1 loop=0 loopstart=0 loopend=1
-}
redPhasor :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
redPhasor :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
redPhasor Rate
rate Ugen
trig_ Ugen
rate_ Ugen
start Ugen
end Ugen
loop Ugen
loopstart Ugen
loopend = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedPhasor" [Ugen
trig_, Ugen
rate_, Ugen
start, Ugen
end, Ugen
loop, Ugen
loopstart, Ugen
loopend] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a phasor that can loop - version2

 RedPhasor2 [ControlRate,AudioRate] trig=0 rate=1 start=0 end=1 loop=0 loopstart=0 loopend=1
-}
redPhasor2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
redPhasor2 :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
redPhasor2 Rate
rate Ugen
trig_ Ugen
rate_ Ugen
start Ugen
end Ugen
loop Ugen
loopstart Ugen
loopend = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RedPhasor2" [Ugen
trig_, Ugen
rate_, Ugen
start, Ugen
end, Ugen
loop, Ugen
loopstart, Ugen
loopend] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RegaliaMitraEQ [AudioRate] in=0 freq=440 rq=0.1 k=0
-}
regaliaMitraEQ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
regaliaMitraEQ :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
regaliaMitraEQ Rate
rate Ugen
in_ Ugen
freq Ugen
rq Ugen
k = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RegaliaMitraEQ" [Ugen
in_, Ugen
freq, Ugen
rq, Ugen
k] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Resonator [AudioRate] input=0 freq=100 position=0.001 resolution=24 structure=0.5 brightness=0.5 damping=0.5;    FILTER: TRUE
-}
resonator :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
resonator :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
resonator Ugen
input Ugen
freq Ugen
position Ugen
resolution Ugen
structure Ugen
brightness Ugen
damping = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Resonator" [Ugen
input, Ugen
freq, Ugen
position, Ugen
resolution, Ugen
structure, Ugen
brightness, Ugen
damping] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Rongs [AudioRate] trigger=0 sustain=1 f0=0.01 structure=0.5 brightness=0.5 damping=0.75 accent=0.9 stretch=0.5 position=0.15 loss=0.15 modeNum=2 cosFreq=0.25
-}
rongs :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rongs :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rongs Rate
rate Ugen
trigger Ugen
sustain Ugen
f0 Ugen
structure Ugen
brightness Ugen
damping Ugen
accent Ugen
stretch Ugen
position Ugen
loss Ugen
modeNum Ugen
cosFreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Rongs" [Ugen
trigger, Ugen
sustain, Ugen
f0, Ugen
structure, Ugen
brightness, Ugen
damping, Ugen
accent, Ugen
stretch, Ugen
position, Ugen
loss, Ugen
modeNum, Ugen
cosFreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Rossler chaotic generator

 RosslerL [AudioRate] freq=22050 a=0.2 b=0.2 c=5.7 h=0.05 xi=0.1 yi=0 zi=0
-}
rosslerL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rosslerL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rosslerL Rate
rate Ugen
freq Ugen
a Ugen
b Ugen
c Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RosslerL" [Ugen
freq, Ugen
a, Ugen
b, Ugen
c, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 RosslerResL [AudioRate] in=0 stiff=1 freq=22050 a=0.2 b=0.2 c=5.7 h=0.05 xi=0.1 yi=0 zi=0
-}
rosslerResL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rosslerResL :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
rosslerResL Rate
rate Ugen
in_ Ugen
stiff Ugen
freq Ugen
a Ugen
b Ugen
c Ugen
h Ugen
xi Ugen
yi Ugen
zi = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"RosslerResL" [Ugen
in_, Ugen
stiff, Ugen
freq, Ugen
a, Ugen
b, Ugen
c, Ugen
h, Ugen
xi, Ugen
yi, Ugen
zi] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Rotate [AudioRate] w=0 x=0 y=0 z=0 rotate=0
-}
rotate :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rotate :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
rotate Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
rotate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Rotate" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
rotate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (faulty) SID Sound Chip Simulator

 SID6581f [AudioRate] freqLo0=0 freqHi0=0 pwLo0=0 pwHi0=0 ctrl0=0 atkDcy0=0 susRel0=0 freqLo1=0 freqHi1=0 pwLo1=0 pwHi1=0 ctrl1=0 atkDcy1=0 susRel1=0 freqLo2=0 freqHi2=0 pwLo2=0 pwHi2=0 ctrl2=0 atkDcy2=0 susRel2=0 fcLo=0 fcHi=0 resFilt=0 modeVol=0 rate=1
-}
sid6581f :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sid6581f :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
sid6581f Rate
rate Ugen
freqLo0 Ugen
freqHi0 Ugen
pwLo0 Ugen
pwHi0 Ugen
ctrl0 Ugen
atkDcy0 Ugen
susRel0 Ugen
freqLo1 Ugen
freqHi1 Ugen
pwLo1 Ugen
pwHi1 Ugen
ctrl1 Ugen
atkDcy1 Ugen
susRel1 Ugen
freqLo2 Ugen
freqHi2 Ugen
pwLo2 Ugen
pwHi2 Ugen
ctrl2 Ugen
atkDcy2 Ugen
susRel2 Ugen
fcLo Ugen
fcHi Ugen
resFilt Ugen
modeVol Ugen
rate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SID6581f" [Ugen
freqLo0, Ugen
freqHi0, Ugen
pwLo0, Ugen
pwHi0, Ugen
ctrl0, Ugen
atkDcy0, Ugen
susRel0, Ugen
freqLo1, Ugen
freqHi1, Ugen
pwLo1, Ugen
pwHi1, Ugen
ctrl1, Ugen
atkDcy1, Ugen
susRel1, Ugen
freqLo2, Ugen
freqHi2, Ugen
pwLo2, Ugen
pwHi2, Ugen
ctrl2, Ugen
atkDcy2, Ugen
susRel2, Ugen
fcLo, Ugen
fcHi, Ugen
resFilt, Ugen
modeVol, Ugen
rate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | experimental time domain onset detector

 SLOnset [ControlRate] input=0 memorysize1=20 before=5 after=5 threshold=10 hysteresis=10
-}
slOnset :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
slOnset :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
slOnset Rate
rate Ugen
input Ugen
memorysize1 Ugen
before Ugen
after Ugen
threshold Ugen
hysteresis = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SLOnset" [Ugen
input, Ugen
memorysize1, Ugen
before, Ugen
after, Ugen
threshold, Ugen
hysteresis] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral Modeling Synthesis

 SMS [AudioRate] input=0 maxpeaks=80 currentpeaks=80 tolerance=4 noisefloor=0.2 freqmult=1 freqadd=0 formantpreserve=0 useifft=0 ampmult=1 graphicsbufnum=0;    FILTER: TRUE
-}
sms :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sms :: Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
sms Ugen
input Ugen
maxpeaks Ugen
currentpeaks Ugen
tolerance Ugen
noisefloor Ugen
freqmult Ugen
freqadd Ugen
formantpreserve Ugen
useifft Ugen
ampmult Ugen
graphicsbufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SMS" [Ugen
input, Ugen
maxpeaks, Ugen
currentpeaks, Ugen
tolerance, Ugen
noisefloor, Ugen
freqmult, Ugen
freqadd, Ugen
formantpreserve, Ugen
useifft, Ugen
ampmult, Ugen
graphicsbufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Sound Chip Simulator

 SN76489 [AudioRate] tone0=512 tone1=0 tone2=0 noise=0 vol0=15 vol1=0 vol2=0 vol3=0 rate=1
-}
sn76489 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sn76489 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
sn76489 Rate
rate Ugen
tone0 Ugen
tone1 Ugen
tone2 Ugen
noise Ugen
vol0 Ugen
vol1 Ugen
vol2 Ugen
vol3 Ugen
rate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SN76489" [Ugen
tone0, Ugen
tone1, Ugen
tone2, Ugen
noise, Ugen
vol0, Ugen
vol1, Ugen
vol2, Ugen
vol3, Ugen
rate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SOMAreaWr [ControlRate] bufnum=0 inputdata=0 coords=0 netsize=10 numdims=2 nhood=0.5 gate=1
-}
somAreaWr :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
somAreaWr :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
somAreaWr Rate
rate Ugen
bufnum Ugen
inputdata Ugen
coords Ugen
netsize Ugen
numdims Ugen
nhood Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SOMAreaWr" [Ugen
bufnum, Ugen
inputdata, Ugen
coords, Ugen
netsize, Ugen
numdims, Ugen
nhood, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Map an input using a Self-Organising Map

 SOMRd [ControlRate,AudioRate] bufnum=0 inputdata=0 netsize=10 numdims=2 gate=1
-}
somRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
somRd :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
somRd Rate
rate Ugen
bufnum Ugen
inputdata Ugen
netsize Ugen
numdims Ugen
gate_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SOMRd" [Ugen
bufnum, Ugen
inputdata, Ugen
netsize, Ugen
numdims, Ugen
gate_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Create (train) a Self-Organising Map

 SOMTrain [ControlRate] bufnum=0 inputdata=0 netsize=10 numdims=2 traindur=5000 nhood=0.5 gate=1 initweight=1
-}
somTrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
somTrain :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
somTrain Rate
rate Ugen
bufnum Ugen
inputdata Ugen
netsize Ugen
numdims Ugen
traindur Ugen
nhood Ugen
gate_ Ugen
initweight = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SOMTrain" [Ugen
bufnum, Ugen
inputdata, Ugen
netsize, Ugen
numdims, Ugen
traindur, Ugen
nhood, Ugen
gate_, Ugen
initweight] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | 12db/Oct State Variable Filter

 SVF [ControlRate,AudioRate] signal=0 cutoff=2200 res=0.1 lowpass=1 bandpass=0 highpass=0 notch=0 peak=0;    FILTER: TRUE
-}
svf :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
svf :: Ugen
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
svf Ugen
signal Ugen
cutoff Ugen
res Ugen
lowpass Ugen
bandpass Ugen
highpass Ugen
notch Ugen
peak_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SVF" [Ugen
signal, Ugen
cutoff, Ugen
res, Ugen
lowpass, Ugen
bandpass, Ugen
highpass, Ugen
notch, Ugen
peak_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | super-efficient sawtooth oscillator with low aliasing

 SawDPW [ControlRate,AudioRate] freq=440 iphase=0
-}
sawDPW :: Rate -> Ugen -> Ugen -> Ugen
sawDPW :: Rate -> Ugen -> Ugen -> Ugen
sawDPW Rate
rate Ugen
freq Ugen
iphase = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SawDPW" [Ugen
freq, Ugen
iphase] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Perceptual feature modeling sensory dissonance

 SensoryDissonance [ControlRate] fft=0 maxpeaks=100 peakthreshold=0.1 norm=0 clamp=1
-}
sensoryDissonance :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sensoryDissonance :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sensoryDissonance Rate
rate Ugen
fft_ Ugen
maxpeaks Ugen
peakthreshold Ugen
norm Ugen
clamp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SensoryDissonance" [Ugen
fft_, Ugen
maxpeaks, Ugen
peakthreshold, Ugen
norm, Ugen
clamp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Fuzzy sieve based synthesis

 Sieve1 [ControlRate,AudioRate] bufnum=0 gap=2 alternate=1
-}
sieve1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sieve1 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sieve1 Rate
rate Ugen
bufnum Ugen
gap Ugen
alternate = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Sieve1" [Ugen
bufnum, Ugen
gap, Ugen
alternate] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains

 SinGrain [AudioRate] trigger=0 dur=1 freq=440
-}
sinGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sinGrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sinGrain Rate
rate Ugen
trigger Ugen
dur Ugen
freq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrain" [Ugen
trigger, Ugen
dur, Ugen
freq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains and user supplied envelope

 SinGrainB [AudioRate] trigger=0 dur=1 freq=440 envbuf=0
-}
sinGrainB :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainB :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainB Rate
rate Ugen
trigger Ugen
dur Ugen
freq Ugen
envbuf = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrainB" [Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
envbuf] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains with Ambisonic panning and user supplied envelope

 SinGrainBBF [AudioRate] trigger=0 dur=1 freq=440 envbuf=0 azimuth=0 elevation=0 rho=1 wComp=0
-}
sinGrainBBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainBBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
sinGrainBBF Rate
rate Ugen
trigger Ugen
dur Ugen
freq Ugen
envbuf Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrainBBF" [Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
envbuf, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains with Ambisonic panning

 SinGrainBF [AudioRate] trigger=0 dur=1 freq=440 azimuth=0 elevation=0 rho=1 wComp=0
-}
sinGrainBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainBF :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainBF Rate
rate Ugen
trigger Ugen
dur Ugen
freq Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrainBF" [Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains and user supplied envelopes

 SinGrainI [AudioRate] trigger=0 dur=1 freq=440 envbuf1=0 envbuf2=0 ifac=0.5
-}
sinGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainI :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainI Rate
rate Ugen
trigger Ugen
dur Ugen
freq Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrainI" [Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Granular synthesis with sinusoidal grains with Ambisonic panning and user supplied envelopes

 SinGrainIBF [AudioRate] trigger=0 dur=1 freq=440 envbuf1=0 envbuf2=0 ifac=0.5 azimuth=0 elevation=0 rho=1 wComp=0
-}
sinGrainIBF :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sinGrainIBF :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
sinGrainIBF Rate
rate Ugen
trigger Ugen
dur Ugen
freq Ugen
envbuf1 Ugen
envbuf2 Ugen
ifac Ugen
azimuth Ugen
elevation Ugen
rho Ugen
wComp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinGrainIBF" [Ugen
trigger, Ugen
dur, Ugen
freq, Ugen
envbuf1, Ugen
envbuf2, Ugen
ifac, Ugen
azimuth, Ugen
elevation, Ugen
rho, Ugen
wComp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SinTone [AudioRate] freq=440 phase=0
-}
sinTone :: Rate -> Ugen -> Ugen -> Ugen
sinTone :: Rate -> Ugen -> Ugen -> Ugen
sinTone Rate
rate Ugen
freq Ugen
phase = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SinTone" [Ugen
freq, Ugen
phase] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | port of some ladspa plugins

 SineShaper [AudioRate] in=0 limit=1;    FILTER: TRUE
-}
sineShaper :: Ugen -> Ugen -> Ugen
sineShaper :: Ugen -> Ugen -> Ugen
sineShaper Ugen
in_ Ugen
limit = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SineShaper" [Ugen
in_, Ugen
limit] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SkipNeedle [AudioRate] range=44100 rate=10 offset=0
-}
skipNeedle :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
skipNeedle :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
skipNeedle Rate
rate Ugen
range Ugen
rate_ Ugen
offset = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SkipNeedle" [Ugen
range, Ugen
rate_, Ugen
offset] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | lowpass filter for envelope following

 Slide [ControlRate,AudioRate] in=0 slideup=50 slidedown=3000
-}
slide :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
slide :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
slide Rate
rate Ugen
in_ Ugen
slideup Ugen
slidedown = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Slide" [Ugen
in_, Ugen
slideup, Ugen
slidedown] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | generate cpu spikes

 Slub [ControlRate,AudioRate] trig=0 spike=4.04
-}
slub :: Rate -> Ugen -> Ugen -> Ugen
slub :: Rate -> Ugen -> Ugen -> Ugen
slub Rate
rate Ugen
trig_ Ugen
spike = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Slub" [Ugen
trig_, Ugen
spike] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Smooth samplerate and bitrate reduction

 SmoothDecimator [AudioRate] in=0 rate=44100 smoothing=0.5
-}
smoothDecimator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
smoothDecimator :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
smoothDecimator Rate
rate Ugen
in_ Ugen
rate_ Ugen
smoothing = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SmoothDecimator" [Ugen
in_, Ugen
rate_, Ugen
smoothing] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SoftClipAmp [AudioRate] in=0 pregain=1;    FILTER: TRUE
-}
softClipAmp :: Ugen -> Ugen -> Ugen
softClipAmp :: Ugen -> Ugen -> Ugen
softClipAmp Ugen
in_ Ugen
pregain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SoftClipAmp" [Ugen
in_, Ugen
pregain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SoftClipAmp4 [AudioRate] in=0 pregain=1;    FILTER: TRUE
-}
softClipAmp4 :: Ugen -> Ugen -> Ugen
softClipAmp4 :: Ugen -> Ugen -> Ugen
softClipAmp4 Ugen
in_ Ugen
pregain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SoftClipAmp4" [Ugen
in_, Ugen
pregain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SoftClipAmp8 [AudioRate] in=0 pregain=1;    FILTER: TRUE
-}
softClipAmp8 :: Ugen -> Ugen -> Ugen
softClipAmp8 :: Ugen -> Ugen -> Ugen
softClipAmp8 Ugen
in_ Ugen
pregain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SoftClipAmp8" [Ugen
in_, Ugen
pregain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SoftClipper4 [AudioRate] in=0
-}
softClipper4 :: Rate -> Ugen -> Ugen
softClipper4 :: Rate -> Ugen -> Ugen
softClipper4 Rate
rate Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SoftClipper4" [Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SoftClipper8 [AudioRate] in=0
-}
softClipper8 :: Rate -> Ugen -> Ugen
softClipper8 :: Rate -> Ugen -> Ugen
softClipper8 Rate
rate Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SoftClipper8" [Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | LPC analizer.

 SonLPC [AudioRate] buff=-1.0 in=0.0 hop=0.5 poles=10.0
-}
sonLPC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sonLPC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
sonLPC Rate
rate Ugen
buff Ugen
in_ Ugen
hop Ugen
poles = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SonLPC" [Ugen
buff, Ugen
in_, Ugen
hop, Ugen
poles] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SonLPCSynth [AudioRate] chain=-1.0
-}
sonLPCSynth :: Rate -> Ugen -> Ugen
sonLPCSynth :: Rate -> Ugen -> Ugen
sonLPCSynth Rate
rate Ugen
chain = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SonLPCSynth" [Ugen
chain] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 SonLPCSynthIn [AudioRate] chain=-1.0 in=0.0
-}
sonLPCSynthIn :: Rate -> Ugen -> Ugen -> Ugen
sonLPCSynthIn :: Rate -> Ugen -> Ugen -> Ugen
sonLPCSynthIn Rate
rate Ugen
chain Ugen
in_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SonLPCSynthIn" [Ugen
chain, Ugen
in_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Karplus-Strong via a sorting algorithm

 SortBuf [AudioRate] bufnum=0 sortrate=10 reset=0
-}
sortBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sortBuf :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
sortBuf Rate
rate Ugen
bufnum Ugen
sortrate Ugen
reset = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SortBuf" [Ugen
bufnum, Ugen
sortrate, Ugen
reset] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spectral feature extraction

 SpectralEntropy [ControlRate] fft=0 fftsize=2048 numbands=1;    NC INPUT: True
-}
spectralEntropy :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
spectralEntropy :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen
spectralEntropy Int
numChannels Rate
rate Ugen
fft_ Ugen
fftsize Ugen
numbands = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SpectralEntropy" [Ugen
fft_, Ugen
fftsize, Ugen
numbands] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Spreader [AudioRate] in=0 theta=1.5708 filtsPerOctave=8
-}
spreader :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
spreader :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
spreader Rate
rate Ugen
in_ Ugen
theta Ugen
filtsPerOctave = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Spreader" [Ugen
in_, Ugen
theta, Ugen
filtsPerOctave] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Spruce bud worm model equations

 SpruceBudworm [AudioRate] reset=0 rate=0.1 k1=27.9 k2=1.5 alpha=0.1 beta=10.1 mu=0.3 rho=10.1 initx=0.9 inity=0.1
-}
spruceBudworm :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
spruceBudworm :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
spruceBudworm Rate
rate Ugen
reset Ugen
rate_ Ugen
k1 Ugen
k2 Ugen
alpha Ugen
beta Ugen
mu Ugen
rho Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"SpruceBudworm" [Ugen
reset, Ugen
rate_, Ugen
k1, Ugen
k2, Ugen
alpha, Ugen
beta, Ugen
mu, Ugen
rho, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Wave squeezer. Maybe a kind of pitch shifter.

 Squiz [ControlRate,AudioRate] in=0 pitchratio=2 zcperchunk=1 memlen=0.1;    FILTER: TRUE
-}
squiz :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
squiz :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
squiz Ugen
in_ Ugen
pitchratio Ugen
zcperchunk Ugen
memlen = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Squiz" [Ugen
in_, Ugen
pitchratio, Ugen
zcperchunk, Ugen
memlen] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | standard map 2D chaotic generator

 Standard2DC [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 k=1.4 x0=4.97898 y0=5.74734
-}
standard2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DC :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DC Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
k Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Standard2DC" [Ugen
minfreq, Ugen
maxfreq, Ugen
k, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | standard map 2D chaotic generator

 Standard2DL [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 k=1.4 x0=4.97898 y0=5.74734
-}
standard2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DL :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DL Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
k Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Standard2DL" [Ugen
minfreq, Ugen
maxfreq, Ugen
k, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | standard map 2D chaotic generator

 Standard2DN [ControlRate,AudioRate] minfreq=11025 maxfreq=22050 k=1.4 x0=4.97898 y0=5.74734
-}
standard2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DN :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standard2DN Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
k Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Standard2DN" [Ugen
minfreq, Ugen
maxfreq, Ugen
k, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StandardTrig [ControlRate,AudioRate] minfreq=5 maxfreq=10 k=1.4 x0=4.97898 y0=5.74734
-}
standardTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standardTrig :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
standardTrig Rate
rate Ugen
minfreq Ugen
maxfreq Ugen
k Ugen
x0 Ugen
y0 = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StandardTrig" [Ugen
minfreq, Ugen
maxfreq, Ugen
k, Ugen
x0, Ugen
y0] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkBandedWG [ControlRate,AudioRate] freq=440 instr=0 bowpressure=0 bowmotion=0 integration=0 modalresonance=64 bowvelocity=0 setstriking=0 trig=1
-}
stkBandedWG :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBandedWG :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
stkBandedWG Rate
rate Ugen
freq Ugen
instr Ugen
bowpressure Ugen
bowmotion Ugen
integration Ugen
modalresonance Ugen
bowvelocity Ugen
setstriking Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkBandedWG" [Ugen
freq, Ugen
instr, Ugen
bowpressure, Ugen
bowmotion, Ugen
integration, Ugen
modalresonance, Ugen
bowvelocity, Ugen
setstriking, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkBeeThree [ControlRate,AudioRate] freq=440 op4gain=10 op3gain=20 lfospeed=64 lfodepth=0 adsrtarget=64 trig=1
-}
stkBeeThree :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBeeThree :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBeeThree Rate
rate Ugen
freq Ugen
op4gain Ugen
op3gain Ugen
lfospeed Ugen
lfodepth Ugen
adsrtarget Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkBeeThree" [Ugen
freq, Ugen
op4gain, Ugen
op3gain, Ugen
lfospeed, Ugen
lfodepth, Ugen
adsrtarget, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkBlowHole [ControlRate,AudioRate] freq=440 reedstiffness=64 noisegain=20 tonehole=64 register=11 breathpressure=64
-}
stkBlowHole :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBlowHole :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBlowHole Rate
rate Ugen
freq Ugen
reedstiffness Ugen
noisegain Ugen
tonehole Ugen
register Ugen
breathpressure = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkBlowHole" [Ugen
freq, Ugen
reedstiffness, Ugen
noisegain, Ugen
tonehole, Ugen
register, Ugen
breathpressure] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkBowed [ControlRate,AudioRate] freq=220 bowpressure=64 bowposition=64 vibfreq=64 vibgain=64 loudness=64 gate=1 attackrate=1 decayrate=1
-}
stkBowed :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkBowed :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
stkBowed Rate
rate Ugen
freq Ugen
bowpressure Ugen
bowposition Ugen
vibfreq Ugen
vibgain Ugen
loudness_ Ugen
gate_ Ugen
attackrate Ugen
decayrate = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkBowed" [Ugen
freq, Ugen
bowpressure, Ugen
bowposition, Ugen
vibfreq, Ugen
vibgain, Ugen
loudness_, Ugen
gate_, Ugen
attackrate, Ugen
decayrate] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkClarinet [ControlRate,AudioRate] freq=440 reedstiffness=64 noisegain=4 vibfreq=64 vibgain=11 breathpressure=64 trig=1
-}
stkClarinet :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkClarinet :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkClarinet Rate
rate Ugen
freq Ugen
reedstiffness Ugen
noisegain Ugen
vibfreq Ugen
vibgain Ugen
breathpressure Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkClarinet" [Ugen
freq, Ugen
reedstiffness, Ugen
noisegain, Ugen
vibfreq, Ugen
vibgain, Ugen
breathpressure, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkFlute [ControlRate,AudioRate] freq=440 jetDelay=49 noisegain=0.15 jetRatio=0.32
-}
stkFlute :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkFlute :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkFlute Rate
rate Ugen
freq Ugen
jetDelay Ugen
noisegain Ugen
jetRatio = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkFlute" [Ugen
freq, Ugen
jetDelay, Ugen
noisegain, Ugen
jetRatio] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{-
-- | Wrapping Synthesis toolkit.
--
--  StkGlobals [AudioRate] showWarnings=0 printErrors=0 rawfilepath=0
stkGlobals :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
stkGlobals rate showWarnings printErrors rawfilepath = mkUgen Nothing [AudioRate] (Left rate) "StkGlobals" [showWarnings,printErrors,rawfilepath] Nothing 1 (Special 0) NoId
-}

{- | Wrapping Synthesis toolkit.

 StkInst [AudioRate] freq=220 gate=1 onamp=1 offamp=0.5 instNumber=6 *args=0;    MCE=1, REORDERS INPUTS: [4,0,1,2,3,5]
-}
stkInst :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkInst :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkInst Rate
rate Ugen
freq Ugen
gate_ Ugen
onamp Ugen
offamp Ugen
instNumber Ugen
args = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkInst" [Ugen
freq, Ugen
gate_, Ugen
onamp, Ugen
offamp, Ugen
instNumber] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
args]) Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkMandolin [ControlRate,AudioRate] freq=520 bodysize=64 pickposition=64 stringdamping=69 stringdetune=10 aftertouch=64 trig=1
-}
stkMandolin :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkMandolin :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkMandolin Rate
rate Ugen
freq Ugen
bodysize Ugen
pickposition Ugen
stringdamping Ugen
stringdetune Ugen
aftertouch Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkMandolin" [Ugen
freq, Ugen
bodysize, Ugen
pickposition, Ugen
stringdamping, Ugen
stringdetune, Ugen
aftertouch, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkModalBar [ControlRate,AudioRate] freq=440 instrument=0 stickhardness=64 stickposition=64 vibratogain=20 vibratofreq=20 directstickmix=64 volume=64 trig=1
-}
stkModalBar :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkModalBar :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
stkModalBar Rate
rate Ugen
freq Ugen
instrument Ugen
stickhardness Ugen
stickposition Ugen
vibratogain Ugen
vibratofreq Ugen
directstickmix Ugen
volume Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkModalBar" [Ugen
freq, Ugen
instrument, Ugen
stickhardness, Ugen
stickposition, Ugen
vibratogain, Ugen
vibratofreq, Ugen
directstickmix, Ugen
volume, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkMoog [ControlRate,AudioRate] freq=440 filterQ=10 sweeprate=20 vibfreq=64 vibgain=0 gain=64 trig=1
-}
stkMoog :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkMoog :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkMoog Rate
rate Ugen
freq Ugen
filterQ Ugen
sweeprate Ugen
vibfreq Ugen
vibgain Ugen
gain Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkMoog" [Ugen
freq, Ugen
filterQ, Ugen
sweeprate, Ugen
vibfreq, Ugen
vibgain, Ugen
gain, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkPluck [ControlRate,AudioRate] freq=440 decay=0.99
-}
stkPluck :: Rate -> Ugen -> Ugen -> Ugen
stkPluck :: Rate -> Ugen -> Ugen -> Ugen
stkPluck Rate
rate Ugen
freq Ugen
decay_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkPluck" [Ugen
freq, Ugen
decay_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkSaxofony [ControlRate,AudioRate] freq=220 reedstiffness=64 reedaperture=64 noisegain=20 blowposition=26 vibratofrequency=20 vibratogain=20 breathpressure=128 trig=1
-}
stkSaxofony :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkSaxofony :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
stkSaxofony Rate
rate Ugen
freq Ugen
reedstiffness Ugen
reedaperture Ugen
noisegain Ugen
blowposition Ugen
vibratofrequency Ugen
vibratogain Ugen
breathpressure Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkSaxofony" [Ugen
freq, Ugen
reedstiffness, Ugen
reedaperture, Ugen
noisegain, Ugen
blowposition, Ugen
vibratofrequency, Ugen
vibratogain, Ugen
breathpressure, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkShakers [ControlRate,AudioRate] instr=0 energy=64 decay=64 objects=64 resfreq=64
-}
stkShakers :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkShakers :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkShakers Rate
rate Ugen
instr Ugen
energy Ugen
decay_ Ugen
objects Ugen
resfreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkShakers" [Ugen
instr, Ugen
energy, Ugen
decay_, Ugen
objects, Ugen
resfreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StkVoicForm [ControlRate,AudioRate] freq=440 vuvmix=64 vowelphon=64 vibfreq=64 vibgain=20 loudness=64 trig=1
-}
stkVoicForm :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkVoicForm :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stkVoicForm Rate
rate Ugen
freq Ugen
vuvmix Ugen
vowelphon Ugen
vibfreq Ugen
vibgain Ugen
loudness_ Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StkVoicForm" [Ugen
freq, Ugen
vuvmix, Ugen
vowelphon, Ugen
vibfreq, Ugen
vibgain, Ugen
loudness_, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | String resonance filter

 Streson [ControlRate,AudioRate] input=0 delayTime=0.003 res=0.9;    FILTER: TRUE
-}
streson :: Ugen -> Ugen -> Ugen -> Ugen
streson :: Ugen -> Ugen -> Ugen -> Ugen
streson Ugen
input Ugen
delayTime Ugen
res = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Streson" [Ugen
input, Ugen
delayTime, Ugen
res] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 StringVoice [AudioRate] trig=0 infsustain=0 freq=100 accent=0.5 structure=0.5 brightness=0.5 damping=0.5
-}
stringVoice :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stringVoice :: Rate
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
stringVoice Rate
rate Ugen
trig_ Ugen
infsustain Ugen
freq Ugen
accent Ugen
structure Ugen
brightness Ugen
damping = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"StringVoice" [Ugen
trig_, Ugen
infsustain, Ugen
freq, Ugen
accent, Ugen
structure, Ugen
brightness, Ugen
damping] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Pulse counter with floating point steps

 Summer [ControlRate,AudioRate] trig=0 step=1 reset=0 resetval=0;    FILTER: TRUE
-}
summer :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
summer :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen
summer Ugen
trig_ Ugen
step Ugen
reset Ugen
resetval = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"Summer" [Ugen
trig_, Ugen
step, Ugen
reset, Ugen
resetval] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | feedback delay line implementing switch-and-ramp buffer jumping

 SwitchDelay [AudioRate] in=0 drylevel=1 wetlevel=1 delaytime=1 delayfactor=0.7 maxdelaytime=20;    FILTER: TRUE
-}
switchDelay :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
switchDelay :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
switchDelay Ugen
in_ Ugen
drylevel Ugen
wetlevel Ugen
delaytime Ugen
delayfactor Ugen
maxdelaytime = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"SwitchDelay" [Ugen
in_, Ugen
drylevel, Ugen
wetlevel, Ugen
delaytime, Ugen
delayfactor, Ugen
maxdelaytime] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | triggered beta random distribution

 TBetaRand [ControlRate,AudioRate] lo=0 hi=1 prob1=0 prob2=0 trig=0;    FILTER: TRUE, NONDET
-}
tBetaRandId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBetaRandId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBetaRandId a
z Ugen
lo Ugen
hi Ugen
prob1 Ugen
prob2 Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
4]) String
"TBetaRand" [Ugen
lo, Ugen
hi, Ugen
prob1, Ugen
prob2, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TBetaRand.
tBetaRandM :: Uid m => Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBetaRandM :: forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBetaRandM = (Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn5 Ugen Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e f.
Uid m =>
(Int -> Fn5 a b c d e f) -> Fn5 a b c d e (m f)
liftUid5 Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBetaRandId

-- | Unsafe variant of TBetaRand.
tBetaRand :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBetaRand :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBetaRand = (Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d e r.
(a -> b -> c -> d -> e -> IO r) -> a -> b -> c -> d -> e -> r
liftUnsafe5 Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBetaRandM

{- | triggered random walk generator

 TBrownRand [ControlRate,AudioRate] lo=0 hi=1 dev=1 dist=0 trig=0;    FILTER: TRUE, NONDET
-}
tBrownRandId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBrownRandId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBrownRandId a
z Ugen
lo Ugen
hi Ugen
dev Ugen
dist Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
4]) String
"TBrownRand" [Ugen
lo, Ugen
hi, Ugen
dev, Ugen
dist, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TBrownRand.
tBrownRandM :: Uid m => Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBrownRandM :: forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBrownRandM = (Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn5 Ugen Ugen Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d e f.
Uid m =>
(Int -> Fn5 a b c d e f) -> Fn5 a b c d e (m f)
liftUid5 Int -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBrownRandId

-- | Unsafe variant of TBrownRand.
tBrownRand :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBrownRand :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tBrownRand = (Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen)
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c d e r.
(a -> b -> c -> d -> e -> IO r) -> a -> b -> c -> d -> e -> r
liftUnsafe5 Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *).
Uid m =>
Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> m Ugen
tBrownRandM

{- | triggered gaussian random distribution

 TGaussRand [ControlRate,AudioRate] lo=0 hi=1 trig=0;    FILTER: TRUE, NONDET
-}
tGaussRandId :: ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
tGaussRandId :: forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
tGaussRandId a
z Ugen
lo Ugen
hi Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
2]) String
"TGaussRand" [Ugen
lo, Ugen
hi, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) (a -> UgenId
forall a. ID a => a -> UgenId
toUid a
z)

-- | Monad variant of TGaussRand.
tGaussRandM :: Uid m => Ugen -> Ugen -> Ugen -> m Ugen
tGaussRandM :: forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
tGaussRandM = (Int -> Ugen -> Ugen -> Ugen -> Ugen)
-> Fn3 Ugen Ugen Ugen (m Ugen)
forall (m :: * -> *) a b c d.
Uid m =>
(Int -> Fn3 a b c d) -> Fn3 a b c (m d)
liftUid3 Int -> Ugen -> Ugen -> Ugen -> Ugen
forall a. ID a => a -> Ugen -> Ugen -> Ugen -> Ugen
tGaussRandId

-- | Unsafe variant of TGaussRand.
tGaussRand :: Ugen -> Ugen -> Ugen -> Ugen
tGaussRand :: Ugen -> Ugen -> Ugen -> Ugen
tGaussRand = (Ugen -> Ugen -> Ugen -> IO Ugen) -> Ugen -> Ugen -> Ugen -> Ugen
forall a b c r. (a -> b -> c -> IO r) -> a -> b -> c -> r
liftUnsafe3 Ugen -> Ugen -> Ugen -> IO Ugen
forall (m :: * -> *). Uid m => Ugen -> Ugen -> Ugen -> m Ugen
tGaussRandM

{- | buffer granulator with linear att/dec

 TGrains2 [AudioRate] trigger=0 bufnum=0 rate=1 centerPos=0 dur=0.1 pan=0 amp=0.1 att=0.5 dec=0.5 interp=4;    NC INPUT: True
-}
tGrains2 :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tGrains2 :: Int
-> Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
tGrains2 Int
numChannels Rate
rate Ugen
trigger Ugen
bufnum Ugen
rate_ Ugen
centerPos Ugen
dur Ugen
pan Ugen
amp Ugen
att Ugen
dec Ugen
interp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TGrains2" [Ugen
trigger, Ugen
bufnum, Ugen
rate_, Ugen
centerPos, Ugen
dur, Ugen
pan, Ugen
amp, Ugen
att, Ugen
dec, Ugen
interp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | buffer granulator with user envelope

 TGrains3 [AudioRate] trigger=0 bufnum=0 rate=1 centerPos=0 dur=0.1 pan=0 amp=0.1 att=0.5 dec=0.5 window=1 interp=4;    NC INPUT: True
-}
tGrains3 :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tGrains3 :: Int
-> Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
tGrains3 Int
numChannels Rate
rate Ugen
trigger Ugen
bufnum Ugen
rate_ Ugen
centerPos Ugen
dur Ugen
pan Ugen
amp Ugen
att Ugen
dec Ugen
window Ugen
interp = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TGrains3" [Ugen
trigger, Ugen
bufnum, Ugen
rate_, Ugen
centerPos, Ugen
dur, Ugen
pan, Ugen
amp, Ugen
att, Ugen
dec, Ugen
window, Ugen
interp] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | Tracking Phase Vocoder

 TPV [AudioRate] chain=0 windowsize=1024 hopsize=512 maxpeaks=80 currentpeaks=0 freqmult=1 tolerance=4 noisefloor=0.2
-}
tpv :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tpv :: Ugen
-> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tpv Ugen
chain Ugen
windowsize Ugen
hopsize Ugen
maxpeaks Ugen
currentpeaks Ugen
freqmult Ugen
tolerance Ugen
noisefloor = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
AudioRate) String
"TPV" [Ugen
chain, Ugen
windowsize, Ugen
hopsize, Ugen
maxpeaks, Ugen
currentpeaks, Ugen
freqmult, Ugen
tolerance, Ugen
noisefloor] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 TTendency [ControlRate,AudioRate] trigger=0 dist=0 parX=0 parY=1 parA=0 parB=0
-}
tTendency :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tTendency :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tTendency Rate
rate Ugen
trigger Ugen
dist Ugen
parX Ugen
parY Ugen
parA Ugen
parB = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TTendency" [Ugen
trigger, Ugen
dist, Ugen
parX, Ugen
parY, Ugen
parA, Ugen
parB] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | pitch tracker

 Tartini [ControlRate] in=0 threshold=0.93 n=2048 k=0 overlap=1024 smallCutoff=0.5
-}
tartini :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tartini :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tartini Rate
rate Ugen
in_ Ugen
threshold Ugen
n Ugen
k Ugen
overlap Ugen
smallCutoff = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Tartini" [Ugen
in_, Ugen
threshold, Ugen
n, Ugen
k, Ugen
overlap, Ugen
smallCutoff] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | Neural Oscillator

 TermanWang [AudioRate] input=0 reset=0 ratex=0.01 ratey=0.01 alpha=1 beta=1 eta=1 initx=0 inity=0
-}
termanWang :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
termanWang :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
termanWang Rate
rate Ugen
input Ugen
reset Ugen
ratex Ugen
ratey Ugen
alpha Ugen
beta Ugen
eta Ugen
initx Ugen
inity = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TermanWang" [Ugen
input, Ugen
reset, Ugen
ratex, Ugen
ratey, Ugen
alpha, Ugen
beta, Ugen
eta, Ugen
initx, Ugen
inity] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | display level of a Ugen as a textual meter

 TextVU [ControlRate,AudioRate] trig=2 in=0 label=0 width=21 reset=0 ana=0
-}
textVU :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
textVU :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
textVU Rate
rate Ugen
trig_ Ugen
in_ Ugen
label_ Ugen
width Ugen
reset Ugen
ana = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TextVU" [Ugen
trig_, Ugen
in_, Ugen
label_, Ugen
width, Ugen
reset, Ugen
ana] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Tilt [AudioRate] w=0 x=0 y=0 z=0 tilt=0
-}
tilt :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tilt :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tilt Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
tilt_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Tilt" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
tilt_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | triggered signal averager

 TrigAvg [ControlRate] in=0 trig=0
-}
trigAvg :: Rate -> Ugen -> Ugen -> Ugen
trigAvg :: Rate -> Ugen -> Ugen -> Ugen
trigAvg Rate
rate Ugen
in_ Ugen
trig_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TrigAvg" [Ugen
in_, Ugen
trig_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Tumble [AudioRate] w=0 x=0 y=0 z=0 tilt=0
-}
tumble :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tumble :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
tumble Rate
rate Ugen
w Ugen
x Ugen
y Ugen
z Ugen
tilt_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Tumble" [Ugen
w, Ugen
x, Ugen
y, Ugen
z, Ugen
tilt_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | physical modeling simulation; two tubes

 TwoTube [AudioRate] input=0 k=0.01 loss=1 d1length=100 d2length=100
-}
twoTube :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
twoTube :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
twoTube Rate
rate Ugen
input Ugen
k Ugen
loss Ugen
d1length Ugen
d2length = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"TwoTube" [Ugen
input, Ugen
k, Ugen
loss, Ugen
d1length, Ugen
d2length] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 UHJ2B [AudioRate] ls=0 rs=0
-}
uhj2b :: Rate -> Ugen -> Ugen -> Ugen
uhj2b :: Rate -> Ugen -> Ugen -> Ugen
uhj2b Rate
rate Ugen
ls Ugen
rs = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"UHJ2B" [Ugen
ls, Ugen
rs] Maybe [Ugen]
forall a. Maybe a
Nothing Int
3 (Int -> Special
Special Int
0) UgenId
NoId

{- | Vector Base Amplitude Panner

 VBAP [ControlRate,AudioRate] in=0 bufnum=0 azimuth=0 elevation=1 spread=0;    NC INPUT: True
-}
vbap :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbap :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbap Int
numChannels Rate
rate Ugen
in_ Ugen
bufnum Ugen
azimuth Ugen
elevation Ugen
spread = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VBAP" [Ugen
in_, Ugen
bufnum, Ugen
azimuth, Ugen
elevation, Ugen
spread] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | a Chebyshev low/highpass filter

 VBChebyFilt [AudioRate] in=0 freq=880 mode=0 order=4
-}
vbChebyFilt :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbChebyFilt :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbChebyFilt Rate
rate Ugen
in_ Ugen
freq Ugen
mode Ugen
order = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VBChebyFilt" [Ugen
in_, Ugen
freq, Ugen
mode, Ugen
order] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | a chaotic oscillator network

 VBFourses [AudioRate] smoother=0.5 *freqarray=0;    MCE=1, REORDERS INPUTS: [1,0]
-}
vbFourses :: Rate -> Ugen -> Ugen -> Ugen
vbFourses :: Rate -> Ugen -> Ugen -> Ugen
vbFourses Rate
rate Ugen
smoother Ugen
freqarray = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VBFourses" [Ugen
smoother] ([Ugen] -> Maybe [Ugen]
forall a. a -> Maybe a
Just [Ugen
freqarray]) Int
4 (Int -> Special
Special Int
0) UgenId
NoId

{- | artifical reverberator

 VBJonVerb [AudioRate] in=0 decay=0.6 damping=0.3 inputbw=0.8 erfl=0.5 tail=0.5;    FILTER: TRUE
-}
vbJonVerb :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbJonVerb :: Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbJonVerb Ugen
in_ Ugen
decay_ Ugen
damping Ugen
inputbw Ugen
erfl Ugen
tail_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"VBJonVerb" [Ugen
in_, Ugen
decay_, Ugen
damping, Ugen
inputbw, Ugen
erfl, Ugen
tail_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | a simple phase vocoder for time-stretching

 VBPVoc [AudioRate] numChannels=0 bufnum=0 playpos=0 fftsize=2048
-}
vbpVoc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbpVoc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vbpVoc Rate
rate Ugen
numChannels Ugen
bufnum Ugen
playpos Ugen
fftsize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VBPVoc" [Ugen
numChannels, Ugen
bufnum, Ugen
playpos, Ugen
fftsize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | lowpass filter for envelope following

 VBSlide [KR,AR] in=0.0 slideup=50.0 slidedown=3000.0;    FILTER: TRUE
-}
vbSlide :: Ugen -> Ugen -> Ugen -> Ugen
vbSlide :: Ugen -> Ugen -> Ugen -> Ugen
vbSlide Ugen
in_ Ugen
slideup Ugen
slidedown = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] ([Int] -> Either Rate [Int]
forall a b. b -> Either a b
Right [Int
0]) String
"VBSlide" [Ugen
in_, Ugen
slideup, Ugen
slidedown] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | 2D scanning pattern virtual machine

 VMScan2D [AudioRate] bufnum=0
-}
vmScan2D :: Rate -> Ugen -> Ugen
vmScan2D :: Rate -> Ugen -> Ugen
vmScan2D Rate
rate Ugen
bufnum = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VMScan2D" [Ugen
bufnum] Maybe [Ugen]
forall a. Maybe a
Nothing Int
2 (Int -> Special
Special Int
0) UgenId
NoId

{- | vosim pulse generator

 VOSIM [AudioRate] trig=0.1 freq=400 nCycles=1 decay=0.9
-}
vosim :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vosim :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vosim Rate
rate Ugen
trig_ Ugen
freq Ugen
nCycles Ugen
decay_ = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VOSIM" [Ugen
trig_, Ugen
freq, Ugen
nCycles, Ugen
decay_] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 VarShapeOsc [ControlRate,AudioRate] freq=100 pw=0.5 waveshape=0.5 sync=1 syncfreq=105
-}
varShapeOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
varShapeOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
varShapeOsc Rate
rate Ugen
freq Ugen
pw Ugen
waveshape Ugen
sync Ugen
syncfreq = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VarShapeOsc" [Ugen
freq, Ugen
pw, Ugen
waveshape, Ugen
sync, Ugen
syncfreq] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 VosimOsc [ControlRate,AudioRate] freq=100 form1freq=951 form2freq=919 shape=0
-}
vosimOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vosimOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
vosimOsc Rate
rate Ugen
freq Ugen
form1freq Ugen
form2freq Ugen
shape = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"VosimOsc" [Ugen
freq, Ugen
form1freq, Ugen
form2freq, Ugen
shape] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | windowed amplitude follower

 WAmp [ControlRate] in=0 winSize=0.1
-}
wAmp :: Rate -> Ugen -> Ugen -> Ugen
wAmp :: Rate -> Ugen -> Ugen -> Ugen
wAmp Rate
rate Ugen
in_ Ugen
winSize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WAmp" [Ugen
in_, Ugen
winSize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | decomposition into square waves, and reconstruction

 WalshHadamard [AudioRate] input=0 which=0
-}
walshHadamard :: Rate -> Ugen -> Ugen -> Ugen
walshHadamard :: Rate -> Ugen -> Ugen -> Ugen
walshHadamard Rate
rate Ugen
input Ugen
which = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WalshHadamard" [Ugen
input, Ugen
which] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Warp a buffer with a time pointer

 WarpZ [AudioRate] bufnum=0 pointer=0 freqScale=1 windowSize=0.2 envbufnum=-1 overlaps=8 windowRandRatio=0 interp=1 zeroSearch=0 zeroStart=0;    NC INPUT: True
-}
warpZ :: Int -> Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
warpZ :: Int
-> Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
warpZ Int
numChannels Rate
rate Ugen
bufnum Ugen
pointer Ugen
freqScale Ugen
windowSize Ugen
envbufnum Ugen
overlaps Ugen
windowRandRatio Ugen
interp Ugen
zeroSearch Ugen
zeroStart = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WarpZ" [Ugen
bufnum, Ugen
pointer, Ugen
freqScale, Ugen
windowSize, Ugen
envbufnum, Ugen
overlaps, Ugen
windowRandRatio, Ugen
interp, Ugen
zeroSearch, Ugen
zeroStart] Maybe [Ugen]
forall a. Maybe a
Nothing Int
numChannels (Int -> Special
Special Int
0) UgenId
NoId

{- | Lose bits of your waves

 WaveLoss [ControlRate,AudioRate] in=0 drop=20 outof=40 mode=1
-}
waveLoss :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
waveLoss :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
waveLoss Rate
rate Ugen
in_ Ugen
drop_ Ugen
outof Ugen
mode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WaveLoss" [Ugen
in_, Ugen
drop_, Ugen
outof, Ugen
mode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | wave terrain synthesis

 WaveTerrain [AudioRate] bufnum=0 x=0 y=0 xsize=100 ysize=100
-}
waveTerrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
waveTerrain :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
waveTerrain Rate
rate Ugen
bufnum Ugen
x Ugen
y Ugen
xsize Ugen
ysize = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WaveTerrain" [Ugen
bufnum, Ugen
x, Ugen
y, Ugen
xsize, Ugen
ysize] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | decomposition into Daub4 wavelets, and reconstruction

 WaveletDaub [AudioRate] input=0 n=64 which=0
-}
waveletDaub :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
waveletDaub :: Rate -> Ugen -> Ugen -> Ugen -> Ugen
waveletDaub Rate
rate Ugen
input Ugen
n Ugen
which = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WaveletDaub" [Ugen
input, Ugen
n, Ugen
which] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Weakly Nonlinear Oscillator

 WeaklyNonlinear [AudioRate] input=0 reset=0 ratex=1 ratey=1 freq=440 initx=0 inity=0 alpha=0 xexponent=0 beta=0 yexponent=0
-}
weaklyNonlinear :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
weaklyNonlinear :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
weaklyNonlinear Rate
rate Ugen
input Ugen
reset Ugen
ratex Ugen
ratey Ugen
freq Ugen
initx Ugen
inity Ugen
alpha Ugen
xexponent Ugen
beta Ugen
yexponent = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WeaklyNonlinear" [Ugen
input, Ugen
reset, Ugen
ratex, Ugen
ratey, Ugen
freq, Ugen
initx, Ugen
inity, Ugen
alpha, Ugen
xexponent, Ugen
beta, Ugen
yexponent] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Weakly Nonlinear Oscillator

 WeaklyNonlinear2 [AudioRate] input=0 reset=0 ratex=1 ratey=1 freq=440 initx=0 inity=0 alpha=0 xexponent=0 beta=0 yexponent=0
-}
weaklyNonlinear2 :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
weaklyNonlinear2 :: Rate
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
-> Ugen
weaklyNonlinear2 Rate
rate Ugen
input Ugen
reset Ugen
ratex Ugen
ratey Ugen
freq Ugen
initx Ugen
inity Ugen
alpha Ugen
xexponent Ugen
beta Ugen
yexponent = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WeaklyNonlinear2" [Ugen
input, Ugen
reset, Ugen
ratex, Ugen
ratey, Ugen
freq, Ugen
initx, Ugen
inity, Ugen
alpha, Ugen
xexponent, Ugen
beta, Ugen
yexponent] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 Werner [AudioRate] input=0 freq=0.5 damp=0.5 feedback=0.5 drive=0 oversample=1
-}
werner :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
werner :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
werner Rate
rate Ugen
input Ugen
freq Ugen
damp Ugen
feedback Ugen
drive Ugen
oversample = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"Werner" [Ugen
input, Ugen
freq, Ugen
damp, Ugen
feedback, Ugen
drive, Ugen
oversample] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | Pulse counter with floating point steps

 WrapSummer [ControlRate,AudioRate] trig=0 step=1 min=0 max=1 reset=0 resetval=0
-}
wrapSummer :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
wrapSummer :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
wrapSummer Rate
rate Ugen
trig_ Ugen
step Ugen
min_ Ugen
max_ Ugen
reset Ugen
resetval = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"WrapSummer" [Ugen
trig_, Ugen
step, Ugen
min_, Ugen
max_, Ugen
reset, Ugen
resetval] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId

{- | (Undocumented class)

 ZOsc [ControlRate,AudioRate] freq=100 formantfreq=91 shape=0.5 mode=0.5
-}
zOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
zOsc :: Rate -> Ugen -> Ugen -> Ugen -> Ugen -> Ugen
zOsc Rate
rate Ugen
freq Ugen
formantfreq Ugen
shape Ugen
mode = Maybe ([Sample] -> Sample)
-> [Rate]
-> Either Rate [Int]
-> String
-> [Ugen]
-> Maybe [Ugen]
-> Int
-> Special
-> UgenId
-> Ugen
mkUgen Maybe ([Sample] -> Sample)
forall a. Maybe a
Nothing [Rate
ControlRate, Rate
AudioRate] (Rate -> Either Rate [Int]
forall a b. a -> Either a b
Left Rate
rate) String
"ZOsc" [Ugen
freq, Ugen
formantfreq, Ugen
shape, Ugen
mode] Maybe [Ugen]
forall a. Maybe a
Nothing Int
1 (Int -> Special
Special Int
0) UgenId
NoId