From 05a9e3254454715e09b78f7a7ab788b02b2cbe60 Mon Sep 17 00:00:00 2001 From: musil Date: Fri, 8 Dec 2006 07:47:49 +0000 Subject: makefile help repaired spec2_sqrt~ svn path=/trunk/externals/iem/iem_spec2/; revision=6724 --- src/iem_spec2.c | 76 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 76 insertions(+) create mode 100644 src/iem_spec2.c (limited to 'src/iem_spec2.c') diff --git a/src/iem_spec2.c b/src/iem_spec2.c new file mode 100644 index 0000000..e3059f4 --- /dev/null +++ b/src/iem_spec2.c @@ -0,0 +1,76 @@ +/* For information on usage and redistribution, and for a DISCLAIMER OF ALL +* WARRANTIES, see the file, "LICENSE.txt," in this distribution. + +iem_spec2 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 */ + + +#include "m_pd.h" +#include "iemlib.h" + +static t_class *iem_spec2_class; + +static void *iem_spec2_new(void) +{ + t_object *x = (t_object *)pd_new(iem_spec2_class); + + return (x); +} + +void spec2_1p1z_freq_tilde_setup(void); +void spec2_1p1z_time_tilde_setup(void); +void spec2_abs_tilde_setup(void); +void spec2_add_scalar_tilde_setup(void); +void spec2_add_tilde_setup(void); +void spec2_block_delay_tilde_setup(void); +void spec2_clip_max_tilde_setup(void); +void spec2_clip_min_tilde_setup(void); +void spec2_dbtopow_tilde_setup(void); +void spec2_dbtorms_tilde_setup(void); +void spec2_matrix_bundle_stat_tilde_setup(void); +void spec2_mul_scalar_tilde_setup(void); +void spec2_mul_tilde_setup(void); +void spec2_powtodb_tilde_setup(void); +void spec2_rmstodb_tilde_setup(void); +void spec2_shift_tilde_setup(void); +void spec2_sqrt_tilde_setup(void); +void spec2_stretch_tilde_setup(void); +void spec2_sub_tilde_setup(void); +void spec2_sum_tilde_setup(void); +void spec2_tab_conv_tilde_setup(void); +void spec2_tabreceive_enable_tilde_setup(void); +void spec2_tabreceive_tilde_setup(void); + +/* ------------------------ setup routine ------------------------- */ + +void iem_spec2_setup(void) +{ + iem_spec2_class = class_new(gensym("iem_spec2"), iem_spec2_new, 0, + sizeof(t_object), CLASS_NOINLET, 0); + + spec2_1p1z_freq_tilde_setup(); + spec2_1p1z_time_tilde_setup(); + spec2_abs_tilde_setup(); + spec2_add_scalar_tilde_setup(); + spec2_add_tilde_setup(); + spec2_block_delay_tilde_setup(); + spec2_clip_max_tilde_setup(); + spec2_clip_min_tilde_setup(); + spec2_dbtopow_tilde_setup(); + spec2_dbtorms_tilde_setup(); + spec2_matrix_bundle_stat_tilde_setup(); + spec2_mul_scalar_tilde_setup(); + spec2_mul_tilde_setup(); + spec2_powtodb_tilde_setup(); + spec2_rmstodb_tilde_setup(); + spec2_shift_tilde_setup(); + spec2_sqrt_tilde_setup(); + spec2_stretch_tilde_setup(); + spec2_sub_tilde_setup(); + spec2_sum_tilde_setup(); + spec2_tab_conv_tilde_setup(); + spec2_tabreceive_enable_tilde_setup(); + spec2_tabreceive_tilde_setup(); + + post("iem_spec2 (R-1.16) library loaded! (c) Thomas Musil 05.2005"); + post(" musil%ciem.at iem KUG Graz Austria", '@'); +} -- cgit v1.2.1