diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-04-22 10:13:05 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-04-22 10:13:05 +0000 |
commit | f1931a83dad9daf8376af3aa6a4c26c31a03be71 (patch) | |
tree | 23f81840f4e1b8c2fd2b295fb6a901a790fa49bb /cot.c | |
parent | 1ff8bd4f1c053baf7ecf092dfa8a3947a2b86c6d (diff) | |
download | mpfr-f1931a83dad9daf8376af3aa6a4c26c31a03be71.tar.gz |
added sec, csc, cot
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3478 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'cot.c')
-rw-r--r-- | cot.c | 36 |
1 files changed, 36 insertions, 0 deletions
@@ -0,0 +1,36 @@ +/* mpfr_cot - cotangent function. + +Copyright 2005 Free Software Foundation, Inc. + +This file is part of the MPFR Library. + +The MPFR Library is free software; you can redistribute it and/or modify +it under the terms of the GNU Lesser General Public License as published by +the Free Software Foundation; either version 2.1 of the License, or (at your +option) any later version. + +The MPFR Library is distributed in the hope that it will be useful, but +WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY +or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public +License for more details. + +You should have received a copy of the GNU Lesser General Public License +along with the MPFR Library; see the file COPYING.LIB. If not, write to +the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, +MA 02111-1307, USA. */ + +/* the cotangent is defined by cot(x) = 1/tan(x) = cos(x)/sin(x). + cot (NaN) = NaN. + cot (+Inf) = csc (-Inf) = NaN. + cot (+0) = +Inf. + cot (-0) = -Inf. +*/ + +#define FUNCTION mpfr_cot +#define INVERSE mpfr_tan +#define ACTION_NAN(y) do { MPFR_SET_NAN(y); MPFR_RET_NAN; } while (1) +#define ACTION_INF(y) do { MPFR_SET_NAN(y); MPFR_RET_NAN; } while (1) +#define ACTION_ZERO(y,x) do { MPFR_SET_SAME_SIGN(y,x); MPFR_SET_INF(y); \ + MPFR_RET(0); } while (1) + +#include "gen_inverse.h" |