Print this page
11210 libm should be cstyle(1ONBLD) clean
@@ -20,31 +20,32 @@
*/
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
+
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma weak __catanh = catanh
-/* INDENT OFF */
+
/*
* z := x + iy
* catanh(z) = -i catan(iz)
* = -i catan(-y+ix)
* = (Im(catan(-y+ix)), -Re(catan(-y+ix)))
*/
-/* INDENT ON */
#include "libm.h"
#include "complex_wrapper.h"
dcomplex
-catanh(dcomplex z) {
+catanh(dcomplex z)
+{
double x, y;
dcomplex ans, ct;
x = D_RE(z);
y = D_IM(z);