From fd57cb0fc97e8321a63c446a5fdf83c72804ea4b Mon Sep 17 00:00:00 2001
From: Tom Schouten <doelie@users.sourceforge.net>
Date: Fri, 25 Aug 2006 23:07:37 +0000
Subject: removed envelope_utils.c - moved milliseconds_2_one_minus_realpole()
 to extlib_util.h as static inline

svn path=/trunk/externals/creb/; revision=5744
---
 modules/extlib_util.h | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'modules/extlib_util.h')

diff --git a/modules/extlib_util.h b/modules/extlib_util.h
index ea292be..195d85f 100644
--- a/modules/extlib_util.h
+++ b/modules/extlib_util.h
@@ -31,7 +31,17 @@
 #define ENVELOPE_MIN   ENVELOPE_RANGE
 
 /* convert milliseconds to 1-p, with p a real pole */
-float milliseconds_2_one_minus_realpole(float time);
+static inline float milliseconds_2_one_minus_realpole(float time)
+{
+  float r;
+
+  if (time < 0.0f) time = 0.0f;
+  r = -expm1(1000.0f * log(ENVELOPE_RANGE) / (sys_getsr() * time));
+  if (!(r < 1.0f)) r = 1.0f;
+
+  //post("%f",r);
+  return r;
+}
 
 
 typedef union
-- 
cgit v1.2.1