Print this page
11210 libm should be cstyle(1ONBLD) clean

*** 20,54 **** */ /* * Copyright 2011 Nexenta Systems, Inc. All rights reserved. */ /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #pragma weak __ctan = ctan ! /* INDENT OFF */ /* * dcomplex ctan(dcomplex z); * * If z = x+iy, then since ctan(iz) = i*ctanh(z), we have * * ctan(z) = ctan((-1)*(-z)) = ctan(i*i*(-z)) * = i*ctanh(i*(-z)) = i*ctanh(i*(-x-yi)) * = i*ctanh(y-ix) * = -Im(ctanh(y-ix))+i*Re(ctanh(y-ix)) */ - /* INDENT ON */ #include "libm.h" #include "complex_wrapper.h" dcomplex ! ctan(dcomplex z) { double x, y; dcomplex ans, ct; x = D_RE(z); y = D_IM(z); --- 20,55 ---- */ /* * Copyright 2011 Nexenta Systems, Inc. All rights reserved. */ + /* * Copyright 2006 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #pragma weak __ctan = ctan ! /* * dcomplex ctan(dcomplex z); * * If z = x+iy, then since ctan(iz) = i*ctanh(z), we have * * ctan(z) = ctan((-1)*(-z)) = ctan(i*i*(-z)) * = i*ctanh(i*(-z)) = i*ctanh(i*(-x-yi)) * = i*ctanh(y-ix) * = -Im(ctanh(y-ix))+i*Re(ctanh(y-ix)) */ #include "libm.h" #include "complex_wrapper.h" dcomplex ! ctan(dcomplex z) ! { double x, y; dcomplex ans, ct; x = D_RE(z); y = D_IM(z);