gsl_mode.h 2.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. /* gsl_mode.h
  2. *
  3. * Copyright (C) 1996, 1997, 1998, 1999, 2000, 2004 Gerard Jungman
  4. *
  5. * This program is free software; you can redistribute it and/or modify
  6. * it under the terms of the GNU General Public License as published by
  7. * the Free Software Foundation; either version 3 of the License, or (at
  8. * your option) any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful, but
  11. * WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  13. * General Public License for more details.
  14. *
  15. * You should have received a copy of the GNU General Public License
  16. * along with this program; if not, write to the Free Software
  17. * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  18. */
  19. /* Author: B. Gough and G. Jungman */
  20. #ifndef __GSL_MODE_H__
  21. #define __GSL_MODE_H__
  22. #undef __BEGIN_DECLS
  23. #undef __END_DECLS
  24. #ifdef __cplusplus
  25. # define __BEGIN_DECLS extern "C" {
  26. # define __END_DECLS }
  27. #else
  28. # define __BEGIN_DECLS /* empty */
  29. # define __END_DECLS /* empty */
  30. #endif
  31. __BEGIN_DECLS
  32. /* Some functions can take a mode argument. This
  33. * is a rough method to do things like control
  34. * the precision of the algorithm. This mainly
  35. * occurs in special functions, but we figured
  36. * it was ok to have a general facility.
  37. *
  38. * The mode type is 32-bit field. Most of
  39. * the fields are currently unused. Users
  40. * '|' various predefined constants to get
  41. * a desired mode.
  42. */
  43. typedef unsigned int gsl_mode_t;
  44. /* Here are the predefined constants.
  45. * Note that the precision constants
  46. * are special because they are used
  47. * to index arrays, so do not change
  48. * them. The precision information is
  49. * in the low order 3 bits of gsl_mode_t
  50. * (the third bit is currently unused).
  51. */
  52. /* Note that "0" is double precision,
  53. * so that you get that by default if
  54. * you forget a flag.
  55. */
  56. #define GSL_PREC_DOUBLE 0
  57. #define GSL_PREC_SINGLE 1
  58. #define GSL_PREC_APPROX 2
  59. #ifdef HAVE_INLINE
  60. extern inline unsigned int GSL_MODE_PREC(gsl_mode_t mt);
  61. extern inline unsigned int
  62. GSL_MODE_PREC(gsl_mode_t mt)
  63. { return (mt & (unsigned int)7); }
  64. #else /* HAVE_INLINE */
  65. #define GSL_MODE_PREC(mt) ((mt) & (unsigned int)7)
  66. #endif /* HAVE_INLINE */
  67. /* Here are some predefined generic modes.
  68. */
  69. #define GSL_MODE_DEFAULT 0
  70. __END_DECLS
  71. #endif /* __GSL_MODE_H__ */