tomwalters@0: /* tomwalters@0: Copyright (c) Applied Psychology Unit, Medical Research Council. 1988, 1989 tomwalters@0: =========================================================================== tomwalters@0: tomwalters@0: Permission to use, copy, modify, and distribute this software without fee tomwalters@0: is hereby granted for research purposes, provided that this copyright tomwalters@0: notice appears in all copies and in all supporting documentation, and that tomwalters@0: the software is not redistributed for any fee (except for a nominal shipping tomwalters@0: charge). Anyone wanting to incorporate all or part of this software in a tomwalters@0: commercial product must obtain a license from the Medical Research Council. tomwalters@0: tomwalters@0: The MRC makes no representations about the suitability of this tomwalters@0: software for any purpose. It is provided "as is" without express or implied tomwalters@0: warranty. tomwalters@0: tomwalters@0: THE MRC DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING tomwalters@0: ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL THE tomwalters@0: A.P.U. BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY tomwalters@0: DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN tomwalters@0: AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF tomwalters@0: OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. tomwalters@0: */ tomwalters@0: tomwalters@0: /* tomwalters@0: Acknowledgment: tomwalters@0: ============== tomwalters@0: tomwalters@0: The source code provided in this file was originally developed by tomwalters@0: Christian Giguere as part of a Ph.D degree at the Department of tomwalters@0: Engineering of the University of Cambridge from April 1990 to tomwalters@0: November 1993. The code was subsequently adapted under a grant tomwalters@0: from the Hearing Research Trust for full compatibility with tomwalters@0: AIM Release 6.15. tomwalters@0: tomwalters@0: Christian Giguere 25/03/94 tomwalters@0: tomwalters@0: */ tomwalters@0: tomwalters@0: /* tomwalters@0: =========================================================== tomwalters@0: calc_tl.h tomwalters@0: =========================================================== tomwalters@0: tomwalters@0: Supplements "calc.h" tomwalters@0: (for use with files in directory wdf) tomwalters@0: tomwalters@0: Author : Christian Giguere tomwalters@0: First written : 01st June, 1991 tomwalters@0: Last edited : 20th September, 1991 tomwalters@0: =========================================================== tomwalters@0: */ tomwalters@0: tomwalters@0: #ifndef _CALC_TL_H_ tomwalters@0: tomwalters@0: tomwalters@0: /***** defines *****/ tomwalters@0: tomwalters@0: #define _CALC_TL_H_ tomwalters@0: tomwalters@0: #ifndef Pi tomwalters@0: #define Pi ( atan( 1. ) * 4. ) tomwalters@0: #endif tomwalters@0: tomwalters@0: #ifndef TwoPi tomwalters@0: #define TwoPi ( 2. * Pi ) tomwalters@0: #endif tomwalters@0: tomwalters@0: #define ABS( X ) ( ( X ) < ( 0 ) ? (-X ) : ( X ) ) tomwalters@0: #define MIN(A,B) ( ( A ) < ( B ) ? ( A ) : ( B ) ) tomwalters@0: #define MAX(A,B) ( ( A ) > ( B ) ? ( A ) : ( B ) ) tomwalters@0: tomwalters@0: #ifdef FLOAT /* defined in calc.h */ tomwalters@0: #define _MaxOutput_ ( 1.0E+37 ) tomwalters@0: #define _MinOutput_ ( -1.0E-37 ) tomwalters@0: #else tomwalters@0: #define _MaxOutput_ ( 32767 ) tomwalters@0: #define _MinOutput_ ( -32767 ) tomwalters@0: #endif tomwalters@0: tomwalters@0: /***** typedefs *****/ tomwalters@0: tomwalters@0: typedef double StateType ; tomwalters@0: typedef double CoeffType ; tomwalters@0: tomwalters@0: #endif tomwalters@0: