Csound Csound-dev Csound-tekno Search About

[Csnd-dev] An unexplained file

Date2019-01-06 19:30
FromJohn
Subject[Csnd-dev] An unexplained file
Just trying to de-clutter my computers...

I have a short file called abdullah.c from 2013 or earlier of whose
provenance I do not know.  Slight memory was that it was a filter that
ran into licencing issues (it says "licenced under The Beneficient
Open-Source Licence" whatever that is) and a comment says `Osc
“lo-emph”, for emulating the analog-charateristic of more saturation
in the low-freq. (due to saturated buffers).'

Does any of this mean anything to anyone?  The stye of code reminds me of
some PD code I think.  Anyway is it useful; should I keep it?
Whatever?

==John ffitch

------------------------------------------------------------------------
//licenced under The Beneficient Open-Source Licence.
// Osc “lo-emph”, for emulating the analog-charateristic of more saturation in the low-freq. (due to saturated buffers).
b_lo = b_lo + ((-b_lo + b_v) * b_lfr); // lowpass for getting low-freq.
b_v = b_v – b_lo;  // subtract lowfreq,  can be optimized out, just quick code I wrote without bothering with that at the time.
b_v = b_v + (b_lo * b_lgn); // gain for low-frequency, on voice.

b_v = b_v – ((b_aflt5 - b_v)*b_fres); // negative feedback for resonance, subtraction to avoid attenuation, and not-constant-Q volume artifacts associated with that. To-do: "constant-q" compensation. Alt. b_aflt4 if one does not want to include the hp.
b_v = b_v * b_off2; // gain offset for clippers.
b_v = b_v + ((fvar90-0.5)*2); // bias for clippers
// clipping - clippers can also be softened, but synthoscs do not need it. Four feedbackpaths in series, with a clipper on the input signal (4 pole “ladder” filter). Set variable gradual clipping (gradually lower), for similar sound to analog. Which also makes the overall filter less than 24dB, like analog. (ct1 = clipthreshold 1, etc.)
if (b_v > b_ct1) {b_v = b_ct1;} else if (b_v < -b_ct1) {b_v = -b_ct1;}
b_aflt1 = b_aflt1 + ((-b_aflt1 + b_v) * b_fenva); b_v = b_aflt1;
if (b_v > b_ct2) {b_v = b_ct2;} else if (b_v < -b_ct2) {b_v = -b_ct2;}
b_aflt2 = b_aflt2 + ((-b_aflt2 + b_v) * b_fenva); b_v = b_aflt2;
if (b_v > b_ct3) {b_v = b_ct3;} else if (b_v < -b_ct3) {b_v = -b_ct3;}
b_aflt3 = b_aflt3 + ((-b_aflt3 + b_v) * b_fenva); b_v = b_aflt3;
if (b_v > b_ct4) {b_v = b_ct4;} else if (b_v < -b_ct4) {b_v = -b_ct4;}
b_aflt4 = b_aflt4 + ((-b_aflt4 + b_v) * b_fenva); b_v = b_aflt4;
b_v = b_aflt4;
b_v = b_v – ((fvar90-0.5)*2); // subtract bias
b_v = b_v / b_off2; // remove gainoffset

b_hp = b_hp + ((-b_hp + b_v) * b_fhp); // highpass to emulate analog, and get nice resonance, and also remove DC. Fits perfectly for  the design.
b_v = b_v – b_hp;
b_aflt5 = b_v;

Date2019-01-07 14:11
FromAnders Genell
SubjectRe: [Csnd-dev] An unexplained file
It seems to have been posted in the LAD list by some Ove Karlsen who in the continuation of the mail thread goes on to be severely abusive. He seems also to have made up that licence himself, so it does not seem to hold any legal value.
Whether he is actually the author of the code is not entirely certain.


Regards,
Anders


On Sun, Jan 6, 2019 at 8:30 PM John <jpff@codemist.co.uk> wrote:
Just trying to de-clutter my computers...

I have a short file called abdullah.c from 2013 or earlier of whose
provenance I do not know.  Slight memory was that it was a filter that
ran into licencing issues (it says "licenced under The Beneficient
Open-Source Licence" whatever that is) and a comment says `Osc
“lo-emph”, for emulating the analog-charateristic of more saturation
in the low-freq. (due to saturated buffers).'

Does any of this mean anything to anyone?  The stye of code reminds me of
some PD code I think.  Anyway is it useful; should I keep it?
Whatever?

==John ffitch

------------------------------------------------------------------------
//licenced under The Beneficient Open-Source Licence.
// Osc “lo-emph”, for emulating the analog-charateristic of more saturation in the low-freq. (due to saturated buffers).
b_lo = b_lo + ((-b_lo + b_v) * b_lfr); // lowpass for getting low-freq.
b_v = b_v – b_lo;  // subtract lowfreq,  can be optimized out, just quick code I wrote without bothering with that at the time.
b_v = b_v + (b_lo * b_lgn); // gain for low-frequency, on voice.

b_v = b_v – ((b_aflt5 - b_v)*b_fres); // negative feedback for resonance, subtraction to avoid attenuation, and not-constant-Q volume artifacts associated with that. To-do: "constant-q" compensation. Alt. b_aflt4 if one does not want to include the hp.
b_v = b_v * b_off2; // gain offset for clippers.
b_v = b_v + ((fvar90-0.5)*2); // bias for clippers
// clipping - clippers can also be softened, but synthoscs do not need it. Four feedbackpaths in series, with a clipper on the input signal (4 pole “ladder” filter). Set variable gradual clipping (gradually lower), for similar sound to analog. Which also makes the overall filter less than 24dB, like analog. (ct1 = clipthreshold 1, etc.)
if (b_v > b_ct1) {b_v = b_ct1;} else if (b_v < -b_ct1) {b_v = -b_ct1;}
b_aflt1 = b_aflt1 + ((-b_aflt1 + b_v) * b_fenva); b_v = b_aflt1;
if (b_v > b_ct2) {b_v = b_ct2;} else if (b_v < -b_ct2) {b_v = -b_ct2;}
b_aflt2 = b_aflt2 + ((-b_aflt2 + b_v) * b_fenva); b_v = b_aflt2;
if (b_v > b_ct3) {b_v = b_ct3;} else if (b_v < -b_ct3) {b_v = -b_ct3;}
b_aflt3 = b_aflt3 + ((-b_aflt3 + b_v) * b_fenva); b_v = b_aflt3;
if (b_v > b_ct4) {b_v = b_ct4;} else if (b_v < -b_ct4) {b_v = -b_ct4;}
b_aflt4 = b_aflt4 + ((-b_aflt4 + b_v) * b_fenva); b_v = b_aflt4;
b_v = b_aflt4;
b_v = b_v – ((fvar90-0.5)*2); // subtract bias
b_v = b_v / b_off2; // remove gainoffset

b_hp = b_hp + ((-b_hp + b_v) * b_fhp); // highpass to emulate analog, and get nice resonance, and also remove DC. Fits perfectly for  the design.
b_v = b_v – b_hp;
b_aflt5 = b_v;
------------------------------------------------------------------------

Date2019-01-07 14:13
FromMichael Gogins
SubjectRe: [Csnd-dev] An unexplained file
Making up a license oneself does NOT mean the license has no legal
value. That depends mostly on whether it conflicts with existing law,
or with itself.

Regards,
Mike

-----------------------------------------------------
Michael Gogins
Irreducible Productions
http://michaelgogins.tumblr.com
Michael dot Gogins at gmail dot com

On Mon, Jan 7, 2019 at 9:12 AM Anders Genell  wrote:
>
> It seems to have been posted in the LAD list by some Ove Karlsen who in the continuation of the mail thread goes on to be severely abusive. He seems also to have made up that licence himself, so it does not seem to hold any legal value.
> Whether he is actually the author of the code is not entirely certain.
>
> http://lalists.stanford.edu/lad/2013/01/0025.html
>
> Regards,
> Anders
>
>
> On Sun, Jan 6, 2019 at 8:30 PM John  wrote:
>>
>> Just trying to de-clutter my computers...
>>
>> I have a short file called abdullah.c from 2013 or earlier of whose
>> provenance I do not know.  Slight memory was that it was a filter that
>> ran into licencing issues (it says "licenced under The Beneficient
>> Open-Source Licence" whatever that is) and a comment says `Osc
>> “lo-emph”, for emulating the analog-charateristic of more saturation
>> in the low-freq. (due to saturated buffers).'
>>
>> Does any of this mean anything to anyone?  The stye of code reminds me of
>> some PD code I think.  Anyway is it useful; should I keep it?
>> Whatever?
>>
>> ==John ffitch
>>
>> ------------------------------------------------------------------------
>> //licenced under The Beneficient Open-Source Licence.
>> // Osc “lo-emph”, for emulating the analog-charateristic of more saturation in the low-freq. (due to saturated buffers).
>> b_lo = b_lo + ((-b_lo + b_v) * b_lfr); // lowpass for getting low-freq.
>> b_v = b_v – b_lo;  // subtract lowfreq,  can be optimized out, just quick code I wrote without bothering with that at the time.
>> b_v = b_v + (b_lo * b_lgn); // gain for low-frequency, on voice.
>>
>> b_v = b_v – ((b_aflt5 - b_v)*b_fres); // negative feedback for resonance, subtraction to avoid attenuation, and not-constant-Q volume artifacts associated with that. To-do: "constant-q" compensation. Alt. b_aflt4 if one does not want to include the hp.
>> b_v = b_v * b_off2; // gain offset for clippers.
>> b_v = b_v + ((fvar90-0.5)*2); // bias for clippers
>> // clipping - clippers can also be softened, but synthoscs do not need it. Four feedbackpaths in series, with a clipper on the input signal (4 pole “ladder” filter). Set variable gradual clipping (gradually lower), for similar sound to analog. Which also makes the overall filter less than 24dB, like analog. (ct1 = clipthreshold 1, etc.)
>> if (b_v > b_ct1) {b_v = b_ct1;} else if (b_v < -b_ct1) {b_v = -b_ct1;}
>> b_aflt1 = b_aflt1 + ((-b_aflt1 + b_v) * b_fenva); b_v = b_aflt1;
>> if (b_v > b_ct2) {b_v = b_ct2;} else if (b_v < -b_ct2) {b_v = -b_ct2;}
>> b_aflt2 = b_aflt2 + ((-b_aflt2 + b_v) * b_fenva); b_v = b_aflt2;
>> if (b_v > b_ct3) {b_v = b_ct3;} else if (b_v < -b_ct3) {b_v = -b_ct3;}
>> b_aflt3 = b_aflt3 + ((-b_aflt3 + b_v) * b_fenva); b_v = b_aflt3;
>> if (b_v > b_ct4) {b_v = b_ct4;} else if (b_v < -b_ct4) {b_v = -b_ct4;}
>> b_aflt4 = b_aflt4 + ((-b_aflt4 + b_v) * b_fenva); b_v = b_aflt4;
>> b_v = b_aflt4;
>> b_v = b_v – ((fvar90-0.5)*2); // subtract bias
>> b_v = b_v / b_off2; // remove gainoffset
>>
>> b_hp = b_hp + ((-b_hp + b_v) * b_fhp); // highpass to emulate analog, and get nice resonance, and also remove DC. Fits perfectly for  the design.
>> b_v = b_v – b_hp;
>> b_aflt5 = b_v;

Date2019-01-07 14:37
FromAnders Genell
SubjectRe: [Csnd-dev] An unexplained file
True, I was not expressing myself well. 
I meant it has no value since he is not using any of the widely adopted licenses. It of course has legal value, in the way you say.

Regards,
Anders

> 7 jan. 2019 kl. 15:13 skrev Michael Gogins :
> 
> Making up a license oneself does NOT mean the license has no legal
> value. That depends mostly on whether it conflicts with existing law,
> or with itself.
> 
> Regards,
> Mike
> 
> -----------------------------------------------------
> Michael Gogins
> Irreducible Productions
> http://michaelgogins.tumblr.com
> Michael dot Gogins at gmail dot com
> 
>> On Mon, Jan 7, 2019 at 9:12 AM Anders Genell  wrote:
>> 
>> It seems to have been posted in the LAD list by some Ove Karlsen who in the continuation of the mail thread goes on to be severely abusive. He seems also to have made up that licence himself, so it does not seem to hold any legal value.
>> Whether he is actually the author of the code is not entirely certain.
>> 
>> http://lalists.stanford.edu/lad/2013/01/0025.html
>> 
>> Regards,
>> Anders
>> 
>> 
>>> On Sun, Jan 6, 2019 at 8:30 PM John  wrote:
>>> 
>>> Just trying to de-clutter my computers...
>>> 
>>> I have a short file called abdullah.c from 2013 or earlier of whose
>>> provenance I do not know.  Slight memory was that it was a filter that
>>> ran into licencing issues (it says "licenced under The Beneficient
>>> Open-Source Licence" whatever that is) and a comment says `Osc
>>> “lo-emph”, for emulating the analog-charateristic of more saturation
>>> in the low-freq. (due to saturated buffers).'
>>> 
>>> Does any of this mean anything to anyone?  The stye of code reminds me of
>>> some PD code I think.  Anyway is it useful; should I keep it?
>>> Whatever?
>>> 
>>> ==John ffitch
>>> 
>>> ------------------------------------------------------------------------
>>> //licenced under The Beneficient Open-Source Licence.
>>> // Osc “lo-emph”, for emulating the analog-charateristic of more saturation in the low-freq. (due to saturated buffers).
>>> b_lo = b_lo + ((-b_lo + b_v) * b_lfr); // lowpass for getting low-freq.
>>> b_v = b_v – b_lo;  // subtract lowfreq,  can be optimized out, just quick code I wrote without bothering with that at the time.
>>> b_v = b_v + (b_lo * b_lgn); // gain for low-frequency, on voice.
>>> 
>>> b_v = b_v – ((b_aflt5 - b_v)*b_fres); // negative feedback for resonance, subtraction to avoid attenuation, and not-constant-Q volume artifacts associated with that. To-do: "constant-q" compensation. Alt. b_aflt4 if one does not want to include the hp.
>>> b_v = b_v * b_off2; // gain offset for clippers.
>>> b_v = b_v + ((fvar90-0.5)*2); // bias for clippers
>>> // clipping - clippers can also be softened, but synthoscs do not need it. Four feedbackpaths in series, with a clipper on the input signal (4 pole “ladder” filter). Set variable gradual clipping (gradually lower), for similar sound to analog. Which also makes the overall filter less than 24dB, like analog. (ct1 = clipthreshold 1, etc.)
>>> if (b_v > b_ct1) {b_v = b_ct1;} else if (b_v < -b_ct1) {b_v = -b_ct1;}
>>> b_aflt1 = b_aflt1 + ((-b_aflt1 + b_v) * b_fenva); b_v = b_aflt1;
>>> if (b_v > b_ct2) {b_v = b_ct2;} else if (b_v < -b_ct2) {b_v = -b_ct2;}
>>> b_aflt2 = b_aflt2 + ((-b_aflt2 + b_v) * b_fenva); b_v = b_aflt2;
>>> if (b_v > b_ct3) {b_v = b_ct3;} else if (b_v < -b_ct3) {b_v = -b_ct3;}
>>> b_aflt3 = b_aflt3 + ((-b_aflt3 + b_v) * b_fenva); b_v = b_aflt3;
>>> if (b_v > b_ct4) {b_v = b_ct4;} else if (b_v < -b_ct4) {b_v = -b_ct4;}
>>> b_aflt4 = b_aflt4 + ((-b_aflt4 + b_v) * b_fenva); b_v = b_aflt4;
>>> b_v = b_aflt4;
>>> b_v = b_v – ((fvar90-0.5)*2); // subtract bias
>>> b_v = b_v / b_off2; // remove gainoffset
>>> 
>>> b_hp = b_hp + ((-b_hp + b_v) * b_fhp); // highpass to emulate analog, and get nice resonance, and also remove DC. Fits perfectly for  the design.
>>> b_v = b_v – b_hp;
>>> b_aflt5 = b_v;

Date2019-01-07 16:21
Fromjpff
SubjectRe: [Csnd-dev] An unexplained file
Except I cannot find a statement of this licence so it is best just 
deleted


On Mon, 7 Jan 2019, Anders Genell wrote:

> True, I was not expressing myself well.
> I meant it has no value since he is not using any of the widely adopted licenses. It of course has legal value, in the way you say.
>
> Regards,
> Anders
>
>> 7 jan. 2019 kl. 15:13 skrev Michael Gogins :
>>
>> Making up a license oneself does NOT mean the license has no legal
>> value. That depends mostly on whether it conflicts with existing law,
>> or with itself.
>>
>> Regards,
>> Mike
>>
>> -----------------------------------------------------
>> Michael Gogins
>> Irreducible Productions
>> http://michaelgogins.tumblr.com
>> Michael dot Gogins at gmail dot com
>>
>>> On Mon, Jan 7, 2019 at 9:12 AM Anders Genell  wrote:
>>>
>>> It seems to have been posted in the LAD list by some Ove Karlsen who in the continuation of the mail thread goes on to be severely abusive. He seems also to have made up that licence himself, so it does not seem to hold any legal value.
>>> Whether he is actually the author of the code is not entirely certain.
>>>
>>> http://lalists.stanford.edu/lad/2013/01/0025.html
>>>
>>> Regards,
>>> Anders
>>>
>>>
>>>> On Sun, Jan 6, 2019 at 8:30 PM John  wrote:
>>>>
>>>> Just trying to de-clutter my computers...
>>>>
>>>> I have a short file called abdullah.c from 2013 or earlier of whose
>>>> provenance I do not know.  Slight memory was that it was a filter that
>>>> ran into licencing issues (it says "licenced under The Beneficient
>>>> Open-Source Licence" whatever that is) and a comment says `Osc
>>>> “lo-emph”, for emulating the analog-charateristic of more saturation
>>>> in the low-freq. (due to saturated buffers).'
>>>>
>>>> Does any of this mean anything to anyone?  The stye of code reminds me of
>>>> some PD code I think.  Anyway is it useful; should I keep it?
>>>> Whatever?
>>>>
>>>> ==John ffitch
>>>>
>>>> ------------------------------------------------------------------------
>>>> //licenced under The Beneficient Open-Source Licence.
>>>> // Osc “lo-emph”, for emulating the analog-charateristic of more saturation in the low-freq. (due to saturated buffers).
>>>> b_lo = b_lo + ((-b_lo + b_v) * b_lfr); // lowpass for getting low-freq.
>>>> b_v = b_v – b_lo;  // subtract lowfreq,  can be optimized out, just quick code I wrote without bothering with that at the time.
>>>> b_v = b_v + (b_lo * b_lgn); // gain for low-frequency, on voice.
>>>>
>>>> b_v = b_v – ((b_aflt5 - b_v)*b_fres); // negative feedback for resonance, subtraction to avoid attenuation, and not-constant-Q volume artifacts associated with that. To-do: "constant-q" compensation. Alt. b_aflt4 if one does not want to include the hp.
>>>> b_v = b_v * b_off2; // gain offset for clippers.
>>>> b_v = b_v + ((fvar90-0.5)*2); // bias for clippers
>>>> // clipping - clippers can also be softened, but synthoscs do not need it. Four feedbackpaths in series, with a clipper on the input signal (4 pole “ladder” filter). Set variable gradual clipping (gradually lower), for similar sound to analog. Which also makes the overall filter less than 24dB, like analog. (ct1 = clipthreshold 1, etc.)
>>>> if (b_v > b_ct1) {b_v = b_ct1;} else if (b_v < -b_ct1) {b_v = -b_ct1;}
>>>> b_aflt1 = b_aflt1 + ((-b_aflt1 + b_v) * b_fenva); b_v = b_aflt1;
>>>> if (b_v > b_ct2) {b_v = b_ct2;} else if (b_v < -b_ct2) {b_v = -b_ct2;}
>>>> b_aflt2 = b_aflt2 + ((-b_aflt2 + b_v) * b_fenva); b_v = b_aflt2;
>>>> if (b_v > b_ct3) {b_v = b_ct3;} else if (b_v < -b_ct3) {b_v = -b_ct3;}
>>>> b_aflt3 = b_aflt3 + ((-b_aflt3 + b_v) * b_fenva); b_v = b_aflt3;
>>>> if (b_v > b_ct4) {b_v = b_ct4;} else if (b_v < -b_ct4) {b_v = -b_ct4;}
>>>> b_aflt4 = b_aflt4 + ((-b_aflt4 + b_v) * b_fenva); b_v = b_aflt4;
>>>> b_v = b_aflt4;
>>>> b_v = b_v – ((fvar90-0.5)*2); // subtract bias
>>>> b_v = b_v / b_off2; // remove gainoffset
>>>>
>>>> b_hp = b_hp + ((-b_hp + b_v) * b_fhp); // highpass to emulate analog, and get nice resonance, and also remove DC. Fits perfectly for  the design.
>>>> b_v = b_v – b_hp;
>>>> b_aflt5 = b_v;
>>>> ------------------------------------------------------------------------