1 /* tatanh -- test file for mpc_atanh.
3 Copyright (C) 2009 INRIA
5 This file is part of GNU MPC.
7 GNU MPC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU Lesser General Public License as published by the
9 Free Software Foundation; either version 3 of the License, or (at your
10 option) any later version.
12 GNU MPC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
14 FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for
17 You should have received a copy of the GNU Lesser General Public License
18 along with this program. If not, see http://www.gnu.org/licenses/ .
21 #include "mpc-tests.h"
29 mpc_init3 (y, 17, 42);
30 mpc_set_ui_ui (x, 1, 1, MPC_RNDNN);
31 mpc_atanh (y, x, MPC_RNDNN);
32 if (mpfr_get_prec (mpc_realref(y)) != 17 ||
33 mpfr_get_prec (mpc_imagref(y)) != 42)
35 printf ("Error, mpc_atanh changed the precisions!!!\n");
45 DECL_FUNC (CC, f, mpc_atanh);
51 data_check (f, "atanh.dat");
52 tgeneric (f, 2, 512, 5, 128);