/*
Some things that need to be defined in sclang before some synthdefs can be compiled
*/
/*
//pjt: unfortunately I couldn't get this to work, so I'm making a function for freq=>coefficient instead
//One pole LPF and HPF filters with freq input (instead of coef)
//Thanks to Volker Böhm for the (freq -> coef) conversion formula.
OpLPF
{
*ar
{|in, freq|
^OnePole.ar(in, exp(-2pi * (freq * SampleDur.ir)));
}
}
OpHPF
{
*ar
{|in, freq|
^(in - OnePole.ar(in, exp(-2pi * (freq * SampleDur.ir))));
}
}
*/
//trying this instead...
var opLPfCoeff = { arg freq; exp(-2pi *(freq.value * SampleDur.ir)); };
opLPfCoeff.value(100);