xref: /llvm-project/flang/runtime/Float128Math/complex-math.c (revision fc51c7f0cc1abf1679100d71d103fe5d943f580b)
1 /*===-- runtime/Float128Math/complex-math.c -------------------------*- C -*-===
2  *
3  * Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4  * See https://llvm.org/LICENSE.txt for license information.
5  * SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6  *
7  * ===-----------------------------------------------------------------------===
8  */
9 
10 #include "complex-math.h"
11 
12 #if HAS_LDBL128 || HAS_FLOAT128
13 
14 CFloat128Type RTDEF(CAbsF128)(CFloat128ComplexType x) { return CAbs(x); }
15 CFloat128ComplexType RTDEF(CAcosF128)(CFloat128ComplexType x) {
16   return CAcos(x);
17 }
18 CFloat128ComplexType RTDEF(CAcoshF128)(CFloat128ComplexType x) {
19   return CAcosh(x);
20 }
21 CFloat128ComplexType RTDEF(CAsinF128)(CFloat128ComplexType x) {
22   return CAsin(x);
23 }
24 CFloat128ComplexType RTDEF(CAsinhF128)(CFloat128ComplexType x) {
25   return CAsinh(x);
26 }
27 CFloat128ComplexType RTDEF(CAtanF128)(CFloat128ComplexType x) {
28   return CAtan(x);
29 }
30 CFloat128ComplexType RTDEF(CAtanhF128)(CFloat128ComplexType x) {
31   return CAtanh(x);
32 }
33 CFloat128ComplexType RTDEF(CCosF128)(CFloat128ComplexType x) { return CCos(x); }
34 CFloat128ComplexType RTDEF(CCoshF128)(CFloat128ComplexType x) {
35   return CCosh(x);
36 }
37 CFloat128ComplexType RTDEF(CExpF128)(CFloat128ComplexType x) { return CExp(x); }
38 CFloat128ComplexType RTDEF(CLogF128)(CFloat128ComplexType x) { return CLog(x); }
39 CFloat128ComplexType RTDEF(CPowF128)(
40     CFloat128ComplexType x, CFloat128ComplexType p) {
41   return CPow(x, p);
42 }
43 CFloat128ComplexType RTDEF(CSinF128)(CFloat128ComplexType x) { return CSin(x); }
44 CFloat128ComplexType RTDEF(CSinhF128)(CFloat128ComplexType x) {
45   return CSinh(x);
46 }
47 CFloat128ComplexType RTDEF(CSqrtF128)(CFloat128ComplexType x) {
48   return CSqrt(x);
49 }
50 CFloat128ComplexType RTDEF(CTanF128)(CFloat128ComplexType x) { return CTan(x); }
51 CFloat128ComplexType RTDEF(CTanhF128)(CFloat128ComplexType x) {
52   return CTanh(x);
53 }
54 
55 #endif // HAS_LDBL128 || HAS_FLOAT128
56