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 */
|
---|