summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorthevenyp <thevenyp@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2008-05-20 14:33:32 +0000
committerthevenyp <thevenyp@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2008-05-20 14:33:32 +0000
commita45ae524c8e221c394e97ff949385c53ae1161cf (patch)
treed7147d097d26ce1269b30982d7964c27e880db91 /src
parent9c179c155cb602d7e877b943d9ef4c0ab46a8db2 (diff)
downloadmpc-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.c4
-rw-r--r--src/tan.c8
2 files changed, 6 insertions, 6 deletions
diff --git a/src/cos.c b/src/cos.c
index 6843221..8e758dc 100644
--- a/src/cos.c
+++ b/src/cos.c
@@ -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));
diff --git a/src/tan.c b/src/tan.c
index 10500b2..c640362 100644
--- a/src/tan.c
+++ b/src/tan.c
@@ -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));