From a6395245153880a8b67f49631d3c5208c636a940 Mon Sep 17 00:00:00 2001 From: musil Date: Thu, 30 Nov 2006 12:46:20 +0000 Subject: initial commit changed float to t_float -fno-strict-aliasing #pragma obsolete help-*.pd to *-help.pd svn path=/trunk/externals/iem/iem_matrix/; revision=6543 --- src/iem_matrix.c | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 src/iem_matrix.c (limited to 'src/iem_matrix.c') diff --git a/src/iem_matrix.c b/src/iem_matrix.c new file mode 100644 index 0000000..d440162 --- /dev/null +++ b/src/iem_matrix.c @@ -0,0 +1,44 @@ +/* For information on usage and redistribution, and for a DISCLAIMER OF ALL +* WARRANTIES, see the file, "LICENSE.txt," in this distribution. + +iem_matrix written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 */ + +#include "m_pd.h" +#include "iemlib.h" + +static t_class *iem_matrix_class; + +static void *iem_matrix_new(void) +{ + t_object *x = (t_object *)pd_new(iem_matrix_class); + + return (x); +} + +void matrix_mul_line_tilde_setup(void); +void matrix_mul_line8_tilde_setup(void); +void matrix_mul_stat_tilde_setup(void); +void matrix_diag_mul_line_tilde_setup(void); +void matrix_diag_mul_line8_tilde_setup(void); +void matrix_diag_mul_stat_tilde_setup(void); +void matrix_bundle_line_tilde_setup(void); +void matrix_bundle_line8_tilde_setup(void); +void matrix_bundle_stat_tilde_setup(void); + +/* ------------------------ setup routine ------------------------- */ + +void iem_matrix_setup(void) +{ + matrix_mul_line_tilde_setup(); + matrix_mul_line8_tilde_setup(); + matrix_mul_stat_tilde_setup(); + matrix_diag_mul_line_tilde_setup(); + matrix_diag_mul_line8_tilde_setup(); + matrix_diag_mul_stat_tilde_setup(); + matrix_bundle_line_tilde_setup(); + matrix_bundle_line8_tilde_setup(); + matrix_bundle_stat_tilde_setup(); + + post("iem_matrix (R-1.16) library loaded! (c) Thomas Musil 05.2005"); + post(" musil%ciem.at iem KUG Graz Austria", '@'); +} -- cgit v1.2.1