summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Ellint.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Ellint.hs')
-rw-r--r--lib/Numeric/GSL/Special/Ellint.hs140
1 files changed, 0 insertions, 140 deletions
diff --git a/lib/Numeric/GSL/Special/Ellint.hs b/lib/Numeric/GSL/Special/Ellint.hs
deleted file mode 100644
index 6735057..0000000
--- a/lib/Numeric/GSL/Special/Ellint.hs
+++ /dev/null
@@ -1,140 +0,0 @@
1------------------------------------------------------------
2-- |
3-- Module : Numeric.GSL.Special.Ellint
4-- Copyright : (c) Alberto Ruiz 2006
5-- License : GPL
6-- Maintainer : Alberto Ruiz (aruiz at um dot es)
7-- Stability : provisional
8-- Portability : uses ffi
9--
10-- Wrappers for selected functions described at:
11--
12-- <http://www.google.com/search?q=gsl_sf_ellint.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13------------------------------------------------------------
14
15module Numeric.GSL.Special.Ellint(
16 ellint_Kcomp_e
17, ellint_Kcomp
18, ellint_Ecomp_e
19, ellint_Ecomp
20, ellint_Pcomp_e
21, ellint_Pcomp
22, ellint_Dcomp_e
23, ellint_Dcomp
24, ellint_F_e
25, ellint_F
26, ellint_E_e
27, ellint_E
28, ellint_P_e
29, ellint_P
30, ellint_D_e
31, ellint_D
32, ellint_RC_e
33, ellint_RC
34, ellint_RD_e
35, ellint_RD
36, ellint_RF_e
37, ellint_RF
38, ellint_RJ_e
39, ellint_RJ
40) where
41
42import Foreign(Ptr)
43import Foreign.C.Types(CInt)
44import Numeric.GSL.Special.Internal
45
46ellint_Kcomp_e :: Double -> Precision -> (Double,Double)
47ellint_Kcomp_e k mode = createSFR "ellint_Kcomp_e" $ gsl_sf_ellint_Kcomp_e k (precCode mode)
48foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Kcomp_e" gsl_sf_ellint_Kcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
49
50ellint_Kcomp :: Double -> Precision -> Double
51ellint_Kcomp k mode = gsl_sf_ellint_Kcomp k (precCode mode)
52foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Kcomp" gsl_sf_ellint_Kcomp :: Double -> Gsl_mode_t -> Double
53
54ellint_Ecomp_e :: Double -> Precision -> (Double,Double)
55ellint_Ecomp_e k mode = createSFR "ellint_Ecomp_e" $ gsl_sf_ellint_Ecomp_e k (precCode mode)
56foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Ecomp_e" gsl_sf_ellint_Ecomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
57
58ellint_Ecomp :: Double -> Precision -> Double
59ellint_Ecomp k mode = gsl_sf_ellint_Ecomp k (precCode mode)
60foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Ecomp" gsl_sf_ellint_Ecomp :: Double -> Gsl_mode_t -> Double
61
62ellint_Pcomp_e :: Double -> Double -> Precision -> (Double,Double)
63ellint_Pcomp_e k n mode = createSFR "ellint_Pcomp_e" $ gsl_sf_ellint_Pcomp_e k n (precCode mode)
64foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Pcomp_e" gsl_sf_ellint_Pcomp_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
65
66ellint_Pcomp :: Double -> Double -> Precision -> Double
67ellint_Pcomp k n mode = gsl_sf_ellint_Pcomp k n (precCode mode)
68foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Pcomp" gsl_sf_ellint_Pcomp :: Double -> Double -> Gsl_mode_t -> Double
69
70ellint_Dcomp_e :: Double -> Precision -> (Double,Double)
71ellint_Dcomp_e k mode = createSFR "ellint_Dcomp_e" $ gsl_sf_ellint_Dcomp_e k (precCode mode)
72foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Dcomp_e" gsl_sf_ellint_Dcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
73
74ellint_Dcomp :: Double -> Precision -> Double
75ellint_Dcomp k mode = gsl_sf_ellint_Dcomp k (precCode mode)
76foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Dcomp" gsl_sf_ellint_Dcomp :: Double -> Gsl_mode_t -> Double
77
78ellint_F_e :: Double -> Double -> Precision -> (Double,Double)
79ellint_F_e phi k mode = createSFR "ellint_F_e" $ gsl_sf_ellint_F_e phi k (precCode mode)
80foreign import ccall SAFE_CHEAP "gsl_sf_ellint_F_e" gsl_sf_ellint_F_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
81
82ellint_F :: Double -> Double -> Precision -> Double
83ellint_F phi k mode = gsl_sf_ellint_F phi k (precCode mode)
84foreign import ccall SAFE_CHEAP "gsl_sf_ellint_F" gsl_sf_ellint_F :: Double -> Double -> Gsl_mode_t -> Double
85
86ellint_E_e :: Double -> Double -> Precision -> (Double,Double)
87ellint_E_e phi k mode = createSFR "ellint_E_e" $ gsl_sf_ellint_E_e phi k (precCode mode)
88foreign import ccall SAFE_CHEAP "gsl_sf_ellint_E_e" gsl_sf_ellint_E_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
89
90ellint_E :: Double -> Double -> Precision -> Double
91ellint_E phi k mode = gsl_sf_ellint_E phi k (precCode mode)
92foreign import ccall SAFE_CHEAP "gsl_sf_ellint_E" gsl_sf_ellint_E :: Double -> Double -> Gsl_mode_t -> Double
93
94ellint_P_e :: Double -> Double -> Double -> Precision -> (Double,Double)
95ellint_P_e phi k n mode = createSFR "ellint_P_e" $ gsl_sf_ellint_P_e phi k n (precCode mode)
96foreign import ccall SAFE_CHEAP "gsl_sf_ellint_P_e" gsl_sf_ellint_P_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
97
98ellint_P :: Double -> Double -> Double -> Precision -> Double
99ellint_P phi k n mode = gsl_sf_ellint_P phi k n (precCode mode)
100foreign import ccall SAFE_CHEAP "gsl_sf_ellint_P" gsl_sf_ellint_P :: Double -> Double -> Double -> Gsl_mode_t -> Double
101
102ellint_D_e :: Double -> Double -> Double -> Precision -> (Double,Double)
103ellint_D_e phi k n mode = createSFR "ellint_D_e" $ gsl_sf_ellint_D_e phi k n (precCode mode)
104foreign import ccall SAFE_CHEAP "gsl_sf_ellint_D_e" gsl_sf_ellint_D_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
105
106ellint_D :: Double -> Double -> Double -> Precision -> Double
107ellint_D phi k n mode = gsl_sf_ellint_D phi k n (precCode mode)
108foreign import ccall SAFE_CHEAP "gsl_sf_ellint_D" gsl_sf_ellint_D :: Double -> Double -> Double -> Gsl_mode_t -> Double
109
110ellint_RC_e :: Double -> Double -> Precision -> (Double,Double)
111ellint_RC_e x y mode = createSFR "ellint_RC_e" $ gsl_sf_ellint_RC_e x y (precCode mode)
112foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RC_e" gsl_sf_ellint_RC_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
113
114ellint_RC :: Double -> Double -> Precision -> Double
115ellint_RC x y mode = gsl_sf_ellint_RC x y (precCode mode)
116foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RC" gsl_sf_ellint_RC :: Double -> Double -> Gsl_mode_t -> Double
117
118ellint_RD_e :: Double -> Double -> Double -> Precision -> (Double,Double)
119ellint_RD_e x y z mode = createSFR "ellint_RD_e" $ gsl_sf_ellint_RD_e x y z (precCode mode)
120foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RD_e" gsl_sf_ellint_RD_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
121
122ellint_RD :: Double -> Double -> Double -> Precision -> Double
123ellint_RD x y z mode = gsl_sf_ellint_RD x y z (precCode mode)
124foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RD" gsl_sf_ellint_RD :: Double -> Double -> Double -> Gsl_mode_t -> Double
125
126ellint_RF_e :: Double -> Double -> Double -> Precision -> (Double,Double)
127ellint_RF_e x y z mode = createSFR "ellint_RF_e" $ gsl_sf_ellint_RF_e x y z (precCode mode)
128foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RF_e" gsl_sf_ellint_RF_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
129
130ellint_RF :: Double -> Double -> Double -> Precision -> Double
131ellint_RF x y z mode = gsl_sf_ellint_RF x y z (precCode mode)
132foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RF" gsl_sf_ellint_RF :: Double -> Double -> Double -> Gsl_mode_t -> Double
133
134ellint_RJ_e :: Double -> Double -> Double -> Double -> Precision -> (Double,Double)
135ellint_RJ_e x y z p mode = createSFR "ellint_RJ_e" $ gsl_sf_ellint_RJ_e x y z p (precCode mode)
136foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RJ_e" gsl_sf_ellint_RJ_e :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
137
138ellint_RJ :: Double -> Double -> Double -> Double -> Precision -> Double
139ellint_RJ x y z p mode = gsl_sf_ellint_RJ x y z p (precCode mode)
140foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RJ" gsl_sf_ellint_RJ :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Double
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-11 11:47:23 +0000