[1166] | 1 | /**
|
---|
| 2 | * This file has no copyright assigned and is placed in the Public Domain.
|
---|
| 3 | * This file is part of the mingw-w64 runtime package.
|
---|
| 4 | * No warranty is given; refer to the file DISCLAIMER.PD within this package.
|
---|
| 5 | */
|
---|
| 6 | /*
|
---|
| 7 | * complex.h
|
---|
| 8 | *
|
---|
| 9 | * This file is part of the Mingw32 package.
|
---|
| 10 | *
|
---|
| 11 | * Contributors:
|
---|
| 12 | * Created by Danny Smith <dannysmith@users.sourceforge.net>
|
---|
| 13 | *
|
---|
| 14 | * THIS SOFTWARE IS NOT COPYRIGHTED
|
---|
| 15 | *
|
---|
| 16 | * This source code is offered for use in the public domain. You may
|
---|
| 17 | * use, modify or distribute it freely.
|
---|
| 18 | *
|
---|
| 19 | * This code is distributed in the hope that it will be useful but
|
---|
| 20 | * WITHOUT ANY WARRANTY. ALL WARRANTIES, EXPRESS OR IMPLIED ARE HEREBY
|
---|
| 21 | * DISCLAIMED. This includes but is not limited to warranties of
|
---|
| 22 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
---|
| 23 | *
|
---|
| 24 | */
|
---|
| 25 |
|
---|
| 26 | #ifndef _COMPLEX_H_
|
---|
| 27 | #define _COMPLEX_H_
|
---|
| 28 |
|
---|
| 29 | /* All the headers include this file. */
|
---|
| 30 | #include <crtdefs.h>
|
---|
| 31 |
|
---|
| 32 | /* These macros are specified by C99 standard */
|
---|
| 33 |
|
---|
| 34 | #ifndef __cplusplus
|
---|
| 35 | #define complex _Complex
|
---|
| 36 | #endif
|
---|
| 37 |
|
---|
| 38 | #define _Complex_I (__extension__ 1.0iF)
|
---|
| 39 |
|
---|
| 40 | /* GCC doesn't support _Imaginary type yet, so we don't
|
---|
| 41 | define _Imaginary_I */
|
---|
| 42 |
|
---|
| 43 | #define I _Complex_I
|
---|
| 44 |
|
---|
| 45 | #ifdef __cplusplus
|
---|
| 46 | extern "C" {
|
---|
| 47 | #endif
|
---|
| 48 |
|
---|
| 49 | #ifndef RC_INVOKED
|
---|
| 50 |
|
---|
| 51 | double __MINGW_ATTRIB_CONST creal (double _Complex);
|
---|
| 52 | double __MINGW_ATTRIB_CONST cimag (double _Complex);
|
---|
| 53 | double __MINGW_ATTRIB_CONST carg (double _Complex);
|
---|
| 54 | double __MINGW_ATTRIB_CONST cabs (double _Complex) __MINGW_ATTRIB_DEPRECATED_MSVC2005;
|
---|
| 55 | double _Complex __MINGW_ATTRIB_CONST conj (double _Complex);
|
---|
| 56 | double _Complex cacos (double _Complex);
|
---|
| 57 | double _Complex casin (double _Complex);
|
---|
| 58 | double _Complex catan (double _Complex);
|
---|
| 59 | double _Complex ccos (double _Complex);
|
---|
| 60 | double _Complex csin (double _Complex);
|
---|
| 61 | double _Complex ctan (double _Complex);
|
---|
| 62 | double _Complex cacosh (double _Complex);
|
---|
| 63 | double _Complex casinh (double _Complex);
|
---|
| 64 | double _Complex catanh (double _Complex);
|
---|
| 65 | double _Complex ccosh (double _Complex);
|
---|
| 66 | double _Complex csinh (double _Complex);
|
---|
| 67 | double _Complex ctanh (double _Complex);
|
---|
| 68 | double _Complex cexp (double _Complex);
|
---|
| 69 | double _Complex clog (double _Complex);
|
---|
| 70 | #ifdef _GNU_SOURCE
|
---|
| 71 | double _Complex clog10(double _Complex);
|
---|
| 72 | #endif /* _GNU_SOURCE */
|
---|
| 73 | double _Complex cpow (double _Complex, double _Complex);
|
---|
| 74 | double _Complex csqrt (double _Complex);
|
---|
| 75 | double _Complex __MINGW_ATTRIB_CONST cproj (double _Complex);
|
---|
| 76 |
|
---|
| 77 | float __MINGW_ATTRIB_CONST crealf (float _Complex);
|
---|
| 78 | float __MINGW_ATTRIB_CONST cimagf (float _Complex);
|
---|
| 79 | float __MINGW_ATTRIB_CONST cargf (float _Complex);
|
---|
| 80 | float __MINGW_ATTRIB_CONST cabsf (float _Complex);
|
---|
| 81 | float _Complex __MINGW_ATTRIB_CONST conjf (float _Complex);
|
---|
| 82 | float _Complex cacosf (float _Complex);
|
---|
| 83 | float _Complex casinf (float _Complex);
|
---|
| 84 | float _Complex catanf (float _Complex);
|
---|
| 85 | float _Complex ccosf (float _Complex);
|
---|
| 86 | float _Complex csinf (float _Complex);
|
---|
| 87 | float _Complex ctanf (float _Complex);
|
---|
| 88 | float _Complex cacoshf (float _Complex);
|
---|
| 89 | float _Complex casinhf (float _Complex);
|
---|
| 90 | float _Complex catanhf (float _Complex);
|
---|
| 91 | float _Complex ccoshf (float _Complex);
|
---|
| 92 | float _Complex csinhf (float _Complex);
|
---|
| 93 | float _Complex ctanhf (float _Complex);
|
---|
| 94 | float _Complex cexpf (float _Complex);
|
---|
| 95 | float _Complex clogf (float _Complex);
|
---|
| 96 | #ifdef _GNU_SOURCE
|
---|
| 97 | float _Complex clog10f(float _Complex);
|
---|
| 98 | #endif /* _GNU_SOURCE */
|
---|
| 99 | float _Complex cpowf (float _Complex, float _Complex);
|
---|
| 100 | float _Complex csqrtf (float _Complex);
|
---|
| 101 | float _Complex __MINGW_ATTRIB_CONST cprojf (float _Complex);
|
---|
| 102 |
|
---|
| 103 | long double __MINGW_ATTRIB_CONST creall (long double _Complex);
|
---|
| 104 | long double __MINGW_ATTRIB_CONST cimagl (long double _Complex);
|
---|
| 105 | long double __MINGW_ATTRIB_CONST cargl (long double _Complex);
|
---|
| 106 | long double __MINGW_ATTRIB_CONST cabsl (long double _Complex);
|
---|
| 107 | long double _Complex __MINGW_ATTRIB_CONST conjl (long double _Complex);
|
---|
| 108 | long double _Complex cacosl (long double _Complex);
|
---|
| 109 | long double _Complex casinl (long double _Complex);
|
---|
| 110 | long double _Complex catanl (long double _Complex);
|
---|
| 111 | long double _Complex ccosl (long double _Complex);
|
---|
| 112 | long double _Complex csinl (long double _Complex);
|
---|
| 113 | long double _Complex ctanl (long double _Complex);
|
---|
| 114 | long double _Complex cacoshl (long double _Complex);
|
---|
| 115 | long double _Complex casinhl (long double _Complex);
|
---|
| 116 | long double _Complex catanhl (long double _Complex);
|
---|
| 117 | long double _Complex ccoshl (long double _Complex);
|
---|
| 118 | long double _Complex csinhl (long double _Complex);
|
---|
| 119 | long double _Complex ctanhl (long double _Complex);
|
---|
| 120 | long double _Complex cexpl (long double _Complex);
|
---|
| 121 | long double _Complex clogl (long double _Complex);
|
---|
| 122 | #ifdef _GNU_SOURCE
|
---|
| 123 | long double _Complex clog10l(long double _Complex);
|
---|
| 124 | #endif /* _GNU_SOURCE */
|
---|
| 125 | long double _Complex cpowl (long double _Complex, long double _Complex);
|
---|
| 126 | long double _Complex csqrtl (long double _Complex);
|
---|
| 127 | long double _Complex __MINGW_ATTRIB_CONST cprojl (long double _Complex);
|
---|
| 128 |
|
---|
| 129 | #ifdef __GNUC__
|
---|
| 130 | #if !defined (__CRT__NO_INLINE) && defined (_MATH_H_)
|
---|
| 131 | /* double */
|
---|
| 132 | __CRT_INLINE double __MINGW_ATTRIB_CONST creal (double _Complex _Z)
|
---|
| 133 | {
|
---|
| 134 | return __real__ _Z;
|
---|
| 135 | }
|
---|
| 136 |
|
---|
| 137 | __CRT_INLINE double __MINGW_ATTRIB_CONST cimag (double _Complex _Z)
|
---|
| 138 | {
|
---|
| 139 | return __imag__ _Z;
|
---|
| 140 | }
|
---|
| 141 |
|
---|
| 142 | __CRT_INLINE double _Complex __MINGW_ATTRIB_CONST conj (double _Complex _Z)
|
---|
| 143 | {
|
---|
| 144 | return __extension__ ~_Z;
|
---|
| 145 | }
|
---|
| 146 |
|
---|
| 147 | __CRT_INLINE double __MINGW_ATTRIB_CONST carg (double _Complex _Z)
|
---|
| 148 | {
|
---|
| 149 | return atan2 (__imag__ _Z, __real__ _Z);
|
---|
| 150 | }
|
---|
| 151 |
|
---|
| 152 | __CRT_INLINE double __MINGW_ATTRIB_CONST cabs (double _Complex _Z)
|
---|
| 153 | {
|
---|
| 154 | return hypot (__real__ _Z, __imag__ _Z);
|
---|
| 155 | }
|
---|
| 156 |
|
---|
| 157 | /* float */
|
---|
| 158 | __CRT_INLINE float __MINGW_ATTRIB_CONST crealf (float _Complex _Z)
|
---|
| 159 | {
|
---|
| 160 | return __real__ _Z;
|
---|
| 161 | }
|
---|
| 162 |
|
---|
| 163 | __CRT_INLINE float __MINGW_ATTRIB_CONST cimagf (float _Complex _Z)
|
---|
| 164 | {
|
---|
| 165 | return __imag__ _Z;
|
---|
| 166 | }
|
---|
| 167 |
|
---|
| 168 | __CRT_INLINE float _Complex __MINGW_ATTRIB_CONST conjf (float _Complex _Z)
|
---|
| 169 | {
|
---|
| 170 | return __extension__ ~_Z;
|
---|
| 171 | }
|
---|
| 172 |
|
---|
| 173 | __CRT_INLINE float __MINGW_ATTRIB_CONST cargf (float _Complex _Z)
|
---|
| 174 | {
|
---|
| 175 | return atan2f (__imag__ _Z, __real__ _Z);
|
---|
| 176 | }
|
---|
| 177 |
|
---|
| 178 | __CRT_INLINE float __MINGW_ATTRIB_CONST cabsf (float _Complex _Z)
|
---|
| 179 | {
|
---|
| 180 | return hypotf (__real__ _Z, __imag__ _Z);
|
---|
| 181 | }
|
---|
| 182 |
|
---|
| 183 | /* long double */
|
---|
| 184 | __CRT_INLINE long double __MINGW_ATTRIB_CONST creall (long double _Complex _Z)
|
---|
| 185 | {
|
---|
| 186 | return __real__ _Z;
|
---|
| 187 | }
|
---|
| 188 |
|
---|
| 189 | __CRT_INLINE long double __MINGW_ATTRIB_CONST cimagl (long double _Complex _Z)
|
---|
| 190 | {
|
---|
| 191 | return __imag__ _Z;
|
---|
| 192 | }
|
---|
| 193 |
|
---|
| 194 | __CRT_INLINE long double _Complex __MINGW_ATTRIB_CONST conjl (long double _Complex _Z)
|
---|
| 195 | {
|
---|
| 196 | return __extension__ ~_Z;
|
---|
| 197 | }
|
---|
| 198 |
|
---|
| 199 | __CRT_INLINE long double __MINGW_ATTRIB_CONST cargl (long double _Complex _Z)
|
---|
| 200 | {
|
---|
| 201 | return atan2l (__imag__ _Z, __real__ _Z);
|
---|
| 202 | }
|
---|
| 203 |
|
---|
| 204 | __CRT_INLINE long double __MINGW_ATTRIB_CONST cabsl (long double _Complex _Z)
|
---|
| 205 | {
|
---|
| 206 | return hypotl (__real__ _Z, __imag__ _Z);
|
---|
| 207 | }
|
---|
| 208 | #endif /* !__CRT__NO_INLINE */
|
---|
| 209 | #endif /* __GNUC__ */
|
---|
| 210 |
|
---|
| 211 |
|
---|
| 212 | #endif /* RC_INVOKED */
|
---|
| 213 |
|
---|
| 214 | #ifdef __cplusplus
|
---|
| 215 | }
|
---|
| 216 | #endif
|
---|
| 217 |
|
---|
| 218 | #endif /* _COMPLEX_H */
|
---|