ulps: Fix long lines
[mathlib.git] / ulps / basic-complex.c
CommitLineData
cb9c014a 1#include "basic-complex.h"
2
3/*******************************************************************************
4 * Basic arithmetic of complex numbers (double precision)
5 ******************************************************************************/
6double complex
7cadd(double complex z, double complex w)
8{
9 return (z+w);
10}
11
12double complex
13csub(double complex z, double complex w)
14{
15 return (z-w);
16}
17
18double complex
19cmul(double complex z, double complex w)
20{
21 return (z*w);
22}
23
24double complex
25cdiv(double complex z, double complex w)
26{
27 return (z/w);
28}
29
30double complex
31cneg(double complex z)
32{
33 return (-z);
34}
35
36/*******************************************************************************
37 * Basic arithmetic of complex numbers (long double precision)
38 ******************************************************************************/
39long double complex
40caddl(long double complex z, long double complex w)
41{
42 return (z+w);
43}
44
45long double complex
46csubl(long double complex z, long double complex w)
47{
48 return (z-w);
49}
50
51long double complex
52cmull(long double complex z, long double complex w)
53{
54 return (z*w);
55}
56
57long double complex
58cdivl(long double complex z, long double complex w)
59{
60 return (z/w);
61}
62
63long double complex
64cnegl(long double complex z)
65{
66 return (-z);
67}