@@ -37,51 +37,51 @@ static complex c_mi = {0., -1.};
3737static complex c_pi2 = {M_PI /2. , 0. };
3838
3939/* forward declarations */
40- complex c_log ();
41- complex c_prodi ();
42- complex c_sqrt ();
40+ staticforward complex c_log ();
41+ staticforward complex c_prodi ();
42+ staticforward complex c_sqrt ();
4343
4444
45- complex c_acos (x )
45+ static complex c_acos (x )
4646 complex x ;
4747{
4848 return c_neg (c_prodi (c_log (c_sum (x ,c_prod (c_i ,
4949 c_sqrt (c_diff (c_1 ,c_prod (x ,x ))))))));
5050}
5151
52- complex c_acosh (x )
52+ static complex c_acosh (x )
5353 complex x ;
5454{
5555 return c_log (c_sum (x ,c_prod (c_i ,
5656 c_sqrt (c_diff (c_1 ,c_prod (x ,x ))))));
5757}
5858
59- complex c_asin (x )
59+ static complex c_asin (x )
6060 complex x ;
6161{
6262 return c_neg (c_prodi (c_log (c_sum (c_prod (c_i ,x ),
6363 c_sqrt (c_diff (c_1 ,c_prod (x ,x )))))));
6464}
6565
66- complex c_asinh (x )
66+ static complex c_asinh (x )
6767 complex x ;
6868{
6969 return c_neg (c_log (c_diff (c_sqrt (c_sum (c_1 ,c_prod (x ,x ))),x )));
7070}
7171
72- complex c_atan (x )
72+ static complex c_atan (x )
7373 complex x ;
7474{
7575 return c_prod (c_i2 ,c_log (c_quot (c_sum (c_i ,x ),c_diff (c_i ,x ))));
7676}
7777
78- complex c_atanh (x )
78+ static complex c_atanh (x )
7979 complex x ;
8080{
8181 return c_prod (c_half ,c_log (c_quot (c_sum (c_1 ,x ),c_diff (c_1 ,x ))));
8282}
8383
84- complex c_cos (x )
84+ static complex c_cos (x )
8585 complex x ;
8686{
8787 complex r ;
@@ -90,7 +90,7 @@ complex c_cos(x)
9090 return r ;
9191}
9292
93- complex c_cosh (x )
93+ static complex c_cosh (x )
9494 complex x ;
9595{
9696 complex r ;
@@ -99,7 +99,7 @@ complex c_cosh(x)
9999 return r ;
100100}
101101
102- complex c_exp (x )
102+ static complex c_exp (x )
103103 complex x ;
104104{
105105 complex r ;
@@ -109,7 +109,7 @@ complex c_exp(x)
109109 return r ;
110110}
111111
112- complex c_log (x )
112+ static complex c_log (x )
113113 complex x ;
114114{
115115 complex r ;
@@ -119,7 +119,7 @@ complex c_log(x)
119119 return r ;
120120}
121121
122- complex c_log10 (x )
122+ static complex c_log10 (x )
123123 complex x ;
124124{
125125 complex r ;
@@ -129,7 +129,7 @@ complex c_log10(x)
129129 return r ;
130130}
131131
132- complex c_prodi (x )
132+ static complex c_prodi (x )
133133 complex x ;
134134{
135135 complex r ;
@@ -138,7 +138,7 @@ complex c_prodi(x)
138138 return r ;
139139}
140140
141- complex c_sin (x )
141+ static complex c_sin (x )
142142 complex x ;
143143{
144144 complex r ;
@@ -147,7 +147,7 @@ complex c_sin(x)
147147 return r ;
148148}
149149
150- complex c_sinh (x )
150+ static complex c_sinh (x )
151151 complex x ;
152152{
153153 complex r ;
@@ -156,7 +156,7 @@ complex c_sinh(x)
156156 return r ;
157157}
158158
159- complex c_sqrt (x )
159+ static complex c_sqrt (x )
160160 complex x ;
161161{
162162 complex r ;
@@ -182,7 +182,7 @@ complex c_sqrt(x)
182182 return r ;
183183}
184184
185- complex c_tan (x )
185+ static complex c_tan (x )
186186 complex x ;
187187{
188188 complex r ;
@@ -203,7 +203,7 @@ complex c_tan(x)
203203 return r ;
204204}
205205
206- complex c_tanh (x )
206+ static complex c_tanh (x )
207207 complex x ;
208208{
209209 complex r ;
0 commit comments