ReactOS  0.4.14-dev-342-gdc047f9
complex.h
Go to the documentation of this file.
1 
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 #include <crtdefs.h>
30 
31 #if (defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L) \
32  || !defined __STRICT_ANSI__
33 
34 /* These macros are specified by C99 standard */
35 
36 #ifndef __cplusplus
37 #define complex _Complex
38 #endif
39 
40 #define _Complex_I (0.0F + 1.0iF)
41 
42 /* GCC doesn't support _Imaginary type yet, so we don't
43  define _Imaginary_I */
44 
45 #define I _Complex_I
46 
47 #ifdef __cplusplus
48 extern "C" {
49 #endif
50 
51 #ifndef RC_INVOKED
52 
53 double creal (double _Complex);
54 double cimag (double _Complex);
55 double carg (double _Complex);
56 double cabs (double _Complex);
57 double _Complex conj (double _Complex);
58 double _Complex cacos (double _Complex);
59 double _Complex casin (double _Complex);
60 double _Complex catan (double _Complex);
61 double _Complex ccos (double _Complex);
62 double _Complex csin (double _Complex);
63 double _Complex ctan (double _Complex);
64 double _Complex cacosh (double _Complex);
65 double _Complex casinh (double _Complex);
66 double _Complex catanh (double _Complex);
67 double _Complex ccosh (double _Complex);
68 double _Complex csinh (double _Complex);
69 double _Complex ctanh (double _Complex);
70 double _Complex cexp (double _Complex);
71 double _Complex clog (double _Complex);
72 double _Complex cpow (double _Complex, double _Complex);
73 double _Complex csqrt (double _Complex);
74 double _Complex cproj (double _Complex);
75 
76 float crealf (float _Complex);
77 float cimagf (float _Complex);
78 float cargf (float _Complex);
79 float cabsf (float _Complex);
80 float _Complex conjf (float _Complex);
81 float _Complex cacosf (float _Complex);
82 float _Complex casinf (float _Complex);
83 float _Complex catanf (float _Complex);
84 float _Complex ccosf (float _Complex);
85 float _Complex csinf (float _Complex);
86 float _Complex ctanf (float _Complex);
87 float _Complex cacoshf (float _Complex);
88 float _Complex casinhf (float _Complex);
89 float _Complex catanhf (float _Complex);
90 float _Complex ccoshf (float _Complex);
91 float _Complex csinhf (float _Complex);
92 float _Complex ctanhf (float _Complex);
93 float _Complex cexpf (float _Complex);
94 float _Complex clogf (float _Complex);
95 float _Complex cpowf (float _Complex, float _Complex);
96 float _Complex csqrtf (float _Complex);
97 float _Complex cprojf (float _Complex);
98 
99 long double creall (long double _Complex);
100 long double cimagl (long double _Complex);
101 long double cargl (long double _Complex);
102 long double cabsl (long double _Complex);
103 long double _Complex conjl (long double _Complex);
104 long double _Complex cacosl (long double _Complex);
105 long double _Complex casinl (long double _Complex);
106 long double _Complex catanl (long double _Complex);
107 long double _Complex ccosl (long double _Complex);
108 long double _Complex csinl (long double _Complex);
109 long double _Complex ctanl (long double _Complex);
110 long double _Complex cacoshl (long double _Complex);
111 long double _Complex casinhl (long double _Complex);
112 long double _Complex catanhl (long double _Complex);
113 long double _Complex ccoshl (long double _Complex);
114 long double _Complex csinhl (long double _Complex);
115 long double _Complex ctanhl (long double _Complex);
116 long double _Complex cexpl (long double _Complex);
117 long double _Complex clogl (long double _Complex);
118 long double _Complex cpowl (long double _Complex, long double _Complex);
119 long double _Complex csqrtl (long double _Complex);
120 long double _Complex cprojl (long double _Complex);
121 
122 #ifdef __GNUC__
123 
124 /* double */
125 __CRT_INLINE double creal (double _Complex _Z)
126 {
127  return __real__ _Z;
128 }
129 
130 __CRT_INLINE double cimag (double _Complex _Z)
131 {
132  return __imag__ _Z;
133 }
134 
135 __CRT_INLINE double _Complex conj (double _Complex _Z)
136 {
137  return __extension__ ~_Z;
138 }
139 
140 __CRT_INLINE double carg (double _Complex _Z)
141 {
142  double res;
143  __asm__ ("fpatan;"
144  : "=t" (res) : "0" (__real__ _Z), "u" (__imag__ _Z) : "st(1)");
145  return res;
146 }
147 
148 
149 /* float */
150 __CRT_INLINE float crealf (float _Complex _Z)
151 {
152  return __real__ _Z;
153 }
154 
155 __CRT_INLINE float cimagf (float _Complex _Z)
156 {
157  return __imag__ _Z;
158 }
159 
160 __CRT_INLINE float _Complex conjf (float _Complex _Z)
161 {
162  return __extension__ ~_Z;
163 }
164 
165 __CRT_INLINE float cargf (float _Complex _Z)
166 {
167  float res;
168  __asm__ ("fpatan;"
169  : "=t" (res) : "0" (__real__ _Z), "u" (__imag__ _Z) : "st(1)");
170  return res;
171 }
172 
173 /* long double */
174 __CRT_INLINE long double creall (long double _Complex _Z)
175 {
176  return __real__ _Z;
177 }
178 
179 __CRT_INLINE long double cimagl (long double _Complex _Z)
180 {
181  return __imag__ _Z;
182 }
183 
184 __CRT_INLINE long double _Complex conjl (long double _Complex _Z)
185 {
186  return __extension__ ~_Z;
187 }
188 
189 __CRT_INLINE long double cargl (long double _Complex _Z)
190 {
191  long double res;
192  __asm__ ("fpatan;"
193  : "=t" (res) : "0" (__real__ _Z), "u" (__imag__ _Z) : "st(1)");
194  return res;
195 }
196 
197 #endif /* __GNUC__ */
198 
199 
200 #endif /* RC_INVOKED */
201 
202 #ifdef __cplusplus
203 }
204 #endif
205 
206 #endif /* __STDC_VERSION__ >= 199901L */
207 
208 
209 #endif /* _COMPLEX_H */
double _Complex csinh(double _Complex)
float _Complex casinf(float _Complex)
long double _Complex catanhl(long double _Complex)
double _Complex ctan(double _Complex)
long double cargl(long double _Complex)
double creal(double _Complex)
float _Complex csqrtf(float _Complex)
float _Complex ccosf(float _Complex)
float _Complex casinhf(float _Complex)
long double _Complex cpowl(long double _Complex, long double _Complex)
float _Complex ctanhf(float _Complex)
float _Complex csinf(float _Complex)
double carg(double _Complex)
double _Complex cexp(double _Complex)
long double _Complex catanl(long double _Complex)
double _Complex csqrt(double _Complex)
long double _Complex conjl(long double _Complex)
float _Complex cacoshf(float _Complex)
float _Complex cpowf(float _Complex, float _Complex)
__asm__("\t.globl GetPhys\n" "GetPhys:\t\n" "mflr 0\n\t" "stwu 0,-16(1)\n\t" "mfmsr 5\n\t" "andi. 6,5,0xffef\n\t" "mtmsr 6\n\t" "isync\n\t" "sync\n\t" "lwz 3,0(3)\n\t" "mtmsr 5\n\t" "isync\n\t" "sync\n\t" "lwz 0,0(1)\n\t" "addi 1,1,16\n\t" "mtlr 0\n\t" "blr")
long double _Complex cprojl(long double _Complex)
float _Complex conjf(float _Complex)
float cabsf(float _Complex)
long double _Complex csinl(long double _Complex)
float _Complex cprojf(float _Complex)
double _Complex catan(double _Complex)
float _Complex catanhf(float _Complex)
double _Complex ccosh(double _Complex)
long double _Complex casinhl(long double _Complex)
long double _Complex ctanhl(long double _Complex)
long double _Complex cacoshl(long double _Complex)
double _Complex ctanh(double _Complex)
float crealf(float _Complex)
float _Complex cacosf(float _Complex)
long double _Complex cexpl(long double _Complex)
long double cimagl(long double _Complex)
long double _Complex ccoshl(long double _Complex)
double _Complex casinh(double _Complex)
double _Complex cproj(double _Complex)
long double _Complex ctanl(long double _Complex)
long double _Complex csqrtl(long double _Complex)
double _Complex clog(double _Complex)
double _Complex cacosh(double _Complex)
float _Complex ccoshf(float _Complex)
double _Complex cacos(double _Complex)
long double _Complex csinhl(long double _Complex)
double _Complex catanh(double _Complex)
float _Complex clogf(float _Complex)
long double cabsl(long double _Complex)
double _Complex csin(double _Complex)
float _Complex ctanf(float _Complex)
double _Complex conj(double _Complex)
float cimagf(float _Complex)
double _Complex ccos(double _Complex)
float _Complex cexpf(float _Complex)
GLuint res
Definition: glext.h:9613
long double creall(long double _Complex)
long double _Complex ccosl(long double _Complex)
long double _Complex casinl(long double _Complex)
double _Complex casin(double _Complex)
double cabs(double _Complex)
float cargf(float _Complex)
double cimag(double _Complex)
double _Complex cpow(double _Complex, double _Complex)
long double _Complex cacosl(long double _Complex)
float _Complex catanf(float _Complex)
long double _Complex clogl(long double _Complex)
float _Complex csinhf(float _Complex)