summaryrefslogtreecommitdiff
path: root/tests/tcosh.c
diff options
context:
space:
mode:
authorenge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2008-12-08 18:31:21 +0000
committerenge <enge@211d60ee-9f03-0410-a15a-8952a2c7a4e4>2008-12-08 18:31:21 +0000
commitd1e5e840f5ee9f3c472a3142141e22afa2bb8fb2 (patch)
treeb2b095e50d421b1ee5d7119716db4e551ad97390 /tests/tcosh.c
parent79aefabea7f3fb6160b7f5f3a58f3c81323e0e94 (diff)
downloadmpc-d1e5e840f5ee9f3c472a3142141e22afa2bb8fb2.tar.gz
added return value to cosh
included check53 for cosh into the data file git-svn-id: svn://scm.gforge.inria.fr/svn/mpc/trunk@386 211d60ee-9f03-0410-a15a-8952a2c7a4e4
Diffstat (limited to 'tests/tcosh.c')
-rw-r--r--tests/tcosh.c28
1 files changed, 1 insertions, 27 deletions
diff --git a/tests/tcosh.c b/tests/tcosh.c
index b14e3c3..3e757e2 100644
--- a/tests/tcosh.c
+++ b/tests/tcosh.c
@@ -129,35 +129,10 @@ pure_imaginary_argument (void)
mpc_clear (u);
}
-static void
-check_53 (void)
-{
- mpc_t z;
- mpc_t cosh_z;
- mpc_t c;
-
- mpc_init2 (z, 53);
- mpc_init2 (cosh_z, 53);
- mpc_init2 (c, 53);
-
- /* cosh(z) is near (1+2^(-53)) *(0.5+i) */
- mpfr_set_str (MPC_RE (z), "1DA2E1BD2C9EBCp-53", 16, GMP_RNDN);
- mpfr_set_str (MPC_IM (z), "138AADEA15829Fp-52", 16, GMP_RNDN);
- mpfr_set_str (MPC_RE (c), "10000000000001p-53", 16, GMP_RNDN);
- mpfr_set_str (MPC_IM (c), "10000000000001p-52", 16, GMP_RNDN);
- mpc_cosh (cosh_z, z, MPC_RNDNN);
- if (mpc_cmp (cosh_z, c) != 0)
- test_failed (z, cosh_z, c);
-
- mpc_clear (c);
- mpc_clear (cosh_z);
- mpc_clear (z);
-}
-
int
main (void)
{
- DECL_FUNC(V_CC, f,mpc_cosh);
+ DECL_FUNC(CC, f,mpc_cosh);
test_start ();
@@ -166,7 +141,6 @@ main (void)
pure_real_argument ();
pure_imaginary_argument ();
- check_53 ();
test_end ();