From a811b7577b93318f34ac40c952f700a64de1509c Mon Sep 17 00:00:00 2001 From: Franz Zotter Date: Sun, 11 Oct 2009 21:27:22 +0000 Subject: removed comments svn path=/trunk/externals/iem/iemmatrix/; revision=12578 --- src/mtx_spherical_harmonics/sph_radial.c | 2 -- src/mtx_spherical_radial.c | 4 ---- 2 files changed, 6 deletions(-) diff --git a/src/mtx_spherical_harmonics/sph_radial.c b/src/mtx_spherical_harmonics/sph_radial.c index ec3536e..32e86bb 100644 --- a/src/mtx_spherical_harmonics/sph_radial.c +++ b/src/mtx_spherical_harmonics/sph_radial.c @@ -44,9 +44,7 @@ void sphBessel (double x, double *y, int n) { //TODO: small values! y[0] = (x=1) y[1] = -cos(x)/x + y[0]/x; - post("before %f %f %f",y[0],y[1],y[2]); radialRecurrence (x,y,n); - post("after %f %f %f",y[0],y[1],y[2]); } void sphNeumann (double x, double *y, int n) { diff --git a/src/mtx_spherical_radial.c b/src/mtx_spherical_radial.c index 5554a6f..9f3fd6d 100644 --- a/src/mtx_spherical_radial.c +++ b/src/mtx_spherical_radial.c @@ -83,18 +83,14 @@ static void *newMTXSph (t_symbol *s, int argc, t_atom *argv) fsym=atom_getsymbol(argv); if (fsym->s_name!=0) whichfunction=fsym->s_name[0]; - post("%s",fsym->s_name); switch (whichfunction) { default: case 'j': - post("j"); x->list_h_re_out = outlet_new (&x->x_obj, gensym("matrix")); break; case 'h': - post("h"); x->list_h_re_out = outlet_new (&x->x_obj, gensym("matrix")); case 'y': - post("h or y"); x->list_h_im_out = outlet_new (&x->x_obj, gensym("matrix")); } nmax=(int) atom_getfloat(argv+1); -- cgit v1.2.1