From ed932acb5860bf8b9296169676499562a55d139e Mon Sep 17 00:00:00 2001
From: Miller Puckette <millerpuckette@users.sourceforge.net>
Date: Mon, 6 Sep 2004 20:20:36 +0000
Subject: checking in version 0.38test5.

Oops, I realize I forgot some more nice files, will add them and re-commit.

svn path=/trunk/; revision=2010
---
 pd/src/x_acoustics.c | 34 +++++++++++++++++-----------------
 1 file changed, 17 insertions(+), 17 deletions(-)

(limited to 'pd/src/x_acoustics.c')

diff --git a/pd/src/x_acoustics.c b/pd/src/x_acoustics.c
index ee7250df..eca2d32b 100644
--- a/pd/src/x_acoustics.c
+++ b/pd/src/x_acoustics.c
@@ -26,8 +26,8 @@ float powtodb(float f)
     if (f <= 0) return (0);
     else
     {
-    	float val = 100 + 10./LOGTEN * log(f);
-    	return (val < 0 ? 0 : val);
+        float val = 100 + 10./LOGTEN * log(f);
+        return (val < 0 ? 0 : val);
     }
 }
 
@@ -36,31 +36,31 @@ float rmstodb(float f)
     if (f <= 0) return (0);
     else
     {
-    	float val = 100 + 20./LOGTEN * log(f);
-    	return (val < 0 ? 0 : val);
+        float val = 100 + 20./LOGTEN * log(f);
+        return (val < 0 ? 0 : val);
     }
 }
 
 float dbtopow(float f)
 {
     if (f <= 0)
-    	return(0);
+        return(0);
     else
     {
-    	if (f > 870)
-	    f = 870;
-    	return (exp((LOGTEN * 0.1) * (f-100.)));
+        if (f > 870)
+            f = 870;
+        return (exp((LOGTEN * 0.1) * (f-100.)));
     }
 }
 
 float dbtorms(float f)
 {
     if (f <= 0)
-    	return(0);
+        return(0);
     else
     {
-    	if (f > 485)
-	    f = 485;
+        if (f > 485)
+            f = 485;
     }
     return (exp((LOGTEN * 0.05) * (f-100.)));
 }
@@ -161,32 +161,32 @@ void x_acoustics_setup(void)
 {
     t_symbol *s = gensym("acoustics.pd");
     mtof_class = class_new(gensym("mtof"), mtof_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(mtof_class, (t_method)mtof_float);
     class_sethelpsymbol(mtof_class, s);
     
     ftom_class = class_new(gensym("ftom"), ftom_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(ftom_class, (t_method)ftom_float);
     class_sethelpsymbol(ftom_class, s);
 
     powtodb_class = class_new(gensym("powtodb"), powtodb_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(powtodb_class, (t_method)powtodb_float);
     class_sethelpsymbol(powtodb_class, s);
 
     rmstodb_class = class_new(gensym("rmstodb"), rmstodb_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(rmstodb_class, (t_method)rmstodb_float);
     class_sethelpsymbol(rmstodb_class, s);
 
     dbtopow_class = class_new(gensym("dbtopow"), dbtopow_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(dbtopow_class, (t_method)dbtopow_float);
     class_sethelpsymbol(dbtopow_class, s);
 
     dbtorms_class = class_new(gensym("dbtorms"), dbtorms_new, 0,
-    	sizeof(t_object), 0, 0);
+        sizeof(t_object), 0, 0);
     class_addfloat(dbtorms_class, (t_method)dbtorms_float);
     class_sethelpsymbol(dbtorms_class, s);
 }
-- 
cgit v1.2.1