summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorzimmerma <zimmerma@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2013-07-24 12:25:26 +0000
committerzimmerma <zimmerma@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2013-07-24 12:25:26 +0000
commit22dad8c9d6bde43cba07f5564b1329bd778f47f5 (patch)
tree2872f98701edac2fffa3f62b1e4faff198d6da76 /src
parent5b46f2286cb5351808925572c5adec5541628d72 (diff)
downloadmpc-22dad8c9d6bde43cba07f5564b1329bd778f47f5.tar.gz
fixed typos reported by Ondřej Bílka <neleai@seznam.cz>
(cf http://lists.gforge.inria.fr/pipermail/mpc-discuss/2013-July/001241.html) git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@1298 211d60ee-9f03-0410-a15a-8952a2c7a4e4
Diffstat (limited to 'src')
-rw-r--r--src/mpc-impl.h2
-rw-r--r--src/mul.c2
-rw-r--r--src/pow.c2
-rw-r--r--src/tan.c2
4 files changed, 4 insertions, 4 deletions
diff --git a/src/mpc-impl.h b/src/mpc-impl.h
index 5664955..f8001cd 100644
--- a/src/mpc-impl.h
+++ b/src/mpc-impl.h
@@ -62,7 +62,7 @@ along with this program. If not, see http://www.gnu.org/licenses/ .
/* work around spurious signs in nan */
#define MPFR_ADD_ONE_ULP(x) mpfr_add_one_ulp (x, MPFR_RNDN)
#define MPFR_SUB_ONE_ULP(x) mpfr_sub_one_ulp (x, MPFR_RNDN)
- /* drop unused rounding mode from macroes */
+ /* drop unused rounding mode from macros */
#define MPFR_SWAP(a,b) do { mpfr_srcptr tmp; tmp = a; a = b; b = tmp; } while (0)
diff --git a/src/mul.c b/src/mul.c
index 3927888..73c581d 100644
--- a/src/mul.c
+++ b/src/mul.c
@@ -43,7 +43,7 @@ mul_infinite (mpc_ptr z, mpc_srcptr x, mpc_srcptr y)
/* compute the sign of
u = xrs * yrs * xr * yr - xis * yis * xi * yi
v = xrs * yis * xr * yi + xis * yrs * xi * yr
- +1 if positive, -1 if negatiye, 0 if NaN */
+ +1 if positive, -1 if negative, 0 if NaN */
if ( mpfr_nan_p (mpc_realref (x)) || mpfr_nan_p (mpc_imagref (x))
|| mpfr_nan_p (mpc_realref (y)) || mpfr_nan_p (mpc_imagref (y))) {
u = 0;
diff --git a/src/pow.c b/src/pow.c
index 4b394ea..5a2b819 100644
--- a/src/pow.c
+++ b/src/pow.c
@@ -659,7 +659,7 @@ mpc_pow (mpc_ptr z, mpc_srcptr x, mpc_srcptr y, mpc_rnd_t rnd)
int ret_exp;
mpfr_exp_t dr, di;
mpfr_prec_t q=0;
- /* to avoid warning message, real initialisation below */
+ /* to avoid warning message, real initialization below */
mpc_log (t, x, MPC_RNDNN);
mpc_mul (t, t, y, MPC_RNDNN);
diff --git a/src/tan.c b/src/tan.c
index 0764db8..ce73621 100644
--- a/src/tan.c
+++ b/src/tan.c
@@ -237,7 +237,7 @@ mpc_tan (mpc_ptr rop, mpc_srcptr op, mpc_rnd_t rnd)
inex = mpc_div (x, x, y, MPC_RNDZZ);
/* OP is no pure real nor pure imaginary, so in theory the real and
imaginary parts of its tangent cannot be null. However due to
- rouding errors this might happen. Consider for example
+ rounding errors this might happen. Consider for example
tan(1+14*I) = 1.26e-10 + 1.00*I. For small precision sin(op) and
cos(op) differ only by a factor I, thus after mpc_div x = I and
its real part is zero. */