diff options
author | thevenyp <thevenyp@211d60ee-9f03-0410-a15a-8952a2c7a4e4> | 2008-05-20 14:33:32 +0000 |
---|---|---|
committer | thevenyp <thevenyp@211d60ee-9f03-0410-a15a-8952a2c7a4e4> | 2008-05-20 14:33:32 +0000 |
commit | a45ae524c8e221c394e97ff949385c53ae1161cf (patch) | |
tree | d7147d097d26ce1269b30982d7964c27e880db91 /src | |
parent | 9c179c155cb602d7e877b943d9ef4c0ab46a8db2 (diff) | |
download | mpc-a45ae524c8e221c394e97ff949385c53ae1161cf.tar.gz |
Cosmetic changes.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@132 211d60ee-9f03-0410-a15a-8952a2c7a4e4
Diffstat (limited to 'src')
-rw-r--r-- | src/cos.c | 4 | ||||
-rw-r--r-- | src/tan.c | 8 |
2 files changed, 6 insertions, 6 deletions
@@ -100,8 +100,8 @@ mpc_cos (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) if (mpfr_zero_p (MPC_RE (op))) { - /* cos(-0 - i * Inf) = cos(+0 + i * Inf) = +Inf - i * 0 */ - /* cos(-0 + i * Inf) = cos(+0 - i * Inf) = +Inf + i * 0 */ + /* cos(-0 -i*Inf) = cos(+0 +i*Inf) = +Inf -i*0 */ + /* cos(-0 +i*Inf) = cos(+0 -i*Inf) = +Inf +i*0 */ const int same_sign = mpfr_signbit (MPC_RE (op)) == mpfr_signbit (MPC_IM (op)); @@ -123,8 +123,8 @@ mpc_tan (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) if (mpfr_zero_p (MPC_RE (op))) { - /* tan(-0 - i * y) = -0 +i*tanh(y), when y is finite. */ - /* tan(-0 + i * y) = +0 +i*tanh(y), when y is finite. */ + /* tan(-0 -i*y) = -0 +i*tanh(y), when y is finite. */ + /* tan(+0 +i*y) = +0 +i*tanh(y), when y is finite. */ mpfr_set (MPC_RE (rop), MPC_RE (op), MPC_RND_RE (rnd)); mpfr_tanh (MPC_IM (rop), MPC_IM (op), MPC_RND_IM (rnd)); @@ -133,8 +133,8 @@ mpc_tan (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd) if (mpfr_zero_p (MPC_IM (op))) { - /* tan(x - i * 0) = tan(x) - i * 0 - tan(x + i * 0) = tan(x) + i * 0, when x is finite. */ + /* tan(x -i*0) = tan(x) -i*0, when x is finite. */ + /* tan(x +i*0) = tan(x) +i*0, when x is finite. */ mpfr_tan (MPC_RE (rop), MPC_RE (op), MPC_RND_RE (rnd)); mpfr_set (MPC_IM (rop), MPC_IM (op), MPC_RND_IM (rnd)); |