From 59f29ba9354f2b59ad9d6904fab54733f305ae62 Mon Sep 17 00:00:00 2001 From: goodale Date: Tue, 14 Dec 1999 11:39:37 +0000 Subject: Added Gab's complex number stuff. Tom git-svn-id: http://svn.cactuscode.org/flesh/trunk@1190 17b73243-c579-4c4c-a9d2-2d5706c11dac --- src/include/cctk_complex.h | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 src/include/cctk_complex.h (limited to 'src/include') diff --git a/src/include/cctk_complex.h b/src/include/cctk_complex.h new file mode 100644 index 00000000..d81d8871 --- /dev/null +++ b/src/include/cctk_complex.h @@ -0,0 +1,36 @@ + /*@@ + @header cctk_complex.h + @date Tue Dec 14 12:28:05 1999 + @author Tom Goodale + @desc + Routines for complex numbers. + @enddesc + @version $Header$ + @@*/ + +#ifndef __CCTK_COMPLEX_H_ +#define __CCTK_COMPLEX_H_ + +#ifdef __cplusplus +extern "C" +{ +#endif + +CCTK_COMPLEX CCTK_Cmplx(CCTK_REAL Re, CCTK_REAL Im); + +CCTK_REAL CCTK_CmplxReal(CCTK_COMPLEX complex_number); +CCTK_REAL CCTK_CmplxImag(CCTK_COMPLEX complex_number); + +CCTK_COMPLEX CCTK_CmplxConjg(CCTK_COMPLEX in); +CCTK_REAL CCTK_CmplxAbs(CCTK_COMPLEX in); + +CCTK_COMPLEX CCTK_CmplxAdd(CCTK_COMPLEX a,CCTK_COMPLEX b); +CCTK_COMPLEX CCTK_CmplxSub(CCTK_COMPLEX a,CCTK_COMPLEX b); +CCTK_COMPLEX CCTK_CmplxMul(CCTK_COMPLEX a,CCTK_COMPLEX b); +CCTK_COMPLEX CCTK_CmplxDiv(CCTK_COMPLEX a,CCTK_COMPLEX b); + +#ifdef __cplusplus +} +#endif + +#endif /* __CCTK_COMPLEX_H_ */ -- cgit v1.2.3