/* Copyright (C) 1997-2018 Free Software Foundation, Inc.

[0] Fix | Delete

This file is part of the GNU C Library.

[1] Fix | Delete

[2] Fix | Delete

The GNU C Library is free software; you can redistribute it and/or

[3] Fix | Delete

modify it under the terms of the GNU Lesser General Public

[4] Fix | Delete

License as published by the Free Software Foundation; either

[5] Fix | Delete

version 2.1 of the License, or (at your option) any later version.

[6] Fix | Delete

[7] Fix | Delete

The GNU C Library is distributed in the hope that it will be useful,

[8] Fix | Delete

but WITHOUT ANY WARRANTY; without even the implied warranty of

[9] Fix | Delete

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU

[10] Fix | Delete

Lesser General Public License for more details.

[11] Fix | Delete

[12] Fix | Delete

You should have received a copy of the GNU Lesser General Public

[13] Fix | Delete

License along with the GNU C Library; if not, see

[14] Fix | Delete

<http://www.gnu.org/licenses/>. */

[15] Fix | Delete

[16] Fix | Delete

/*

[17] Fix | Delete

* ISO C99: 7.3 Complex arithmetic <complex.h>

[18] Fix | Delete

*/

[19] Fix | Delete

[20] Fix | Delete

#ifndef _COMPLEX_H

[21] Fix | Delete

#define _COMPLEX_H 1

[22] Fix | Delete

[23] Fix | Delete

#define __GLIBC_INTERNAL_STARTING_HEADER_IMPLEMENTATION

[24] Fix | Delete

#include <bits/libc-header-start.h>

[25] Fix | Delete

[26] Fix | Delete

/* Get general and ISO C99 specific information. */

[27] Fix | Delete

#include <bits/mathdef.h>

[28] Fix | Delete

[29] Fix | Delete

/* Gather machine-dependent _FloatN type support. */

[30] Fix | Delete

#include <bits/floatn.h>

[31] Fix | Delete

[32] Fix | Delete

__BEGIN_DECLS

[33] Fix | Delete

[34] Fix | Delete

/* We might need to add support for more compilers here. But since ISO

[35] Fix | Delete

C99 is out hopefully all maintained compilers will soon provide the data

[36] Fix | Delete

types `float complex' and `double complex'. */

[37] Fix | Delete

#if __GNUC_PREREQ (2, 7) && !__GNUC_PREREQ (2, 97)

[38] Fix | Delete

# define _Complex __complex__

[39] Fix | Delete

#endif

[40] Fix | Delete

[41] Fix | Delete

#define complex _Complex

[42] Fix | Delete

[43] Fix | Delete

/* Narrowest imaginary unit. This depends on the floating-point

[44] Fix | Delete

evaluation method.

[45] Fix | Delete

XXX This probably has to go into a gcc related file. */

[46] Fix | Delete

#define _Complex_I (__extension__ 1.0iF)

[47] Fix | Delete

[48] Fix | Delete

/* Another more descriptive name is `I'.

[49] Fix | Delete

XXX Once we have the imaginary support switch this to _Imaginary_I. */

[50] Fix | Delete

#undef I

[51] Fix | Delete

#define I _Complex_I

[52] Fix | Delete

[53] Fix | Delete

#if defined __USE_ISOC11 && __GNUC_PREREQ (4, 7)

[54] Fix | Delete

/* Macros to expand into expression of specified complex type. */

[55] Fix | Delete

# define CMPLX(x, y) __builtin_complex ((double) (x), (double) (y))

[56] Fix | Delete

# define CMPLXF(x, y) __builtin_complex ((float) (x), (float) (y))

[57] Fix | Delete

# define CMPLXL(x, y) __builtin_complex ((long double) (x), (long double) (y))

[58] Fix | Delete

#endif

[59] Fix | Delete

[60] Fix | Delete

#if __HAVE_FLOAT16 && __GLIBC_USE (IEC_60559_TYPES_EXT)

[61] Fix | Delete

# define CMPLXF16(x, y) __builtin_complex ((_Float16) (x), (_Float16) (y))

[62] Fix | Delete

#endif

[63] Fix | Delete

[64] Fix | Delete

#if __HAVE_FLOAT32 && __GLIBC_USE (IEC_60559_TYPES_EXT)

[65] Fix | Delete

# define CMPLXF32(x, y) __builtin_complex ((_Float32) (x), (_Float32) (y))

[66] Fix | Delete

#endif

[67] Fix | Delete

[68] Fix | Delete

#if __HAVE_FLOAT64 && __GLIBC_USE (IEC_60559_TYPES_EXT)

[69] Fix | Delete

# define CMPLXF64(x, y) __builtin_complex ((_Float64) (x), (_Float64) (y))

[70] Fix | Delete

#endif

[71] Fix | Delete

[72] Fix | Delete

#if __HAVE_FLOAT128 && __GLIBC_USE (IEC_60559_TYPES_EXT)

[73] Fix | Delete

# define CMPLXF128(x, y) __builtin_complex ((_Float128) (x), (_Float128) (y))

[74] Fix | Delete

#endif

[75] Fix | Delete

[76] Fix | Delete

#if __HAVE_FLOAT32X && __GLIBC_USE (IEC_60559_TYPES_EXT)

[77] Fix | Delete

# define CMPLXF32X(x, y) __builtin_complex ((_Float32x) (x), (_Float32x) (y))

[78] Fix | Delete

#endif

[79] Fix | Delete

[80] Fix | Delete

#if __HAVE_FLOAT64X && __GLIBC_USE (IEC_60559_TYPES_EXT)

[81] Fix | Delete

# define CMPLXF64X(x, y) __builtin_complex ((_Float64x) (x), (_Float64x) (y))

[82] Fix | Delete

#endif

[83] Fix | Delete

[84] Fix | Delete

#if __HAVE_FLOAT128X && __GLIBC_USE (IEC_60559_TYPES_EXT)

[85] Fix | Delete

# define CMPLXF128X(x, y) \

[86] Fix | Delete

__builtin_complex ((_Float128x) (x), (_Float128x) (y))

[87] Fix | Delete

#endif

[88] Fix | Delete

[89] Fix | Delete

/* The file <bits/cmathcalls.h> contains the prototypes for all the

[90] Fix | Delete

actual math functions. These macros are used for those prototypes,

[91] Fix | Delete

so we can easily declare each function as both `name' and `__name',

[92] Fix | Delete

and can declare the float versions `namef' and `__namef'. */

[93] Fix | Delete

[94] Fix | Delete

#define __MATHCALL(function, args) \

[95] Fix | Delete

__MATHDECL (_Mdouble_complex_,function, args)

[96] Fix | Delete

#define __MATHDECL(type, function, args) \

[97] Fix | Delete

__MATHDECL_1(type, function, args); \

[98] Fix | Delete

__MATHDECL_1(type, __CONCAT(__,function), args)

[99] Fix | Delete

#define __MATHDECL_1(type, function, args) \

[100] Fix | Delete

extern type __MATH_PRECNAME(function) args __THROW

[101] Fix | Delete

[102] Fix | Delete

#define _Mdouble_ double

[103] Fix | Delete

#define __MATH_PRECNAME(name) name

[104] Fix | Delete

#include <bits/cmathcalls.h>

[105] Fix | Delete

#undef _Mdouble_

[106] Fix | Delete

#undef __MATH_PRECNAME

[107] Fix | Delete

[108] Fix | Delete

/* Now the float versions. */

[109] Fix | Delete

#define _Mdouble_ float

[110] Fix | Delete

#define __MATH_PRECNAME(name) name##f

[111] Fix | Delete

#include <bits/cmathcalls.h>

[112] Fix | Delete

#undef _Mdouble_

[113] Fix | Delete

#undef __MATH_PRECNAME

[114] Fix | Delete

[115] Fix | Delete

/* And the long double versions. It is non-critical to define them

[116] Fix | Delete

here unconditionally since `long double' is required in ISO C99. */

[117] Fix | Delete

#if !(defined __NO_LONG_DOUBLE_MATH && defined _LIBC) \

[118] Fix | Delete

|| defined __LDBL_COMPAT

[119] Fix | Delete

# ifdef __LDBL_COMPAT

[120] Fix | Delete

# undef __MATHDECL_1

[121] Fix | Delete

# define __MATHDECL_1(type, function, args) \

[122] Fix | Delete

extern type __REDIRECT_NTH(__MATH_PRECNAME(function), args, function)

[123] Fix | Delete

# endif

[124] Fix | Delete

[125] Fix | Delete

# define _Mdouble_ long double

[126] Fix | Delete

# define __MATH_PRECNAME(name) name##l

[127] Fix | Delete

# include <bits/cmathcalls.h>

[128] Fix | Delete

#endif

[129] Fix | Delete

#undef _Mdouble_

[130] Fix | Delete

#undef __MATH_PRECNAME

[131] Fix | Delete

[132] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT16 || (__HAVE_FLOAT16 && !defined _LIBC)) \

[133] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[134] Fix | Delete

# undef _Mdouble_complex_

[135] Fix | Delete

# define _Mdouble_complex_ __CFLOAT16

[136] Fix | Delete

# define _Mdouble_ _Float16

[137] Fix | Delete

# define __MATH_PRECNAME(name) name##f16

[138] Fix | Delete

# include <bits/cmathcalls.h>

[139] Fix | Delete

# undef _Mdouble_

[140] Fix | Delete

# undef __MATH_PRECNAME

[141] Fix | Delete

# undef _Mdouble_complex_

[142] Fix | Delete

#endif

[143] Fix | Delete

[144] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT32 || (__HAVE_FLOAT32 && !defined _LIBC)) \

[145] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[146] Fix | Delete

# undef _Mdouble_complex_

[147] Fix | Delete

# define _Mdouble_complex_ __CFLOAT32

[148] Fix | Delete

# define _Mdouble_ _Float32

[149] Fix | Delete

# define __MATH_PRECNAME(name) name##f32

[150] Fix | Delete

# include <bits/cmathcalls.h>

[151] Fix | Delete

# undef _Mdouble_

[152] Fix | Delete

# undef __MATH_PRECNAME

[153] Fix | Delete

# undef _Mdouble_complex_

[154] Fix | Delete

#endif

[155] Fix | Delete

[156] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT64 || (__HAVE_FLOAT64 && !defined _LIBC)) \

[157] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[158] Fix | Delete

# undef _Mdouble_complex_

[159] Fix | Delete

# define _Mdouble_complex_ __CFLOAT64

[160] Fix | Delete

# define _Mdouble_ _Float64

[161] Fix | Delete

# define __MATH_PRECNAME(name) name##f64

[162] Fix | Delete

# include <bits/cmathcalls.h>

[163] Fix | Delete

# undef _Mdouble_

[164] Fix | Delete

# undef __MATH_PRECNAME

[165] Fix | Delete

# undef _Mdouble_complex_

[166] Fix | Delete

#endif

[167] Fix | Delete

[168] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT128 || (__HAVE_FLOAT128 && !defined _LIBC)) \

[169] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[170] Fix | Delete

# undef _Mdouble_complex_

[171] Fix | Delete

# define _Mdouble_complex_ __CFLOAT128

[172] Fix | Delete

# define _Mdouble_ _Float128

[173] Fix | Delete

# define __MATH_PRECNAME(name) name##f128

[174] Fix | Delete

# include <bits/cmathcalls.h>

[175] Fix | Delete

# undef _Mdouble_

[176] Fix | Delete

# undef __MATH_PRECNAME

[177] Fix | Delete

# undef _Mdouble_complex_

[178] Fix | Delete

#endif

[179] Fix | Delete

[180] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT32X || (__HAVE_FLOAT32X && !defined _LIBC)) \

[181] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[182] Fix | Delete

# undef _Mdouble_complex_

[183] Fix | Delete

# define _Mdouble_complex_ __CFLOAT32X

[184] Fix | Delete

# define _Mdouble_ _Float32x

[185] Fix | Delete

# define __MATH_PRECNAME(name) name##f32x

[186] Fix | Delete

# include <bits/cmathcalls.h>

[187] Fix | Delete

# undef _Mdouble_

[188] Fix | Delete

# undef __MATH_PRECNAME

[189] Fix | Delete

# undef _Mdouble_complex_

[190] Fix | Delete

#endif

[191] Fix | Delete

[192] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT64X || (__HAVE_FLOAT64X && !defined _LIBC)) \

[193] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[194] Fix | Delete

# undef _Mdouble_complex_

[195] Fix | Delete

# define _Mdouble_complex_ __CFLOAT64X

[196] Fix | Delete

# define _Mdouble_ _Float64x

[197] Fix | Delete

# define __MATH_PRECNAME(name) name##f64x

[198] Fix | Delete

# include <bits/cmathcalls.h>

[199] Fix | Delete

# undef _Mdouble_

[200] Fix | Delete

# undef __MATH_PRECNAME

[201] Fix | Delete

# undef _Mdouble_complex_

[202] Fix | Delete

#endif

[203] Fix | Delete

[204] Fix | Delete

#if (__HAVE_DISTINCT_FLOAT128X || (__HAVE_FLOAT128X && !defined _LIBC)) \

[205] Fix | Delete

&& __GLIBC_USE (IEC_60559_TYPES_EXT)

[206] Fix | Delete

# undef _Mdouble_complex_

[207] Fix | Delete

# define _Mdouble_complex_ __CFLOAT128X

[208] Fix | Delete

# define _Mdouble_ _Float128x

[209] Fix | Delete

# define __MATH_PRECNAME(name) name##f128x

[210] Fix | Delete

# include <bits/cmathcalls.h>

[211] Fix | Delete

# undef _Mdouble_

[212] Fix | Delete

# undef __MATH_PRECNAME

[213] Fix | Delete

# undef _Mdouble_complex_

[214] Fix | Delete

#endif

[215] Fix | Delete

[216] Fix | Delete

#undef __MATHDECL_1

[217] Fix | Delete

#undef __MATHDECL

[218] Fix | Delete

#undef __MATHCALL

[219] Fix | Delete

[220] Fix | Delete

__END_DECLS

[221] Fix | Delete

[222] Fix | Delete

#endif /* complex.h */

[223] Fix | Delete

[224] Fix | Delete