diff filter/all.c @ 0:5242703e91d3 tip

Initial checkin for AIM92 aimR8.2 (last updated May 1997).
author tomwalters
date Fri, 20 May 2011 15:19:45 +0100
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/filter/all.c	Fri May 20 15:19:45 2011 +0100
@@ -0,0 +1,168 @@
+/*
+    Copyright (c) Applied Psychology Unit, Medical Research Council. 1988, 1989
+    ===========================================================================
+
+    Permission to use, copy, modify, and distribute this software without fee 
+    is hereby granted for research purposes, provided that this copyright 
+    notice appears in all copies and in all supporting documentation, and that 
+    the software is not redistributed for any fee (except for a nominal shipping 
+    charge). Anyone wanting to incorporate all or part of this software in a
+    commercial product must obtain a license from the Medical Research Council.
+
+    The MRC makes no representations about the suitability of this 
+    software for any purpose.  It is provided "as is" without express or implied 
+    warranty.
+ 
+    THE MRC DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING 
+    ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL THE
+    A.P.U. BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY 
+    DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN 
+    AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 
+    OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+*/
+
+/*
+	     ============================================
+	      all.c - code for recursive filter section.
+	     ============================================
+
+
+		   J. Holdsworth - 23rd February 1988.
+
+
+    Copywright (c) Applied Psychology Unit, Medical Research Council. 1988.
+    =======================================================================
+
+
+
+
+
+*/
+
+#ifdef DSP32
+#include <math.h>
+#else
+
+/* identify object file */
+
+#ifndef lint
+static char *all_sccs_id = "@(#)all.c	1.7  John Holdsworth (MRC-APU) 10/7/89" ;
+#endif
+
+/* short data, integer recursive */
+
+#include "generic.c"
+
+/* short data, floating point recursive */
+
+#define FLOAT float
+#define FILTER_NAME   SingleFilterShortDataArray
+#define MODULE_NAME DoSingleFilterShortDataArray
+
+#include "generic.c"
+
+/* short data, floating point recursive */
+
+#define FLOAT         double
+#define FILTER_NAME   RealFilterShortDataArray
+#define MODULE_NAME DoRealFilterShortDataArray
+
+#include "generic.c"
+
+/* short data, complex integer recursive */
+
+#define COMPLEX
+#define OUTPUT_TYPE   scomplex
+#define FILTER_NAME   ComplexFilterShortDataArray
+#define MODULE_NAME DoComplexFilterShortDataArray
+
+#include "generic.c"
+
+/* int data, integer recursive */
+
+#define  INPUT_TYPE   int
+#define FILTER_NAME   FilterIntDataArray
+#define MODULE_NAME DoFilterIntDataArray
+
+#include "generic.c"
+
+
+/* int data, floating point recursive */
+
+#define FLOAT         double
+#define INPUT_TYPE    int
+#define FILTER_NAME   RealFilterIntDataArray
+#define MODULE_NAME DoRealFilterIntDataArray
+
+#include "generic.c"
+
+
+/* double data, real recursive */
+
+#define FLOAT         double
+#define INPUT_TYPE    double
+#define FILTER_NAME   RealFilterDoubleDataArray
+#define MODULE_NAME DoRealFilterDoubleDataArray
+
+#include "generic.c"
+
+
+#define ENVELOPE
+
+/* short data, integer recursive envelope */
+
+#define FILTER_NAME   EnvelopeShortDataArray
+#define MODULE_NAME DoEnvelopeShortDataArray
+
+#include "generic.c"
+
+
+/* short data, floating Point recursive envelope */
+
+#define FLOAT         double
+#define FILTER_NAME   RealEnvelopeShortDataArray
+#define MODULE_NAME DoRealEnvelopeShortDataArray
+
+#include "generic.c"
+
+#undef ENVELOPE
+
+#endif
+
+
+/* float data, real recursive */
+
+#define FLOAT         float
+#define INPUT_TYPE    float
+#define FILTER_NAME   RealFilterFloatDataArray
+#define MODULE_NAME DoRealFilterFloatDataArray
+
+#include "generic.c"
+
+
+#define ENVELOPE
+
+/* float data, floating Point recursive envelope */
+
+#define FLOAT         float
+#define INPUT_TYPE    float
+#define FILTER_NAME   RealEnvelopeFloatDataArray
+#define MODULE_NAME DoRealEnvelopeFloatDataArray
+
+#include "generic.c"
+
+#undef ENVELOPE
+
+
+/* float data, complex integer point recursive */
+
+#define COMPLEX
+#define FLOAT         float
+#define INPUT_TYPE    float
+#define OUTPUT_TYPE   fcomplex
+#define FILTER_NAME   ComplexFilterFloatDataArray
+#define MODULE_NAME DoComplexFilterFloatDataArray
+
+#include "generic.c"
+
+#undef COMPLEX