/* * Zitarev * * This code has been generated FAUST. * It uses the zitarev module included in the FAUST * standard library (FAUST port by Julius Smith). * It has been modified to work as a Soundpipe module. * * Original Author: Fons Adriaensen * */ #include <stdlib.h>#include <math.h>#include "soundpipe.h"#include "CUI.h" #define max(a,b) ((a < b) ? b : a)#define min(a,b) ((a < b) ? a : b) #ifndef FAUSTFLOAT#define FAUSTFLOAT float#endif static float faustpower2_f(float value) {	return (value * value); } typedef struct { 	float fVec1[32768];	float fVec4[32768];	float fVec8[32768];	float fVec6[16384];	float fVec10[16384];	float fVec12[16384];	float fVec14[16384];	float fVec16[16384];	float fVec0[8192];	float fVec2[8192];	float fVec5[4096];	float fVec7[4096];	float fVec9[4096];	float fVec13[4096];	float fVec15[4096];	float fVec3[2048];	float fVec11[2048];	float fVec17[2048];	float fRec4[3];	float fRec5[3];	float fRec6[3];	float fRec7[3];	float fRec8[3];	float fRec9[3];	float fRec10[3];	float fRec11[3];	float fRec3[3];	float fRec2[3];	float fRec45[3];	float fRec44[3];	float fRec0[2];	float fRec1[2];	float fRec15[2];	float fRec14[2];	float fRec12[2];	float fRec19[2];	float fRec18[2];	float fRec16[2];	float fRec23[2];	float fRec22[2];	float fRec20[2];	float fRec27[2];	float fRec26[2];	float fRec24[2];	float fRec31[2];	float fRec30[2];	float fRec28[2];	float fRec35[2];	float fRec34[2];	float fRec32[2];	float fRec39[2];	float fRec38[2];	float fRec36[2];	float fRec43[2];	float fRec42[2];	float fRec40[2];	FAUSTFLOAT fHslider0;	FAUSTFLOAT fHslider1;	int IOTA;	int fSamplingFreq;	int iConst0;	float fConst1;	FAUSTFLOAT fHslider2;	FAUSTFLOAT fHslider3;	FAUSTFLOAT fHslider4;	FAUSTFLOAT fHslider5;	float fConst2;	float fConst3;	FAUSTFLOAT fHslider6;	float fConst4;	FAUSTFLOAT fHslider7;	FAUSTFLOAT fHslider8;	float fConst5;	FAUSTFLOAT fHslider9;	float fConst6;	int iConst7;	float fConst8;	FAUSTFLOAT fHslider10;	int iConst9;	float fConst10;	float fConst11;	float fConst12;	int iConst13;	int iConst14;	float fConst15;	float fConst16;	float fConst17;	int iConst18;	int iConst19;	float fConst20;	float fConst21;	float fConst22;	int iConst23;	int iConst24;	float fConst25;	float fConst26;	float fConst27;	int iConst28;	int iConst29;	float fConst30;	float fConst31;	float fConst32;	int iConst33;	int iConst34;	float fConst35;	float fConst36;	float fConst37;	int iConst38;	int iConst39;	float fConst40;	float fConst41;	float fConst42;	int iConst43;	int iConst44; } zitarev; static zitarev* newzitarev(void) {	zitarev* dsp = (zitarev*)malloc(sizeof(zitarev));	return dsp;} static void deletezitarev(zitarev* dsp) {	free(dsp);} static void instanceInitzitarev(zitarev* dsp, int samplingFreq) {	dsp->fSamplingFreq = samplingFreq;	dsp->fHslider0 = (FAUSTFLOAT)-20.;	/* C99 loop */	{		int i0;		for (i0 = 0; (i0 < 2); i0 = (i0 + 1)) {			dsp->fRec0[i0] = 0.f; 		} 	}	dsp->fHslider1 = (FAUSTFLOAT)1.;	/* C99 loop */	{		int i1;		for (i1 = 0; (i1 < 2); i1 = (i1 + 1)) {			dsp->fRec1[i1] = 0.f; 		} 	}	dsp->IOTA = 0;	/* C99 loop */	{		int i2;		for (i2 = 0; (i2 < 8192); i2 = (i2 + 1)) {			dsp->fVec0[i2] = 0.f; 		} 	}	dsp->iConst0 = min(192000, max(1, dsp->fSamplingFreq));	dsp->fConst1 = (6.28319f / (float)dsp->iConst0);	dsp->fHslider2 = (FAUSTFLOAT)1500.;	dsp->fHslider3 = (FAUSTFLOAT)0.;	dsp->fHslider4 = (FAUSTFLOAT)315.;	dsp->fHslider5 = (FAUSTFLOAT)0.;	dsp->fConst2 = floorf((0.5f + (0.219991f * (float)dsp->iConst0)));	dsp->fConst3 = ((0.f - (6.90776f * dsp->fConst2)) / (float)dsp->iConst0);	dsp->fHslider6 = (FAUSTFLOAT)2.;	dsp->fConst4 = (6.28319f / (float)dsp->iConst0);	dsp->fHslider7 = (FAUSTFLOAT)6000.;	dsp->fHslider8 = (FAUSTFLOAT)3.;	dsp->fConst5 = (3.14159f / (float)dsp->iConst0);	dsp->fHslider9 = (FAUSTFLOAT)200.;	/* C99 loop */	{		int i3;		for (i3 = 0; (i3 < 2); i3 = (i3 + 1)) {			dsp->fRec15[i3] = 0.f; 		} 	}	/* C99 loop */	{		int i4;		for (i4 = 0; (i4 < 2); i4 = (i4 + 1)) {			dsp->fRec14[i4] = 0.f; 		} 	}	/* C99 loop */	{		int i5;		for (i5 = 0; (i5 < 32768); i5 = (i5 + 1)) {			dsp->fVec1[i5] = 0.f; 		} 	}	dsp->fConst6 = floorf((0.5f + (0.019123f * (float)dsp->iConst0)));	dsp->iConst7 = (int)((int)(dsp->fConst2 - dsp->fConst6) & 32767);	/* C99 loop */	{		int i6;		for (i6 = 0; (i6 < 8192); i6 = (i6 + 1)) {			dsp->fVec2[i6] = 0.f; 		} 	}	dsp->fConst8 = (0.001f * (float)dsp->iConst0);	dsp->fHslider10 = (FAUSTFLOAT)60.;	/* C99 loop */	{		int i7;		for (i7 = 0; (i7 < 2048); i7 = (i7 + 1)) {			dsp->fVec3[i7] = 0.f; 		} 	}	dsp->iConst9 = (int)((int)(dsp->fConst6 - 1.f) & 2047);	/* C99 loop */	{		int i8;		for (i8 = 0; (i8 < 2); i8 = (i8 + 1)) {			dsp->fRec12[i8] = 0.f; 		} 	}	dsp->fConst10 = floorf((0.5f + (0.256891f * (float)dsp->iConst0)));	dsp->fConst11 = ((0.f - (6.90776f * dsp->fConst10)) / (float)dsp->iConst0);	/* C99 loop */	{		int i9;		for (i9 = 0; (i9 < 2); i9 = (i9 + 1)) {			dsp->fRec19[i9] = 0.f; 		} 	}	/* C99 loop */	{		int i10;		for (i10 = 0; (i10 < 2); i10 = (i10 + 1)) {			dsp->fRec18[i10] = 0.f; 		} 	}	/* C99 loop */	{		int i11;		for (i11 = 0; (i11 < 32768); i11 = (i11 + 1)) {			dsp->fVec4[i11] = 0.f; 		} 	}	dsp->fConst12 = floorf((0.5f + (0.027333f * (float)dsp->iConst0)));	dsp->iConst13 = (int)((int)(dsp->fConst10 - dsp->fConst12) & 32767);	/* C99 loop */	{		int i12;		for (i12 = 0; (i12 < 4096); i12 = (i12 + 1)) {			dsp->fVec5[i12] = 0.f; 		} 	}	dsp->iConst14 = (int)((int)(dsp->fConst12 - 1.f) & 4095);	/* C99 loop */	{		int i13;		for (i13 = 0; (i13 < 2); i13 = (i13 + 1)) {			dsp->fRec16[i13] = 0.f; 		} 	}	dsp->fConst15 = floorf((0.5f + (0.192303f * (float)dsp->iConst0)));	dsp->fConst16 = ((0.f - (6.90776f * dsp->fConst15)) / (float)dsp->iConst0);	/* C99 loop */	{		int i14;		for (i14 = 0; (i14 < 2); i14 = (i14 + 1)) {			dsp->fRec23[i14] = 0.f; 		} 	}	/* C99 loop */	{		int i15;		for (i15 = 0; (i15 < 2); i15 = (i15 + 1)) {			dsp->fRec22[i15] = 0.f; 		} 	}	/* C99 loop */	{		int i16;		for (i16 = 0; (i16 < 16384); i16 = (i16 + 1)) {			dsp->fVec6[i16] = 0.f; 		} 	}	dsp->fConst17 = floorf((0.5f + (0.029291f * (float)dsp->iConst0)));	dsp->iConst18 = (int)((int)(dsp->fConst15 - dsp->fConst17) & 16383);	/* C99 loop */	{		int i17;		for (i17 = 0; (i17 < 4096); i17 = (i17 + 1)) {			dsp->fVec7[i17] = 0.f; 		} 	}	dsp->iConst19 = (int)((int)(dsp->fConst17 - 1.f) & 4095);	/* C99 loop */	{		int i18;		for (i18 = 0; (i18 < 2); i18 = (i18 + 1)) {			dsp->fRec20[i18] = 0.f; 		} 	}	dsp->fConst20 = floorf((0.5f + (0.210389f * (float)dsp->iConst0)));	dsp->fConst21 = ((0.f - (6.90776f * dsp->fConst20)) / (float)dsp->iConst0);	/* C99 loop */	{		int i19;		for (i19 = 0; (i19 < 2); i19 = (i19 + 1)) {			dsp->fRec27[i19] = 0.f; 		} 	}	/* C99 loop */	{		int i20;		for (i20 = 0; (i20 < 2); i20 = (i20 + 1)) {			dsp->fRec26[i20] = 0.f; 		} 	}	/* C99 loop */	{		int i21;		for (i21 = 0; (i21 < 32768); i21 = (i21 + 1)) {			dsp->fVec8[i21] = 0.f; 		} 	}	dsp->fConst22 = floorf((0.5f + (0.024421f * (float)dsp->iConst0)));	dsp->iConst23 = (int)((int)(dsp->fConst20 - dsp->fConst22) & 32767);	/* C99 loop */	{		int i22;		for (i22 = 0; (i22 < 4096); i22 = (i22 + 1)) {			dsp->fVec9[i22] = 0.f; 		} 	}	dsp->iConst24 = (int)((int)(dsp->fConst22 - 1.f) & 4095);	/* C99 loop */	{		int i23;		for (i23 = 0; (i23 < 2); i23 = (i23 + 1)) {			dsp->fRec24[i23] = 0.f; 		} 	}	dsp->fConst25 = floorf((0.5f + (0.125f * (float)dsp->iConst0)));	dsp->fConst26 = ((0.f - (6.90776f * dsp->fConst25)) / (float)dsp->iConst0);	/* C99 loop */	{		int i24;		for (i24 = 0; (i24 < 2); i24 = (i24 + 1)) {			dsp->fRec31[i24] = 0.f; 		} 	}	/* C99 loop */	{		int i25;		for (i25 = 0; (i25 < 2); i25 = (i25 + 1)) {			dsp->fRec30[i25] = 0.f; 		} 	}	/* C99 loop */	{		int i26;		for (i26 = 0; (i26 < 16384); i26 = (i26 + 1)) {			dsp->fVec10[i26] = 0.f; 		} 	}	dsp->fConst27 = floorf((0.5f + (0.013458f * (float)dsp->iConst0)));	dsp->iConst28 = (int)((int)(dsp->fConst25 - dsp->fConst27) & 16383);	/* C99 loop */	{		int i27;		for (i27 = 0; (i27 < 2048); i27 = (i27 + 1)) {			dsp->fVec11[i27] = 0.f; 		} 	}	dsp->iConst29 = (int)((int)(dsp->fConst27 - 1.f) & 2047);	/* C99 loop */	{		int i28;		for (i28 = 0; (i28 < 2); i28 = (i28 + 1)) {			dsp->fRec28[i28] = 0.f; 		} 	}	dsp->fConst30 = floorf((0.5f + (0.127837f * (float)dsp->iConst0)));	dsp->fConst31 = ((0.f - (6.90776f * dsp->fConst30)) / (float)dsp->iConst0);	/* C99 loop */	{		int i29;		for (i29 = 0; (i29 < 2); i29 = (i29 + 1)) {			dsp->fRec35[i29] = 0.f; 		} 	}	/* C99 loop */	{		int i30;		for (i30 = 0; (i30 < 2); i30 = (i30 + 1)) {			dsp->fRec34[i30] = 0.f; 		} 	}	/* C99 loop */	{		int i31;		for (i31 = 0; (i31 < 16384); i31 = (i31 + 1)) {			dsp->fVec12[i31] = 0.f; 		} 	}	dsp->fConst32 = floorf((0.5f + (0.031604f * (float)dsp->iConst0)));	dsp->iConst33 = (int)((int)(dsp->fConst30 - dsp->fConst32) & 16383);	/* C99 loop */	{		int i32;		for (i32 = 0; (i32 < 4096); i32 = (i32 + 1)) {			dsp->fVec13[i32] = 0.f; 		}

Lines 1–500 of 1058. Load more