Print this page
11210 libm should be cstyle(1ONBLD) clean
*** 20,52 ****
*/
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma weak __ccos = ccos
! /* INDENT OFF */
/*
* dcomplex ccos(dcomplex z);
*
* z := x+iy; since ccos(iz) = cosh(z), we have
* ccos(z) = ccos((-1)*(-z)) = ccos(i*i*(-z))
* = ccosh(i*(-z)) = ccosh(i*(-x-yi))
* = ccosh(y-ix)
*/
- /* INDENT ON */
#include "libm.h"
#include "complex_wrapper.h"
dcomplex
! ccos(dcomplex z) {
double x, y;
x = D_RE(z);
y = D_IM(z);
D_RE(z) = y;
--- 20,53 ----
*/
/*
* Copyright 2011 Nexenta Systems, Inc. All rights reserved.
*/
+
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma weak __ccos = ccos
!
/*
* dcomplex ccos(dcomplex z);
*
* z := x+iy; since ccos(iz) = cosh(z), we have
* ccos(z) = ccos((-1)*(-z)) = ccos(i*i*(-z))
* = ccosh(i*(-z)) = ccosh(i*(-x-yi))
* = ccosh(y-ix)
*/
#include "libm.h"
#include "complex_wrapper.h"
dcomplex
! ccos(dcomplex z)
! {
double x, y;
x = D_RE(z);
y = D_IM(z);
D_RE(z) = y;