Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2025-01-18 10:00:59

0001 /* specfunc/gsl_sf_airy.h
0002  * 
0003  * Copyright (C) 1996, 1997, 1998, 1999, 2000 Gerard Jungman
0004  * 
0005  * This program is free software; you can redistribute it and/or modify
0006  * it under the terms of the GNU General Public License as published by
0007  * the Free Software Foundation; either version 3 of the License, or (at
0008  * your option) any later version.
0009  * 
0010  * This program is distributed in the hope that it will be useful, but
0011  * WITHOUT ANY WARRANTY; without even the implied warranty of
0012  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
0013  * General Public License for more details.
0014  * 
0015  * You should have received a copy of the GNU General Public License
0016  * along with this program; if not, write to the Free Software
0017  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
0018  */
0019 
0020 /* Author:  G. Jungman */
0021 
0022 #ifndef __GSL_SF_AIRY_H__
0023 #define __GSL_SF_AIRY_H__
0024 
0025 #include <gsl/gsl_mode.h>
0026 #include <gsl/gsl_sf_result.h>
0027 
0028 #undef __BEGIN_DECLS
0029 #undef __END_DECLS
0030 #ifdef __cplusplus
0031 # define __BEGIN_DECLS extern "C" {
0032 # define __END_DECLS }
0033 #else
0034 # define __BEGIN_DECLS /* empty */
0035 # define __END_DECLS /* empty */
0036 #endif
0037 
0038 __BEGIN_DECLS
0039 
0040 
0041 /* Airy function Ai(x)
0042  *
0043  * exceptions: GSL_EUNDRFLW
0044  */
0045 int gsl_sf_airy_Ai_e(const double x, const gsl_mode_t mode, gsl_sf_result * result);
0046 double gsl_sf_airy_Ai(const double x, gsl_mode_t mode);
0047 
0048 
0049 /* Airy function Bi(x)
0050  *
0051  * exceptions: GSL_EOVRFLW
0052  */
0053 int gsl_sf_airy_Bi_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0054 double gsl_sf_airy_Bi(const double x, gsl_mode_t mode);
0055 
0056 
0057 /* scaled Ai(x):
0058  *                     Ai(x)   x < 0
0059  *   exp(+2/3 x^{3/2}) Ai(x)   x > 0
0060  *
0061  * exceptions: none
0062  */
0063 int gsl_sf_airy_Ai_scaled_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0064 double gsl_sf_airy_Ai_scaled(const double x, gsl_mode_t mode);
0065 
0066 
0067 /* scaled Bi(x):
0068  *                     Bi(x)   x < 0
0069  *   exp(-2/3 x^{3/2}) Bi(x)   x > 0
0070  *
0071  * exceptions: none
0072  */
0073 int gsl_sf_airy_Bi_scaled_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0074 double gsl_sf_airy_Bi_scaled(const double x, gsl_mode_t mode);
0075 
0076 
0077 /* derivative Ai'(x)
0078  *
0079  * exceptions: GSL_EUNDRFLW
0080  */
0081 int gsl_sf_airy_Ai_deriv_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0082 double gsl_sf_airy_Ai_deriv(const double x, gsl_mode_t mode);
0083 
0084 
0085 /* derivative Bi'(x)
0086  *
0087  * exceptions: GSL_EOVRFLW
0088  */
0089 int gsl_sf_airy_Bi_deriv_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0090 double gsl_sf_airy_Bi_deriv(const double x, gsl_mode_t mode);
0091 
0092 
0093 /* scaled derivative Ai'(x):
0094  *                     Ai'(x)   x < 0
0095  *   exp(+2/3 x^{3/2}) Ai'(x)   x > 0
0096  *
0097  * exceptions: none
0098  */
0099 int gsl_sf_airy_Ai_deriv_scaled_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0100 double gsl_sf_airy_Ai_deriv_scaled(const double x, gsl_mode_t mode);
0101 
0102 
0103 /* scaled derivative:
0104  *                     Bi'(x)   x < 0
0105  *   exp(-2/3 x^{3/2}) Bi'(x)   x > 0
0106  *
0107  * exceptions: none
0108  */
0109 int gsl_sf_airy_Bi_deriv_scaled_e(const double x, gsl_mode_t mode, gsl_sf_result * result);
0110 double gsl_sf_airy_Bi_deriv_scaled(const double x, gsl_mode_t mode);
0111 
0112 
0113 /* Zeros of Ai(x)
0114  */
0115 int gsl_sf_airy_zero_Ai_e(unsigned int s, gsl_sf_result * result);
0116 double gsl_sf_airy_zero_Ai(unsigned int s);
0117 
0118 
0119 /* Zeros of Bi(x)
0120  */
0121 int gsl_sf_airy_zero_Bi_e(unsigned int s, gsl_sf_result * result);
0122 double gsl_sf_airy_zero_Bi(unsigned int s);
0123 
0124 
0125 /* Zeros of Ai'(x)
0126  */
0127 int gsl_sf_airy_zero_Ai_deriv_e(unsigned int s, gsl_sf_result * result);
0128 double gsl_sf_airy_zero_Ai_deriv(unsigned int s);
0129 
0130 
0131 /* Zeros of Bi'(x)
0132  */
0133 int gsl_sf_airy_zero_Bi_deriv_e(unsigned int s, gsl_sf_result * result);
0134 double gsl_sf_airy_zero_Bi_deriv(unsigned int s);
0135 
0136 
0137 __END_DECLS
0138 
0139 #endif /* __GSL_SF_AIRY_H__ */