diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Gamma.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Gamma.hs | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Gamma.hs b/lib/Numeric/GSL/Special/Gamma.hs index 5cc05f3..1a395ff 100644 --- a/lib/Numeric/GSL/Special/Gamma.hs +++ b/lib/Numeric/GSL/Special/Gamma.hs | |||
@@ -58,135 +58,179 @@ module Numeric.GSL.Special.Gamma( | |||
58 | import Foreign(Ptr) | 58 | import Foreign(Ptr) |
59 | import Foreign.C.Types(CInt) | 59 | import Foreign.C.Types(CInt) |
60 | import Numeric.GSL.Special.Internal | 60 | import Numeric.GSL.Special.Internal |
61 | |||
61 | lngamma_e :: Double -> (Double,Double) | 62 | lngamma_e :: Double -> (Double,Double) |
62 | lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x | 63 | lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x |
63 | foreign import ccall "gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr () -> IO CInt | 64 | foreign import ccall "gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr () -> IO CInt |
65 | |||
64 | lngamma :: Double -> Double | 66 | lngamma :: Double -> Double |
65 | lngamma = gsl_sf_lngamma | 67 | lngamma = gsl_sf_lngamma |
66 | foreign import ccall "gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double | 68 | foreign import ccall "gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double |
69 | |||
67 | lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt | 70 | lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt |
68 | lngamma_sgn_e = gsl_sf_lngamma_sgn_e | 71 | lngamma_sgn_e = gsl_sf_lngamma_sgn_e |
69 | foreign import ccall "gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt | 72 | foreign import ccall "gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt |
73 | |||
70 | gamma_e :: Double -> (Double,Double) | 74 | gamma_e :: Double -> (Double,Double) |
71 | gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x | 75 | gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x |
72 | foreign import ccall "gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr () -> IO CInt | 76 | foreign import ccall "gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr () -> IO CInt |
77 | |||
73 | gamma :: Double -> Double | 78 | gamma :: Double -> Double |
74 | gamma = gsl_sf_gamma | 79 | gamma = gsl_sf_gamma |
75 | foreign import ccall "gsl_sf_gamma" gsl_sf_gamma :: Double -> Double | 80 | foreign import ccall "gsl_sf_gamma" gsl_sf_gamma :: Double -> Double |
81 | |||
76 | gammastar_e :: Double -> (Double,Double) | 82 | gammastar_e :: Double -> (Double,Double) |
77 | gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x | 83 | gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x |
78 | foreign import ccall "gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr () -> IO CInt | 84 | foreign import ccall "gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr () -> IO CInt |
85 | |||
79 | gammastar :: Double -> Double | 86 | gammastar :: Double -> Double |
80 | gammastar = gsl_sf_gammastar | 87 | gammastar = gsl_sf_gammastar |
81 | foreign import ccall "gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double | 88 | foreign import ccall "gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double |
89 | |||
82 | gammainv_e :: Double -> (Double,Double) | 90 | gammainv_e :: Double -> (Double,Double) |
83 | gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x | 91 | gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x |
84 | foreign import ccall "gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr () -> IO CInt | 92 | foreign import ccall "gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr () -> IO CInt |
93 | |||
85 | gammainv :: Double -> Double | 94 | gammainv :: Double -> Double |
86 | gammainv = gsl_sf_gammainv | 95 | gammainv = gsl_sf_gammainv |
87 | foreign import ccall "gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double | 96 | foreign import ccall "gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double |
97 | |||
88 | lngamma_complex_e :: Double -> Double -> Ptr () -> (Double,Double) | 98 | lngamma_complex_e :: Double -> Double -> Ptr () -> (Double,Double) |
89 | lngamma_complex_e zr zi lnr = createSFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi lnr | 99 | lngamma_complex_e zr zi lnr = createSFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi lnr |
90 | foreign import ccall "gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt | 100 | foreign import ccall "gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt |
101 | |||
91 | taylorcoeff_e :: CInt -> Double -> (Double,Double) | 102 | taylorcoeff_e :: CInt -> Double -> (Double,Double) |
92 | taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x | 103 | taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x |
93 | foreign import ccall "gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: CInt -> Double -> Ptr () -> IO CInt | 104 | foreign import ccall "gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: CInt -> Double -> Ptr () -> IO CInt |
105 | |||
94 | taylorcoeff :: CInt -> Double -> Double | 106 | taylorcoeff :: CInt -> Double -> Double |
95 | taylorcoeff = gsl_sf_taylorcoeff | 107 | taylorcoeff = gsl_sf_taylorcoeff |
96 | foreign import ccall "gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: CInt -> Double -> Double | 108 | foreign import ccall "gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: CInt -> Double -> Double |
109 | |||
97 | fact_e :: CInt -> (Double,Double) | 110 | fact_e :: CInt -> (Double,Double) |
98 | fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n | 111 | fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n |
99 | foreign import ccall "gsl_sf_fact_e" gsl_sf_fact_e :: CInt -> Ptr () -> IO CInt | 112 | foreign import ccall "gsl_sf_fact_e" gsl_sf_fact_e :: CInt -> Ptr () -> IO CInt |
113 | |||
100 | fact :: CInt -> Double | 114 | fact :: CInt -> Double |
101 | fact = gsl_sf_fact | 115 | fact = gsl_sf_fact |
102 | foreign import ccall "gsl_sf_fact" gsl_sf_fact :: CInt -> Double | 116 | foreign import ccall "gsl_sf_fact" gsl_sf_fact :: CInt -> Double |
117 | |||
103 | doublefact_e :: CInt -> (Double,Double) | 118 | doublefact_e :: CInt -> (Double,Double) |
104 | doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n | 119 | doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n |
105 | foreign import ccall "gsl_sf_doublefact_e" gsl_sf_doublefact_e :: CInt -> Ptr () -> IO CInt | 120 | foreign import ccall "gsl_sf_doublefact_e" gsl_sf_doublefact_e :: CInt -> Ptr () -> IO CInt |
121 | |||
106 | doublefact :: CInt -> Double | 122 | doublefact :: CInt -> Double |
107 | doublefact = gsl_sf_doublefact | 123 | doublefact = gsl_sf_doublefact |
108 | foreign import ccall "gsl_sf_doublefact" gsl_sf_doublefact :: CInt -> Double | 124 | foreign import ccall "gsl_sf_doublefact" gsl_sf_doublefact :: CInt -> Double |
125 | |||
109 | lnfact_e :: CInt -> (Double,Double) | 126 | lnfact_e :: CInt -> (Double,Double) |
110 | lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n | 127 | lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n |
111 | foreign import ccall "gsl_sf_lnfact_e" gsl_sf_lnfact_e :: CInt -> Ptr () -> IO CInt | 128 | foreign import ccall "gsl_sf_lnfact_e" gsl_sf_lnfact_e :: CInt -> Ptr () -> IO CInt |
129 | |||
112 | lnfact :: CInt -> Double | 130 | lnfact :: CInt -> Double |
113 | lnfact = gsl_sf_lnfact | 131 | lnfact = gsl_sf_lnfact |
114 | foreign import ccall "gsl_sf_lnfact" gsl_sf_lnfact :: CInt -> Double | 132 | foreign import ccall "gsl_sf_lnfact" gsl_sf_lnfact :: CInt -> Double |
133 | |||
115 | lndoublefact_e :: CInt -> (Double,Double) | 134 | lndoublefact_e :: CInt -> (Double,Double) |
116 | lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n | 135 | lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n |
117 | foreign import ccall "gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: CInt -> Ptr () -> IO CInt | 136 | foreign import ccall "gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: CInt -> Ptr () -> IO CInt |
137 | |||
118 | lndoublefact :: CInt -> Double | 138 | lndoublefact :: CInt -> Double |
119 | lndoublefact = gsl_sf_lndoublefact | 139 | lndoublefact = gsl_sf_lndoublefact |
120 | foreign import ccall "gsl_sf_lndoublefact" gsl_sf_lndoublefact :: CInt -> Double | 140 | foreign import ccall "gsl_sf_lndoublefact" gsl_sf_lndoublefact :: CInt -> Double |
141 | |||
121 | lnchoose_e :: CInt -> CInt -> (Double,Double) | 142 | lnchoose_e :: CInt -> CInt -> (Double,Double) |
122 | lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m | 143 | lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m |
123 | foreign import ccall "gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: CInt -> CInt -> Ptr () -> IO CInt | 144 | foreign import ccall "gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: CInt -> CInt -> Ptr () -> IO CInt |
145 | |||
124 | lnchoose :: CInt -> CInt -> Double | 146 | lnchoose :: CInt -> CInt -> Double |
125 | lnchoose = gsl_sf_lnchoose | 147 | lnchoose = gsl_sf_lnchoose |
126 | foreign import ccall "gsl_sf_lnchoose" gsl_sf_lnchoose :: CInt -> CInt -> Double | 148 | foreign import ccall "gsl_sf_lnchoose" gsl_sf_lnchoose :: CInt -> CInt -> Double |
149 | |||
127 | choose_e :: CInt -> CInt -> (Double,Double) | 150 | choose_e :: CInt -> CInt -> (Double,Double) |
128 | choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m | 151 | choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m |
129 | foreign import ccall "gsl_sf_choose_e" gsl_sf_choose_e :: CInt -> CInt -> Ptr () -> IO CInt | 152 | foreign import ccall "gsl_sf_choose_e" gsl_sf_choose_e :: CInt -> CInt -> Ptr () -> IO CInt |
153 | |||
130 | choose :: CInt -> CInt -> Double | 154 | choose :: CInt -> CInt -> Double |
131 | choose = gsl_sf_choose | 155 | choose = gsl_sf_choose |
132 | foreign import ccall "gsl_sf_choose" gsl_sf_choose :: CInt -> CInt -> Double | 156 | foreign import ccall "gsl_sf_choose" gsl_sf_choose :: CInt -> CInt -> Double |
157 | |||
133 | lnpoch_e :: Double -> Double -> (Double,Double) | 158 | lnpoch_e :: Double -> Double -> (Double,Double) |
134 | lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x | 159 | lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x |
135 | foreign import ccall "gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr () -> IO CInt | 160 | foreign import ccall "gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr () -> IO CInt |
161 | |||
136 | lnpoch :: Double -> Double -> Double | 162 | lnpoch :: Double -> Double -> Double |
137 | lnpoch = gsl_sf_lnpoch | 163 | lnpoch = gsl_sf_lnpoch |
138 | foreign import ccall "gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double | 164 | foreign import ccall "gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double |
165 | |||
139 | lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt | 166 | lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt |
140 | lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e | 167 | lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e |
141 | foreign import ccall "gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt | 168 | foreign import ccall "gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt |
169 | |||
142 | poch_e :: Double -> Double -> (Double,Double) | 170 | poch_e :: Double -> Double -> (Double,Double) |
143 | poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x | 171 | poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x |
144 | foreign import ccall "gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr () -> IO CInt | 172 | foreign import ccall "gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr () -> IO CInt |
173 | |||
145 | poch :: Double -> Double -> Double | 174 | poch :: Double -> Double -> Double |
146 | poch = gsl_sf_poch | 175 | poch = gsl_sf_poch |
147 | foreign import ccall "gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double | 176 | foreign import ccall "gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double |
177 | |||
148 | pochrel_e :: Double -> Double -> (Double,Double) | 178 | pochrel_e :: Double -> Double -> (Double,Double) |
149 | pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x | 179 | pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x |
150 | foreign import ccall "gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr () -> IO CInt | 180 | foreign import ccall "gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr () -> IO CInt |
181 | |||
151 | pochrel :: Double -> Double -> Double | 182 | pochrel :: Double -> Double -> Double |
152 | pochrel = gsl_sf_pochrel | 183 | pochrel = gsl_sf_pochrel |
153 | foreign import ccall "gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double | 184 | foreign import ccall "gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double |
185 | |||
154 | gamma_inc_Q_e :: Double -> Double -> (Double,Double) | 186 | gamma_inc_Q_e :: Double -> Double -> (Double,Double) |
155 | gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x | 187 | gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x |
156 | foreign import ccall "gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr () -> IO CInt | 188 | foreign import ccall "gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr () -> IO CInt |
189 | |||
157 | gamma_inc_Q :: Double -> Double -> Double | 190 | gamma_inc_Q :: Double -> Double -> Double |
158 | gamma_inc_Q = gsl_sf_gamma_inc_Q | 191 | gamma_inc_Q = gsl_sf_gamma_inc_Q |
159 | foreign import ccall "gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double | 192 | foreign import ccall "gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double |
193 | |||
160 | gamma_inc_P_e :: Double -> Double -> (Double,Double) | 194 | gamma_inc_P_e :: Double -> Double -> (Double,Double) |
161 | gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x | 195 | gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x |
162 | foreign import ccall "gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr () -> IO CInt | 196 | foreign import ccall "gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr () -> IO CInt |
197 | |||
163 | gamma_inc_P :: Double -> Double -> Double | 198 | gamma_inc_P :: Double -> Double -> Double |
164 | gamma_inc_P = gsl_sf_gamma_inc_P | 199 | gamma_inc_P = gsl_sf_gamma_inc_P |
165 | foreign import ccall "gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double | 200 | foreign import ccall "gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double |
201 | |||
166 | gamma_inc_e :: Double -> Double -> (Double,Double) | 202 | gamma_inc_e :: Double -> Double -> (Double,Double) |
167 | gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x | 203 | gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x |
168 | foreign import ccall "gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr () -> IO CInt | 204 | foreign import ccall "gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr () -> IO CInt |
205 | |||
169 | gamma_inc :: Double -> Double -> Double | 206 | gamma_inc :: Double -> Double -> Double |
170 | gamma_inc = gsl_sf_gamma_inc | 207 | gamma_inc = gsl_sf_gamma_inc |
171 | foreign import ccall "gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double | 208 | foreign import ccall "gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double |
209 | |||
172 | lnbeta_e :: Double -> Double -> (Double,Double) | 210 | lnbeta_e :: Double -> Double -> (Double,Double) |
173 | lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b | 211 | lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b |
174 | foreign import ccall "gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr () -> IO CInt | 212 | foreign import ccall "gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr () -> IO CInt |
213 | |||
175 | lnbeta :: Double -> Double -> Double | 214 | lnbeta :: Double -> Double -> Double |
176 | lnbeta = gsl_sf_lnbeta | 215 | lnbeta = gsl_sf_lnbeta |
177 | foreign import ccall "gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double | 216 | foreign import ccall "gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double |
217 | |||
178 | lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt | 218 | lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt |
179 | lnbeta_sgn_e = gsl_sf_lnbeta_sgn_e | 219 | lnbeta_sgn_e = gsl_sf_lnbeta_sgn_e |
180 | foreign import ccall "gsl_sf_lnbeta_sgn_e" gsl_sf_lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt | 220 | foreign import ccall "gsl_sf_lnbeta_sgn_e" gsl_sf_lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt |
221 | |||
181 | beta_e :: Double -> Double -> (Double,Double) | 222 | beta_e :: Double -> Double -> (Double,Double) |
182 | beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b | 223 | beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b |
183 | foreign import ccall "gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr () -> IO CInt | 224 | foreign import ccall "gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr () -> IO CInt |
225 | |||
184 | beta :: Double -> Double -> Double | 226 | beta :: Double -> Double -> Double |
185 | beta = gsl_sf_beta | 227 | beta = gsl_sf_beta |
186 | foreign import ccall "gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double | 228 | foreign import ccall "gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double |
229 | |||
187 | beta_inc_e :: Double -> Double -> Double -> (Double,Double) | 230 | beta_inc_e :: Double -> Double -> Double -> (Double,Double) |
188 | beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x | 231 | beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x |
189 | foreign import ccall "gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr () -> IO CInt | 232 | foreign import ccall "gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr () -> IO CInt |
233 | |||
190 | beta_inc :: Double -> Double -> Double -> Double | 234 | beta_inc :: Double -> Double -> Double -> Double |
191 | beta_inc = gsl_sf_beta_inc | 235 | beta_inc = gsl_sf_beta_inc |
192 | foreign import ccall "gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double | 236 | foreign import ccall "gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double |