/sysdeps/alpha/fpu/s_ccosf.c

https://gitlab.com/Namal/glibc · C · 50 lines · 24 code · 9 blank · 17 comment · 0 complexity · e02f3d456a0e5c9049069c231ff441e1 MD5 · raw file

  1. /* Return cosine of complex float value.
  2. Copyright (C) 2004-2016 Free Software Foundation, Inc.
  3. This file is part of the GNU C Library.
  4. The GNU C Library is free software; you can redistribute it and/or
  5. modify it under the terms of the GNU Lesser General Public
  6. License as published by the Free Software Foundation; either
  7. version 2.1 of the License, or (at your option) any later version.
  8. The GNU C Library is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  11. Lesser General Public License for more details.
  12. You should have received a copy of the GNU Lesser General Public
  13. License along with the GNU C Library. If not, see
  14. <http://www.gnu.org/licenses/>. */
  15. #define __ccosf __ccosf_not_defined
  16. #define ccosf ccosf_not_defined
  17. #include <complex.h>
  18. #include <math.h>
  19. #undef __ccosf
  20. #undef ccosf
  21. #define __ccosf internal_ccosf
  22. static _Complex float internal_ccosf (_Complex float x);
  23. #include <math/s_ccosf.c>
  24. #include "cfloat-compat.h"
  25. #undef __ccosf
  26. c1_cfloat_rettype
  27. __c1_ccosf (c1_cfloat_decl (x))
  28. {
  29. _Complex float r = internal_ccosf (c1_cfloat_value (x));
  30. return c1_cfloat_return (r);
  31. }
  32. c2_cfloat_rettype
  33. __c2_ccosf (c2_cfloat_decl (x))
  34. {
  35. _Complex float r = internal_ccosf (c2_cfloat_value (x));
  36. return c2_cfloat_return (r);
  37. }
  38. cfloat_versions (ccosf);