30 lines
6.9 KiB
Text
30 lines
6.9 KiB
Text
|
|
declare version "2.83.1";
|
||
|
|
declare compile_options "-single -scal -cn eoc_saturation /nix/store/fnjbalzgc6pjm8la292cczxqbr00qmav-faust-2.83.1/bin/faust -lang wasm -e eoc-saturation.dsp -o eoc-saturation.wasm";
|
||
|
|
declare library_path0 "/nix/store/fnjbalzgc6pjm8la292cczxqbr00qmav-faust-2.83.1/share/faust/stdfaust.lib";
|
||
|
|
declare library_path1 "/nix/store/fnjbalzgc6pjm8la292cczxqbr00qmav-faust-2.83.1/share/faust/maths.lib";
|
||
|
|
declare library_path2 "/nix/store/fnjbalzgc6pjm8la292cczxqbr00qmav-faust-2.83.1/share/faust/filters.lib";
|
||
|
|
declare library_path3 "/nix/store/fnjbalzgc6pjm8la292cczxqbr00qmav-faust-2.83.1/share/faust/platform.lib";
|
||
|
|
declare filename "eoc-saturation.dsp";
|
||
|
|
declare filters_lib_lowpass0_highpass1 "Copyright (C) 2003-2019 by Julius O. Smith III <jos@ccrma.stanford.edu>";
|
||
|
|
declare filters_lib_lowpass0_highpass1_author "Julius O. Smith III";
|
||
|
|
declare filters_lib_lowpass_author "Julius O. Smith III";
|
||
|
|
declare filters_lib_lowpass_copyright "Copyright (C) 2003-2019 by Julius O. Smith III <jos@ccrma.stanford.edu>";
|
||
|
|
declare filters_lib_lowpass_license "MIT-style STK-4.3 license";
|
||
|
|
declare filters_lib_name "Faust Filters Library";
|
||
|
|
declare filters_lib_tf1_author "Julius O. Smith III";
|
||
|
|
declare filters_lib_tf1_copyright "Copyright (C) 2003-2019 by Julius O. Smith III <jos@ccrma.stanford.edu>";
|
||
|
|
declare filters_lib_tf1_license "MIT-style STK-4.3 license";
|
||
|
|
declare filters_lib_tf1s_author "Julius O. Smith III";
|
||
|
|
declare filters_lib_tf1s_copyright "Copyright (C) 2003-2019 by Julius O. Smith III <jos@ccrma.stanford.edu>";
|
||
|
|
declare filters_lib_tf1s_license "MIT-style STK-4.3 license";
|
||
|
|
declare filters_lib_version "1.7.1";
|
||
|
|
declare maths_lib_author "GRAME";
|
||
|
|
declare maths_lib_copyright "GRAME";
|
||
|
|
declare maths_lib_license "LGPL with exception";
|
||
|
|
declare maths_lib_name "Faust Math Library";
|
||
|
|
declare maths_lib_version "2.9.0";
|
||
|
|
declare name "eoc-saturation";
|
||
|
|
declare platform_lib_name "Generic Platform Library";
|
||
|
|
declare platform_lib_version "1.3.0";
|
||
|
|
process = \(x1).(\(x2).(((x1,(1.0f,hslider("mix", 1.0f, 0.0f, 1.0f, 0.001f) : -) : *),((((((x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : ffunction(float tanhf(float),<math.h>,"")),(0.0f,(1.0f,(hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),2.0f : *) : -) : max) : *),((((((x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *),1.2f : * : ffunction(float tanhf(float),<math.h>,"")),0.55f : *),((x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : ffunction(float tanhf(float),<math.h>,"")),0.45f : *) : +),((((x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *),(x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *) : *),0.04f : *),(1.0f,(x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : abs : ffunction(float tanhf(float),<math.h>,"")) : -) : *) : +),(1.0f,((hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),0.5f : - : abs),2.0f : *) : -) : *) : +),((-1.0f,(1.0f,(x1,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *) : min) : max),(0.0f,((hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),0.5f : -),2.0f : *) : max) : *) : +),(0.001f,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : + : sqrt) : max) : / : _<:(_,((1,(0,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : *) : +),(1,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : +) : /) : *),(mem : _,((1,(0,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : *) : -),(1,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : +) : /) : *):>+~(_,(0,((1,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : -),(1,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : +) : /) : -) : *)),hslider("mix", 1.0f, 0.0f, 1.0f, 0.001f) : *) : +),((x2,(1.0f,hslider("mix", 1.0f, 0.0f, 1.0f, 0.001f) : -) : *),((((((x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : ffunction(float tanhf(float),<math.h>,"")),(0.0f,(1.0f,(hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),2.0f : *) : -) : max) : *),((((((x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *),1.2f : * : ffunction(float tanhf(float),<math.h>,"")),0.55f : *),((x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : ffunction(float tanhf(float),<math.h>,"")),0.45f : *) : +),((((x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *),(x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *) : *),0.04f : *),(1.0f,(x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : * : abs : ffunction(float tanhf(float),<math.h>,"")) : -) : *) : +),(1.0f,((hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),0.5f : - : abs),2.0f : *) : -) : *) : +),((-1.0f,(1.0f,(x2,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : +) : *) : min) : max),(0.0f,((hslider("character", 0.0f, 0.0f, 1.0f, 0.001f),0.5f : -),2.0f : *) : max) : *) : +),(0.001f,(1.0f,(hslider("drive", 0.0f, 0.0f, 1.0f, 0.001f),15.0f : *) : + : sqrt) : max) : / : _<:(_,((1,(0,(1,(((6.2831855f,(4e+02f,(hslider("tone", 0.5f, 0.0f, 1.0f, 0.001f),1.96e+04f : *) : +) : *),0.5f : *),(1.92e+05f,(1.0f,fconstant(int fSamplingFreq, <math.h>) : max) : min) : / : tan) : /) : *) : +),(1,(1,(((6.2831855f,(4e+02f,(hslider("t
|