changed x_msi to x_float_sig_in

svn path=/trunk/externals/iemlib/; revision=15085

12 files changed, 39 insertions, 39 deletions

diff --git a/iemlib1/src/FIR~.c b/iemlib1/src/FIR~.c
index 608898b..a90825e 100644
--- a/iemlib1/src/FIR~.c
+++ b/iemlib1/src/FIR~.c
@@ -18,7 +18,7 @@ typedef struct _FIR_tilde
   int       x_rw_index;
   int       x_fir_order;
   t_symbol  *x_table_name;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_FIR_tilde;
 
 static t_class *FIR_tilde_class;
@@ -140,7 +140,7 @@ static void *FIR_tilde_new(t_symbol *ref, t_floatarg np)
   t_FIR_tilde *x = (t_FIR_tilde *)pd_new(FIR_tilde_class);
   
   outlet_new(&x->x_obj, &s_signal);
-  x->x_msi = 0;
+  x->x_float_sig_in = 0;
   x->x_table_name = ref;
   x->x_coef_beg = 0;
   if((int)np < 1)
@@ -161,9 +161,7 @@ void FIR_tilde_setup(void)
 {
   FIR_tilde_class = class_new(gensym("FIR~"), (t_newmethod)FIR_tilde_new,
     (t_method)FIR_tilde_free, sizeof(t_FIR_tilde), 0, A_DEFSYM, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(FIR_tilde_class, t_FIR_tilde, x_msi);
+  CLASS_MAINSIGNALIN(FIR_tilde_class, t_FIR_tilde, x_float_sig_in);
   class_addmethod(FIR_tilde_class, (t_method)FIR_tilde_dsp, gensym("dsp"), 0);
-  class_addmethod(FIR_tilde_class, (t_method)FIR_tilde_set,
-    gensym("set"), A_SYMBOL, A_FLOAT, 0);
-//  class_sethelpsymbol(FIR_tilde_class, gensym("iemhelp/help-FIR~"));
+  class_addmethod(FIR_tilde_class, (t_method)FIR_tilde_set, gensym("set"), A_SYMBOL, A_FLOAT, 0);
 }
diff --git a/iemlib1/src/iem_cot4~.c b/iemlib1/src/iem_cot4~.c
index c4e5dc7..4c9c811 100644
--- a/iemlib1/src/iem_cot4~.c
+++ b/iemlib1/src/iem_cot4~.c
@@ -19,7 +19,7 @@ typedef struct _iem_cot4_tilde
 {
   t_object  x_obj;
   t_float   x_sr;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_iem_cot4_tilde;
 
 static t_int *iem_cot4_tilde_perform(t_int *w)
@@ -152,7 +152,7 @@ static void *iem_cot4_tilde_new(void)
   t_iem_cot4_tilde *x = (t_iem_cot4_tilde *)pd_new(iem_cot4_tilde_class);
   
   outlet_new(&x->x_obj, gensym("signal"));
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return (x);
 }
 
@@ -161,7 +161,7 @@ void iem_cot4_tilde_setup(void)
   iem_cot4_tilde_class = class_new(gensym("iem_cot4~"), (t_newmethod)iem_cot4_tilde_new, 0,
     sizeof(t_iem_cot4_tilde), 0, 0);
   class_addcreator((t_newmethod)iem_cot4_tilde_new, gensym("iem_cot~"), 0);
-  CLASS_MAINSIGNALIN(iem_cot4_tilde_class, t_iem_cot4_tilde, x_msi);
+  CLASS_MAINSIGNALIN(iem_cot4_tilde_class, t_iem_cot4_tilde, x_float_sig_in);
   class_addmethod(iem_cot4_tilde_class, (t_method)iem_cot4_tilde_dsp, gensym("dsp"), 0);
   iem_cot4_tilde_maketable();
 //  class_sethelpsymbol(iem_cot4_tilde_class, gensym("iemhelp/help-iem_cot4~"));
diff --git a/iemlib1/src/iem_delay~.c b/iemlib1/src/iem_delay~.c
index 03a1636..dd9c9e4 100644
--- a/iemlib1/src/iem_delay~.c
+++ b/iemlib1/src/iem_delay~.c
@@ -25,7 +25,7 @@ typedef struct _iem_delay_tilde
   int       x_blocksize;
   int       x_delay_samples;
   t_float   x_sr;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_iem_delay_tilde;
 
 static void iem_delay_tilde_cur_del(t_iem_delay_tilde *x, t_floatarg f)
@@ -182,7 +182,7 @@ static void *iem_delay_tilde_new(t_floatarg max_delay_ms, t_floatarg current_del
   x->x_sr = 0.0f;
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
   outlet_new(&x->x_obj, &s_signal);
-  x->x_msi = 0.0f;
+  x->x_float_sig_in = 0.0f;
   return (x);
 }
 
@@ -195,7 +195,7 @@ void iem_delay_tilde_setup(void)
 {
   iem_delay_tilde_class = class_new(gensym("iem_delay~"), (t_newmethod)iem_delay_tilde_new, (t_method)iem_delay_tilde_free,
     sizeof(t_iem_delay_tilde), 0, A_DEFFLOAT, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(iem_delay_tilde_class, t_iem_delay_tilde, x_msi);
+  CLASS_MAINSIGNALIN(iem_delay_tilde_class, t_iem_delay_tilde, x_float_sig_in);
   class_addmethod(iem_delay_tilde_class, (t_method)iem_delay_tilde_dsp, gensym("dsp"), 0);
   class_addmethod(iem_delay_tilde_class, (t_method)iem_delay_tilde_cur_del, gensym("ft1"), A_FLOAT, 0);
 }
diff --git a/iemlib1/src/iem_pow4~.c b/iemlib1/src/iem_pow4~.c
index 838ed5f..38dfbad 100644
--- a/iemlib1/src/iem_pow4~.c
+++ b/iemlib1/src/iem_pow4~.c
@@ -15,7 +15,7 @@ typedef struct _iem_pow4_tilde
 {
   t_object  x_obj;
   t_float   x_exp;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_iem_pow4_tilde;
 
 static void iem_pow4_tilde_ft1(t_iem_pow4_tilde *x, t_floatarg f)
@@ -62,7 +62,7 @@ static void *iem_pow4_tilde_new(t_floatarg f)
   x->x_exp = f;
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
   outlet_new(&x->x_obj, gensym("signal"));
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return (x);
 }
 
@@ -71,7 +71,7 @@ void iem_pow4_tilde_setup(void)
   iem_pow4_tilde_class = class_new(gensym("iem_pow4~"), (t_newmethod)iem_pow4_tilde_new, 0,
     sizeof(t_iem_pow4_tilde), 0, A_DEFFLOAT, 0);
   class_addcreator((t_newmethod)iem_pow4_tilde_new, gensym("icot~"), 0);
-  CLASS_MAINSIGNALIN(iem_pow4_tilde_class, t_iem_pow4_tilde, x_msi);
+  CLASS_MAINSIGNALIN(iem_pow4_tilde_class, t_iem_pow4_tilde, x_float_sig_in);
   class_addmethod(iem_pow4_tilde_class, (t_method)iem_pow4_tilde_dsp, gensym("dsp"), 0);
   class_addmethod(iem_pow4_tilde_class, (t_method)iem_pow4_tilde_ft1, gensym("ft1"), A_FLOAT, 0);
 //  class_sethelpsymbol(iem_pow4_tilde_class, gensym("iemhelp/help-iem_pow4~"));
diff --git a/iemlib1/src/mov_avrg_kern~.c b/iemlib1/src/mov_avrg_kern~.c
index 0b7c160..dbd680f 100644
--- a/iemlib1/src/mov_avrg_kern~.c
+++ b/iemlib1/src/mov_avrg_kern~.c
@@ -19,7 +19,7 @@ typedef struct _mov_avrg_kern_tilde
   double   x_mstime;
   int      x_nsamps;
   int      x_counter;
-  t_float  x_msi;
+  t_float  x_float_sig_in;
 } t_mov_avrg_kern_tilde;
 
 static t_class *mov_avrg_kern_tilde_class;
@@ -120,7 +120,7 @@ static void *mov_avrg_kern_tilde_new(t_floatarg mstime)
   inlet_new(&x->x_obj,  &x->x_obj.ob_pd, &s_signal, &s_signal);
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
   outlet_new(&x->x_obj, &s_signal);
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -128,7 +128,7 @@ void mov_avrg_kern_tilde_setup(void)
 {
   mov_avrg_kern_tilde_class = class_new(gensym("mov_avrg_kern~"), (t_newmethod)mov_avrg_kern_tilde_new,
         0, sizeof(t_mov_avrg_kern_tilde), 0, A_FLOAT, 0);
-  CLASS_MAINSIGNALIN(mov_avrg_kern_tilde_class, t_mov_avrg_kern_tilde, x_msi);
+  CLASS_MAINSIGNALIN(mov_avrg_kern_tilde_class, t_mov_avrg_kern_tilde, x_float_sig_in);
   class_addmethod(mov_avrg_kern_tilde_class, (t_method)mov_avrg_kern_tilde_dsp, gensym("dsp"), 0);
   class_addmethod(mov_avrg_kern_tilde_class, (t_method)mov_avrg_kern_tilde_ft1, gensym("ft1"), A_FLOAT, 0);
   class_addmethod(mov_avrg_kern_tilde_class, (t_method)mov_avrg_kern_tilde_reset, gensym("reset"), 0);
diff --git a/iemlib1/src/peakenv_hold~.c b/iemlib1/src/peakenv_hold~.c
index 715bed9..3e9b09a 100644
--- a/iemlib1/src/peakenv_hold~.c
+++ b/iemlib1/src/peakenv_hold~.c
@@ -9,6 +9,7 @@ iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2010
 #include <math.h>
 
 /* ---------------- peakenv_hold~ - simple peak-envelope-converter with peak hold time and release time. ----------------- */
+/* -- now with double precision; for low-frequency filters it is important to calculate the filter in double precision -- */
 
 typedef struct _peakenv_hold_tilde
 {
@@ -20,7 +21,7 @@ typedef struct _peakenv_hold_tilde
   double   x_holdtime;
   t_int    x_n_hold;
   t_int    x_counter;
-  t_float  x_msi;
+  t_float  x_float_sig_in;
 } t_peakenv_hold_tilde;
 
 static t_class *peakenv_hold_tilde_class;
@@ -105,7 +106,7 @@ static void *peakenv_hold_tilde_new(t_float t_hold, t_float t_rel)
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft2"));
   outlet_new(&x->x_obj, &s_signal);
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -113,7 +114,7 @@ void peakenv_hold_tilde_setup(void)
 {
   peakenv_hold_tilde_class = class_new(gensym("peakenv_hold~"), (t_newmethod)peakenv_hold_tilde_new,
     0, sizeof(t_peakenv_hold_tilde), 0, A_DEFFLOAT, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(peakenv_hold_tilde_class, t_peakenv_hold_tilde, x_msi);
+  CLASS_MAINSIGNALIN(peakenv_hold_tilde_class, t_peakenv_hold_tilde, x_float_sig_in);
   class_addmethod(peakenv_hold_tilde_class, (t_method)peakenv_hold_tilde_dsp, gensym("dsp"), 0);
   class_addmethod(peakenv_hold_tilde_class, (t_method)peakenv_hold_tilde_ft1, gensym("ft1"), A_FLOAT, 0);
    class_addmethod(peakenv_hold_tilde_class, (t_method)peakenv_hold_tilde_ft2, gensym("ft2"), A_FLOAT, 0);
diff --git a/iemlib1/src/peakenv~.c b/iemlib1/src/peakenv~.c
index d9ebeff..9937bcb 100644
--- a/iemlib1/src/peakenv~.c
+++ b/iemlib1/src/peakenv~.c
@@ -9,6 +9,7 @@ iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2010
 #include <math.h>
 
 /* ---------------- peakenv~ - simple peak-envelope-converter. ----------------- */
+/* -- now with double precision; for low-frequency filters it is important to calculate the filter in double precision -- */
 
 typedef struct _peakenv_tilde
 {
@@ -17,7 +18,7 @@ typedef struct _peakenv_tilde
   double   x_old_peak;
   double   x_c1;
   double   x_releasetime;
-  t_float  x_msi;
+  t_float  x_float_sig_in;
 } t_peakenv_tilde;
 
 static t_class *peakenv_tilde_class;
@@ -79,7 +80,7 @@ static void *peakenv_tilde_new(t_floatarg f)
   x->x_old_peak = 0.0;
   inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
   outlet_new(&x->x_obj, &s_signal);
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -87,7 +88,7 @@ void peakenv_tilde_setup(void)
 {
   peakenv_tilde_class = class_new(gensym("peakenv~"), (t_newmethod)peakenv_tilde_new,
     0, sizeof(t_peakenv_tilde), 0, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(peakenv_tilde_class, t_peakenv_tilde, x_msi);
+  CLASS_MAINSIGNALIN(peakenv_tilde_class, t_peakenv_tilde, x_float_sig_in);
   class_addmethod(peakenv_tilde_class, (t_method)peakenv_tilde_dsp, gensym("dsp"), 0);
   class_addmethod(peakenv_tilde_class, (t_method)peakenv_tilde_ft1, gensym("ft1"), A_FLOAT, 0);
   class_addmethod(peakenv_tilde_class, (t_method)peakenv_tilde_reset, gensym("reset"), 0);
diff --git a/iemlib1/src/prvu~.c b/iemlib1/src/prvu~.c
index b79a7fe..591c01e 100644
--- a/iemlib1/src/prvu~.c
+++ b/iemlib1/src/prvu~.c
@@ -30,7 +30,7 @@ typedef struct _prvu_tilde
   t_float   x_release_time;
   t_float   x_c1;
   int       x_started;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_prvu_tilde;
 
 static t_class *prvu_tilde_class;
@@ -251,7 +251,7 @@ static void *prvu_tilde_new(t_floatarg metro_time, t_floatarg hold_time,
   x->x_at[0].a_type = A_FLOAT;
   x->x_at[1].a_type = A_FLOAT;
   x->x_at[2].a_type = A_FLOAT;
-  x->x_msi = 0.0f;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -260,7 +260,7 @@ void prvu_tilde_setup(void)
   prvu_tilde_class = class_new(gensym("prvu~"), (t_newmethod)prvu_tilde_new,
     (t_method)prvu_tilde_ff, sizeof(t_prvu_tilde), 0,
     A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(prvu_tilde_class, t_prvu_tilde, x_msi);
+  CLASS_MAINSIGNALIN(prvu_tilde_class, t_prvu_tilde, x_float_sig_in);
   class_addmethod(prvu_tilde_class, (t_method)prvu_tilde_dsp, gensym("dsp"), 0);
   class_addfloat(prvu_tilde_class, prvu_tilde_float);
   class_addmethod(prvu_tilde_class, (t_method)prvu_tilde_reset, gensym("reset"), 0);
diff --git a/iemlib1/src/pvu~.c b/iemlib1/src/pvu~.c
index dc18f4a..1576b79 100644
--- a/iemlib1/src/pvu~.c
+++ b/iemlib1/src/pvu~.c
@@ -23,7 +23,7 @@ typedef struct _pvu_tilde
   t_float   x_release_time;
   int       x_overflow_counter;
   int       x_started;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_pvu_tilde;
 
 static t_class *pvu_tilde_class;
@@ -172,7 +172,7 @@ static void *pvu_tilde_new(t_floatarg metro_time, t_floatarg release_time, t_flo
   x->x_outlet_meter = outlet_new(&x->x_obj, &s_float);/* left */
   x->x_outlet_over = outlet_new(&x->x_obj, &s_float); /* right */
   x->x_started = 1;
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -185,7 +185,7 @@ void pvu_tilde_setup(void )
 {
   pvu_tilde_class = class_new(gensym("pvu~"), (t_newmethod)pvu_tilde_new,
     (t_method)pvu_tilde_ff, sizeof(t_pvu_tilde), 0, A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(pvu_tilde_class, t_pvu_tilde, x_msi);
+  CLASS_MAINSIGNALIN(pvu_tilde_class, t_pvu_tilde, x_float_sig_in);
   class_addmethod(pvu_tilde_class, (t_method)pvu_tilde_dsp, gensym("dsp"), 0);
   class_addfloat(pvu_tilde_class, pvu_tilde_float);
   class_addmethod(pvu_tilde_class, (t_method)pvu_tilde_reset, gensym("reset"), 0);
diff --git a/iemlib1/src/rvu~.c b/iemlib1/src/rvu~.c
index f295bfb..059a064 100644
--- a/iemlib1/src/rvu~.c
+++ b/iemlib1/src/rvu~.c
@@ -22,7 +22,7 @@ typedef struct _rvu_tilde
   t_float   x_release_time;
   t_float   x_c1;
   int       x_started;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_rvu_tilde;
 
 static t_class *rvu_tilde_class;
@@ -157,7 +157,7 @@ static void *rvu_tilde_new(t_floatarg metro_time, t_floatarg release_time)
   x->x_clock_metro = clock_new(x, (t_method)rvu_tilde_tick_metro);
   x->x_started = 1;
   outlet_new(&x->x_obj, &s_float);
-  x->x_msi = 0.0f;
+  x->x_float_sig_in = 0.0f;
   return(x);
 }
 
@@ -166,7 +166,7 @@ void rvu_tilde_setup(void)
   rvu_tilde_class = class_new(gensym("rvu~"), (t_newmethod)rvu_tilde_new,
     (t_method)rvu_tilde_ff, sizeof(t_rvu_tilde), 0,
     A_DEFFLOAT, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(rvu_tilde_class, t_rvu_tilde, x_msi);
+  CLASS_MAINSIGNALIN(rvu_tilde_class, t_rvu_tilde, x_float_sig_in);
   class_addmethod(rvu_tilde_class, (t_method)rvu_tilde_dsp, gensym("dsp"), 0);
   class_addfloat(rvu_tilde_class, rvu_tilde_float);
   class_addmethod(rvu_tilde_class, (t_method)rvu_tilde_reset, gensym("reset"), 0);
diff --git a/iemlib1/src/sin_phase~.c b/iemlib1/src/sin_phase~.c
index 925be28..0707758 100644
--- a/iemlib1/src/sin_phase~.c
+++ b/iemlib1/src/sin_phase~.c
@@ -20,7 +20,7 @@ typedef struct _sin_phase_tilde
   int      x_counter2;
   int      x_state1;
   int      x_state2;
-  t_float  x_msi;
+  t_float  x_float_sig_in;
 } t_sin_phase_tilde;
 
 static t_class *sin_phase_tilde_class;
@@ -106,7 +106,7 @@ static void *sin_phase_tilde_new(void)
   x->x_counter2 = 0;
   x->x_state1 = 0;
   x->x_state2 = 0;
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   
   return (x);
 }
@@ -115,7 +115,7 @@ void sin_phase_tilde_setup(void)
 {
   sin_phase_tilde_class = class_new(gensym("sin_phase~"), (t_newmethod)sin_phase_tilde_new,
         0, sizeof(t_sin_phase_tilde), 0, 0);
-  CLASS_MAINSIGNALIN(sin_phase_tilde_class, t_sin_phase_tilde, x_msi);
+  CLASS_MAINSIGNALIN(sin_phase_tilde_class, t_sin_phase_tilde, x_float_sig_in);
   class_addmethod(sin_phase_tilde_class, (t_method)sin_phase_tilde_dsp, gensym("dsp"), 0);
 //  class_sethelpsymbol(sin_phase_tilde_class, gensym("iemhelp/help-sin_phase~"));
 }
diff --git a/iemlib1/src/sparse_FIR~.c b/iemlib1/src/sparse_FIR~.c
index 8287179..5a40f66 100644
--- a/iemlib1/src/sparse_FIR~.c
+++ b/iemlib1/src/sparse_FIR~.c
@@ -23,7 +23,7 @@ typedef struct _sparse_FIR_tilde
   int       x_n_order;
   int       x_n_order_malloc;
   int       x_rw_index;
-  t_float   x_msi;
+  t_float   x_float_sig_in;
 } t_sparse_FIR_tilde;
 
 static t_class *sparse_FIR_tilde_class;
@@ -251,7 +251,7 @@ static void *sparse_FIR_tilde_new(t_floatarg fn)
   for(i=0; i<n_order; i++)
     x->x_history_beg[i] = 0.0f;
   
-  x->x_msi = 0;
+  x->x_float_sig_in = 0.0f;
   
   post("NEW: n_coef_resp_order = %d, n_coef = %d, n_coef_malloc = %d, n_order = %d, n_order_malloc = %d", x->x_n_coef_resp_order, x->x_n_coef, x->x_n_coef_malloc, x->x_n_order, x->x_n_order_malloc);
   
@@ -309,7 +309,7 @@ void sparse_FIR_tilde_setup(void)
 {
   sparse_FIR_tilde_class = class_new(gensym("sparse_FIR~"), (t_newmethod)sparse_FIR_tilde_new,
     (t_method)sparse_FIR_tilde_free, sizeof(t_sparse_FIR_tilde), 0, A_DEFFLOAT, 0);
-  CLASS_MAINSIGNALIN(sparse_FIR_tilde_class, t_sparse_FIR_tilde, x_msi);
+  CLASS_MAINSIGNALIN(sparse_FIR_tilde_class, t_sparse_FIR_tilde, x_float_sig_in);
   class_addmethod(sparse_FIR_tilde_class, (t_method)sparse_FIR_tilde_dsp, gensym("dsp"), 0);
   class_addlist(sparse_FIR_tilde_class, (t_method)sparse_FIR_tilde_list);
   class_addmethod(sparse_FIR_tilde_class, (t_method)sparse_FIR_tilde_matrix, gensym("matrix"), A_GIMME, 0);