aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--src/makefile_d_ppc4
-rw-r--r--src/makefile_darwin4
-rw-r--r--src/makefile_win4
-rw-r--r--src/tab_carth2polar.c5
-rw-r--r--src/tab_complex_inv.c5
-rw-r--r--src/tab_const.c3
-rw-r--r--src/tab_conv.c15
7 files changed, 24 insertions, 16 deletions
diff --git a/src/makefile_d_ppc b/src/makefile_d_ppc
index 22ef78b..5579fb8 100644
--- a/src/makefile_d_ppc
+++ b/src/makefile_d_ppc
@@ -24,6 +24,8 @@ SRC = tab_abs.c \
tab_copy.c \
tab_counter.c \
tab_cross_corr.c \
+ tab_dbtopow.c \
+ tab_dbtorms.c \
tab_div.c \
tab_eq.c \
tab_eq_scalar.c \
@@ -47,9 +49,11 @@ SRC = tab_abs.c \
tab_mul_scalar.c \
tab_ne.c \
tab_ne_scalar.c \
+ tab_powtodb.c \
tab_reverse.c \
tab_rfft.c \
tab_rifft.c \
+ tab_rmstodb.c \
tab_sqrt.c \
tab_sub.c \
tab_sum.c \
diff --git a/src/makefile_darwin b/src/makefile_darwin
index 8ab9beb..79dc341 100644
--- a/src/makefile_darwin
+++ b/src/makefile_darwin
@@ -29,6 +29,8 @@ SRC = tab_abs.c \
tab_copy.c \
tab_counter.c \
tab_cross_corr.c \
+ tab_dbtopow.c \
+ tab_dbtorms.c \
tab_div.c \
tab_eq.c \
tab_eq_scalar.c \
@@ -52,9 +54,11 @@ SRC = tab_abs.c \
tab_mul_scalar.c \
tab_ne.c \
tab_ne_scalar.c \
+ tab_powtodb.c \
tab_reverse.c \
tab_rfft.c \
tab_rifft.c \
+ tab_rmstodb.c \
tab_sqrt.c \
tab_sub.c \
tab_sum.c \
diff --git a/src/makefile_win b/src/makefile_win
index 97fb9cd..9686ad1 100644
--- a/src/makefile_win
+++ b/src/makefile_win
@@ -31,6 +31,8 @@ SRC = tab_abs.c \
tab_copy.c \
tab_counter.c \
tab_cross_corr.c \
+ tab_dbtopow.c \
+ tab_dbtorms.c \
tab_div.c \
tab_eq.c \
tab_eq_scalar.c \
@@ -54,9 +56,11 @@ SRC = tab_abs.c \
tab_mul_scalar.c \
tab_ne.c \
tab_ne_scalar.c \
+ tab_powtodb.c \
tab_reverse.c \
tab_rfft.c \
tab_rifft.c \
+ tab_rmstodb.c \
tab_sqrt.c \
tab_sub.c \
tab_sum.c \
diff --git a/src/tab_carth2polar.c b/src/tab_carth2polar.c
index 9dccd68..bc450ff 100644
--- a/src/tab_carth2polar.c
+++ b/src/tab_carth2polar.c
@@ -86,7 +86,7 @@ static void tab_carth2polar_bang(t_tab_carth2polar *x)
if(n)
{
t_garray *a;
- t_float rcp_two_pi=0.125f/atan(1.0);
+ t_float rcp_two_pi=0.125/atan(1.0);
for(i=0; i<n; i++)
{
@@ -156,7 +156,7 @@ static void tab_carth2polar_list(t_tab_carth2polar *x, t_symbol *s, int argc, t_
if(n)
{
t_garray *a;
- t_float rcp_two_pi=0.125f/atan(1.0);
+ t_float rcp_two_pi=0.125/atan(1.0);
for(i=0; i<n; i++)
{
@@ -231,5 +231,4 @@ void tab_carth2polar_setup(void)
class_addmethod(tab_carth2polar_class, (t_method)tab_carth2polar_src_im, gensym("src1_im"), A_DEFSYMBOL, 0);
class_addmethod(tab_carth2polar_class, (t_method)tab_carth2polar_dst_mag, gensym("dst_mag"), A_DEFSYMBOL, 0);
class_addmethod(tab_carth2polar_class, (t_method)tab_carth2polar_dst_arg, gensym("dst_arg"), A_DEFSYMBOL, 0);
-// class_sethelpsymbol(tab_carth2polar_class, gensym("iemhelp2/help-tab_carth2polar"));
}
diff --git a/src/tab_complex_inv.c b/src/tab_complex_inv.c
index 3b14af6..f363d05 100644
--- a/src/tab_complex_inv.c
+++ b/src/tab_complex_inv.c
@@ -92,7 +92,7 @@ static void tab_complex_inv_bang(t_tab_complex_inv *x)
re = iemarray_getfloat(vec_src1_re, i);
im = iemarray_getfloat(vec_src1_im, i);
- abs = 1.0f / (re*re + im*im);
+ abs = 1.0 / (re*re + im*im);
iemarray_setfloat(vec_dst_re, i, re*abs);
iemarray_setfloat(vec_dst_im, i, -im*abs);
}
@@ -160,7 +160,7 @@ static void tab_complex_inv_list(t_tab_complex_inv *x, t_symbol *s, int argc, t_
re = iemarray_getfloat(vec_src1_re, i);
im = iemarray_getfloat(vec_src1_im, i);
- abs = 1.0f / (re*re + im*im);
+ abs = 1.0 / (re*re + im*im);
iemarray_setfloat(vec_dst_re, i, re*abs);
iemarray_setfloat(vec_dst_im, i, -im*abs);
}
@@ -235,5 +235,4 @@ void tab_complex_inv_setup(void)
class_addmethod(tab_complex_inv_class, (t_method)tab_complex_inv_src1_im, gensym("src1_im"), A_DEFSYMBOL, 0);
class_addmethod(tab_complex_inv_class, (t_method)tab_complex_inv_src1_im, gensym("src_im"), A_DEFSYMBOL, 0);
class_addmethod(tab_complex_inv_class, (t_method)tab_complex_inv_dst_im, gensym("dst_im"), A_DEFSYMBOL, 0);
-// class_sethelpsymbol(tab_complex_inv_class, gensym("iemhelp2/tab_complex_inv-help"));
}
diff --git a/src/tab_const.c b/src/tab_const.c
index 461f950..7d846a3 100644
--- a/src/tab_const.c
+++ b/src/tab_const.c
@@ -44,7 +44,7 @@ static void tab_const_bang(t_tab_const *x)
t_garray *a;
for(i=0; i<n; i++)
- iemarray_setfloat(vec_dst, i, 0.0f);
+ iemarray_setfloat(vec_dst, i, 0.0);
outlet_bang(x->x_obj.ob_outlet);
a = (t_garray *)pd_findbyclass(x->x_sym_dst, garray_class);
garray_redraw(a);
@@ -156,5 +156,4 @@ void tab_const_setup(void)
class_addfloat(tab_const_class, (t_method)tab_const_float);
class_addlist(tab_const_class, (t_method)tab_const_list);
class_addmethod(tab_const_class, (t_method)tab_const_dst, gensym("dst"), A_DEFSYMBOL, 0);
-// class_sethelpsymbol(tab_const_class, gensym("iemhelp2/tab_const-help"));
}
diff --git a/src/tab_conv.c b/src/tab_conv.c
index 8352faa..164b766 100644
--- a/src/tab_conv.c
+++ b/src/tab_conv.c
@@ -203,7 +203,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
int i, j, k, l, m, n, p;
int ok_src1, ok_src2, ok_dst;
iemarray_t *vec_sig, *vec_ir, *vec_dst;
- t_float sum=0.0f;
+ t_float sum=0.0;
if((argc >= 5) &&
IS_A_FLOAT(argv,0) &&
@@ -257,7 +257,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = m - 1;
for(i=0; i<l; i++)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=i-1; j<i; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -268,7 +268,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = n - m + 1;
for(i=0; i<l; i++)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=m-1; j<m; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -279,7 +279,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = m - 1;
for(i=l-1; i>=0; i--)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=i-1; j<i; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -310,7 +310,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = m - 1;
for(i=0; i<l; i++)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=i-1; j<i; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -324,7 +324,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = n - m + 1;
for(i=0; i<l; i++)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=m-1; j<m; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -338,7 +338,7 @@ static void tab_conv_list(t_tab_conv *x, t_symbol *s, int argc, t_atom *argv)
l = m - 1;
for(i=l-1; i>=0; i--)
{
- sum = 0.0f;
+ sum = 0.0;
for(j=0, k=i-1; j<i; j++, k--)
sum += iemarray_getfloat(vec_sig, j) * iemarray_getfloat(vec_ir, k);
iemarray_setfloat(vec_dst, 0, sum);
@@ -411,5 +411,4 @@ void tab_conv_setup(void)
class_addmethod(tab_conv_class, (t_method)tab_conv_src1, gensym("src1"), A_DEFSYMBOL, 0);
class_addmethod(tab_conv_class, (t_method)tab_conv_src2, gensym("src2"), A_DEFSYMBOL, 0);
class_addmethod(tab_conv_class, (t_method)tab_conv_dst, gensym("dst"), A_DEFSYMBOL, 0);
-// class_sethelpsymbol(tab_conv_class, gensym("iemhelp2/tab_conv-help"));
}
generated by cgit v1.2.1 (git 2.18.0) at 2025-02-22 21:20:07 +0000