Lines Matching defs:mf
55 formantFilter_t mf = (formantFilter_t) f;
60 if (Tcl_GetDoubleFromObj(interp, objv[0], &(mf->freq)) != TCL_OK) {
65 if (Tcl_GetDoubleFromObj(interp, objv[0], &(mf->freq)) != TCL_OK) {
68 if (Tcl_GetDoubleFromObj(interp, objv[1], &(mf->bw)) != TCL_OK) {
90 formantFilter_t mf;
93 mf = (formantFilter_t) ckalloc(sizeof(formantFilter));
95 mf->freq = 0;
96 mf->bw = 1;
98 if (formantConfigProc((Snack_Filter) mf, interp, objc, objv) != TCL_OK) {
101 return (Snack_Filter) mf;
107 formantFilter_t mf = (formantFilter_t) f;
112 calcCoeffs(1.0*mf->freq/si->rate,
113 1.0*mf->bw/si->rate,
114 &mf->a0,&mf->b0,&mf->c0);
115 mf->mem[0] = 0.0;
116 mf->mem[1] = 0.0;
127 formantFilter_t mf = (formantFilter_t) f;
131 calcCoeffs(1.0*mf->freq/si->rate,
132 1.0*mf->bw/si->rate,
134 a[0]=mf->a0;b[0]=mf->b0;c[0]=mf->c0;
146 out[0] = (float)(LIN(a,0*z)*in[0]+LIN(b,0*z)*mf->mem[0]+LIN(c,0*z)*mf->mem[1]);
149 out[1] = (float)(LIN(a,1*z)*in[1]+LIN(b,1*z)*out[0]+LIN(c,1*z)*mf->mem[0]);
156 if (nf>=1) mf->mem[0]=out[nf-1];
157 if (nf>=2) mf->mem[1]=out[nf-2];
158 mf->a0=a[1];
159 mf->b0=b[1];
160 mf->c0=c[1];
223 generatorFilter_t mf = (generatorFilter_t) f;
233 if (Tcl_GetIntFromObj(interp,objv[4],&mf->ntot)==TCL_ERROR) {
240 mf->type = RECTANGLE;
242 mf->type = TRIANGLE;
244 mf->type = SINE;
246 mf->type = NOISE;
248 mf->type = SAMPLED;
257 if (Tcl_GetDoubleFromObj(interp,objv[2],&mf->shape[1])==TCL_ERROR) {
262 if (Tcl_GetDoubleFromObj(interp,objv[1],&mf->ampl[1])==TCL_ERROR) {
267 if (Tcl_GetDoubleFromObj(interp,objv[0],&mf->freq[1])==TCL_ERROR) {
282 generatorFilter_t mf;
284 mf = (generatorFilter_t) ckalloc(sizeof(generatorFilter));
285 mf->freq[1] = 0;
286 mf->ampl[1] = 0;
287 mf->type = SINE;
288 mf->shape[1] = 0.5;
289 mf->_phase = 0.0;
290 mf->ntot = -1;
291 if (generatorConfigProc((Snack_Filter) mf, interp, objc, objv) != TCL_OK) {
294 return (Snack_Filter) mf;
301 generatorFilter_t mf = (generatorFilter_t) f;
304 mf->freq[0] = mf->freq[1];
305 mf->ampl[0] = mf->ampl[1];
306 mf->shape[0] = mf->shape[1];
307 mf->_phase = 0.0;
308 mf->nSamples = 0;
309 mf->ngen = 0;
310 mf->maxval = 1.0;
319 generatorFilter_t mf = (generatorFilter_t) f;
321 double y = 1.0/RAND_MAX, z = 1.0/(*outFrames), ph = mf->_phase;
326 if (mf->ntot>0 && mf->ngen + (*outFrames) > mf->ntot) {
327 *outFrames = mf->ntot - mf->ngen;
332 ii = i+mf->nSamples;
334 tmp = mf->samples[ii] = in[i];
335 if (fabs(tmp) > mf->maxval) { mf->maxval = (float) fabs(tmp);}
337 mf->nSamples += i;
341 switch (mf->type) {
347 out[i++]=(float)(LIN(mf->ampl,frac)*2*(y*rand()-.5));
357 ph = fmod (ph + LIN(mf->freq,frac)/si->rate,1.0);
359 out[i++] = (float)(LIN(mf->ampl,frac)*(ph<LIN(mf->shape,frac)?-1:1));
369 ph = fmod (ph + LIN(mf->freq,frac)/si->rate,1.0);
371 if (ph < LIN(mf->shape,frac)) {
372 out[i++] = (float)(LIN(mf->ampl,frac)*(-1+2*(ph)/LIN(mf->shape,frac)));
373 } else if (ph > LIN(mf->shape,frac)) {
374 out[i++] = (float)(LIN(mf->ampl,frac)*(1-2*(ph-LIN(mf->shape,frac))/(1-LIN(mf->shape,frac))));
376 out[i++] = (float)LIN(mf->ampl,frac);
387 ph = fmod (ph + LIN(mf->freq,frac)/si->rate,1.0);
389 b = 2*LIN(mf->shape,frac)-1;
395 out[i++] = (float)(LIN(mf->ampl,frac)*(a-.5-.5*b)/(1-b));
404 if (mf->nSamples > 0) {
407 ph = fmod (ph + LIN(mf->freq,frac)/si->rate,1.0);
408 a = ph*(mf->nSamples);
410 i1 = (int)ceil(a)%mf->nSamples;
411 v[0] = mf->samples[i0];
412 v[1] = mf->samples[i1];
415 out[i++] = (float)(LIN(v,frac)*LIN(mf->ampl,frac)/mf->maxval);
428 mf->_phase = ph; /* save current phase value */
429 mf->freq[0] = mf->freq[1];
430 mf->ampl[0] = mf->ampl[1];
431 mf->shape[0] = mf->shape[1];
433 mf->ngen += *outFrames;