summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Trig.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2008-01-21 21:40:07 +0000
committerAlberto Ruiz <aruiz@um.es>2008-01-21 21:40:07 +0000
commit17749900a9146ddf6cd8ebf59dc35e56d6bff413 (patch)
treed352b7b155ebf650cd41a134aeb39450e54163b2 /lib/Numeric/GSL/Special/Trig.hs
parent4fb0006a2227d3d5293a53b88ef67ce6ebd73440 (diff)
IO CInt results
Diffstat (limited to 'lib/Numeric/GSL/Special/Trig.hs')
-rw-r--r--lib/Numeric/GSL/Special/Trig.hs101
1 files changed, 76 insertions, 25 deletions
diff --git a/lib/Numeric/GSL/Special/Trig.hs b/lib/Numeric/GSL/Special/Trig.hs
index b846c1d..98c2c84 100644
--- a/lib/Numeric/GSL/Special/Trig.hs
+++ b/lib/Numeric/GSL/Special/Trig.hs
@@ -9,7 +9,7 @@ Portability : uses ffi
9 9
10Wrappers for selected functions described at: 10Wrappers for selected functions described at:
11 11
12<http://www.gnu.org/software/gsl/manual/html_node/Trigonometric-Functions.html> 12<http://www.google.com/search?q=gsl_sf_trig.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13 13
14-} 14-}
15------------------------------------------------------------ 15------------------------------------------------------------
@@ -36,129 +36,180 @@ module Numeric.GSL.Special.Trig(
36) where 36) where
37 37
38import Foreign(Ptr) 38import Foreign(Ptr)
39import Foreign.C.Types(CInt)
39import Numeric.GSL.Special.Internal 40import Numeric.GSL.Special.Internal
40 41
41-- | wrapper for int gsl_sf_sin_e(double x,gsl_sf_result* result); 42-- | wrapper for int gsl_sf_sin_e(double x,gsl_sf_result* result);
43--
44-- <http://www.google.com/search?q=gsl_sf_sin_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
42sin_e :: Double -> (Double,Double) 45sin_e :: Double -> (Double,Double)
43sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x 46sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x
44foreign import ccall "trig.h gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr Double -> IO(Int) 47foreign import ccall "trig.h gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr () -> IO CInt
45 48
46-- | wrapper for double gsl_sf_sin(double x); 49-- | wrapper for double gsl_sf_sin(double x);
50--
51-- <http://www.google.com/search?q=gsl_sf_sin&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
47sin :: Double -> Double 52sin :: Double -> Double
48sin = gsl_sf_sin 53sin = gsl_sf_sin
49foreign import ccall "trig.h gsl_sf_sin" gsl_sf_sin :: Double -> Double 54foreign import ccall "trig.h gsl_sf_sin" gsl_sf_sin :: Double -> Double
50 55
51-- | wrapper for int gsl_sf_cos_e(double x,gsl_sf_result* result); 56-- | wrapper for int gsl_sf_cos_e(double x,gsl_sf_result* result);
57--
58-- <http://www.google.com/search?q=gsl_sf_cos_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
52cos_e :: Double -> (Double,Double) 59cos_e :: Double -> (Double,Double)
53cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x 60cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x
54foreign import ccall "trig.h gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr Double -> IO(Int) 61foreign import ccall "trig.h gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr () -> IO CInt
55 62
56-- | wrapper for double gsl_sf_cos(double x); 63-- | wrapper for double gsl_sf_cos(double x);
64--
65-- <http://www.google.com/search?q=gsl_sf_cos&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
57cos :: Double -> Double 66cos :: Double -> Double
58cos = gsl_sf_cos 67cos = gsl_sf_cos
59foreign import ccall "trig.h gsl_sf_cos" gsl_sf_cos :: Double -> Double 68foreign import ccall "trig.h gsl_sf_cos" gsl_sf_cos :: Double -> Double
60 69
61-- | wrapper for int gsl_sf_hypot_e(double x,double y,gsl_sf_result* result); 70-- | wrapper for int gsl_sf_hypot_e(double x,double y,gsl_sf_result* result);
71--
72-- <http://www.google.com/search?q=gsl_sf_hypot_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
62hypot_e :: Double -> Double -> (Double,Double) 73hypot_e :: Double -> Double -> (Double,Double)
63hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y 74hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y
64foreign import ccall "trig.h gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr Double -> IO(Int) 75foreign import ccall "trig.h gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr () -> IO CInt
65 76
66-- | wrapper for double gsl_sf_hypot(double x,double y); 77-- | wrapper for double gsl_sf_hypot(double x,double y);
78--
79-- <http://www.google.com/search?q=gsl_sf_hypot&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
67hypot :: Double -> Double -> Double 80hypot :: Double -> Double -> Double
68hypot = gsl_sf_hypot 81hypot = gsl_sf_hypot
69foreign import ccall "trig.h gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double 82foreign import ccall "trig.h gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double
70 83
71-- | wrapper for int gsl_sf_complex_sin_e(double zr,double zi,gsl_sf_result* szr,gsl_sf_result* szi); 84-- | wrapper for int gsl_sf_complex_sin_e(double zr,double zi,gsl_sf_result* szr,gsl_sf_result* szi);
72complex_sin_e :: Double -> Double -> Ptr Double -> (Double,Double) 85--
86-- <http://www.google.com/search?q=gsl_sf_complex_sin_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
87complex_sin_e :: Double -> Double -> Ptr () -> (Double,Double)
73complex_sin_e zr zi szr = createSFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi szr 88complex_sin_e zr zi szr = createSFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi szr
74foreign import ccall "trig.h gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 89foreign import ccall "trig.h gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
75 90
76-- | wrapper for int gsl_sf_complex_cos_e(double zr,double zi,gsl_sf_result* czr,gsl_sf_result* czi); 91-- | wrapper for int gsl_sf_complex_cos_e(double zr,double zi,gsl_sf_result* czr,gsl_sf_result* czi);
77complex_cos_e :: Double -> Double -> Ptr Double -> (Double,Double) 92--
93-- <http://www.google.com/search?q=gsl_sf_complex_cos_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
94complex_cos_e :: Double -> Double -> Ptr () -> (Double,Double)
78complex_cos_e zr zi czr = createSFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi czr 95complex_cos_e zr zi czr = createSFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi czr
79foreign import ccall "trig.h gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 96foreign import ccall "trig.h gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
80 97
81-- | wrapper for int gsl_sf_complex_logsin_e(double zr,double zi,gsl_sf_result* lszr,gsl_sf_result* lszi); 98-- | wrapper for int gsl_sf_complex_logsin_e(double zr,double zi,gsl_sf_result* lszr,gsl_sf_result* lszi);
82complex_logsin_e :: Double -> Double -> Ptr Double -> (Double,Double) 99--
100-- <http://www.google.com/search?q=gsl_sf_complex_logsin_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
101complex_logsin_e :: Double -> Double -> Ptr () -> (Double,Double)
83complex_logsin_e zr zi lszr = createSFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi lszr 102complex_logsin_e zr zi lszr = createSFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi lszr
84foreign import ccall "trig.h gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 103foreign import ccall "trig.h gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
85 104
86-- | wrapper for int gsl_sf_sinc_e(double x,gsl_sf_result* result); 105-- | wrapper for int gsl_sf_sinc_e(double x,gsl_sf_result* result);
106--
107-- <http://www.google.com/search?q=gsl_sf_sinc_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
87sinc_e :: Double -> (Double,Double) 108sinc_e :: Double -> (Double,Double)
88sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x 109sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x
89foreign import ccall "trig.h gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr Double -> IO(Int) 110foreign import ccall "trig.h gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr () -> IO CInt
90 111
91-- | wrapper for double gsl_sf_sinc(double x); 112-- | wrapper for double gsl_sf_sinc(double x);
113--
114-- <http://www.google.com/search?q=gsl_sf_sinc&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
92sinc :: Double -> Double 115sinc :: Double -> Double
93sinc = gsl_sf_sinc 116sinc = gsl_sf_sinc
94foreign import ccall "trig.h gsl_sf_sinc" gsl_sf_sinc :: Double -> Double 117foreign import ccall "trig.h gsl_sf_sinc" gsl_sf_sinc :: Double -> Double
95 118
96-- | wrapper for int gsl_sf_lnsinh_e(double x,gsl_sf_result* result); 119-- | wrapper for int gsl_sf_lnsinh_e(double x,gsl_sf_result* result);
120--
121-- <http://www.google.com/search?q=gsl_sf_lnsinh_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
97lnsinh_e :: Double -> (Double,Double) 122lnsinh_e :: Double -> (Double,Double)
98lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x 123lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x
99foreign import ccall "trig.h gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr Double -> IO(Int) 124foreign import ccall "trig.h gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr () -> IO CInt
100 125
101-- | wrapper for double gsl_sf_lnsinh(double x); 126-- | wrapper for double gsl_sf_lnsinh(double x);
127--
128-- <http://www.google.com/search?q=gsl_sf_lnsinh&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
102lnsinh :: Double -> Double 129lnsinh :: Double -> Double
103lnsinh = gsl_sf_lnsinh 130lnsinh = gsl_sf_lnsinh
104foreign import ccall "trig.h gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double 131foreign import ccall "trig.h gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double
105 132
106-- | wrapper for int gsl_sf_lncosh_e(double x,gsl_sf_result* result); 133-- | wrapper for int gsl_sf_lncosh_e(double x,gsl_sf_result* result);
134--
135-- <http://www.google.com/search?q=gsl_sf_lncosh_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
107lncosh_e :: Double -> (Double,Double) 136lncosh_e :: Double -> (Double,Double)
108lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x 137lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x
109foreign import ccall "trig.h gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr Double -> IO(Int) 138foreign import ccall "trig.h gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr () -> IO CInt
110 139
111-- | wrapper for double gsl_sf_lncosh(double x); 140-- | wrapper for double gsl_sf_lncosh(double x);
141--
142-- <http://www.google.com/search?q=gsl_sf_lncosh&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
112lncosh :: Double -> Double 143lncosh :: Double -> Double
113lncosh = gsl_sf_lncosh 144lncosh = gsl_sf_lncosh
114foreign import ccall "trig.h gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double 145foreign import ccall "trig.h gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double
115 146
116-- | wrapper for int gsl_sf_polar_to_rect(double r,double theta,gsl_sf_result* x,gsl_sf_result* y); 147-- | wrapper for int gsl_sf_polar_to_rect(double r,double theta,gsl_sf_result* x,gsl_sf_result* y);
117polar_to_rect :: Double -> Double -> Ptr Double -> (Double,Double) 148--
149-- <http://www.google.com/search?q=gsl_sf_polar_to_rect&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
150polar_to_rect :: Double -> Double -> Ptr () -> (Double,Double)
118polar_to_rect r theta x = createSFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta x 151polar_to_rect r theta x = createSFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta x
119foreign import ccall "trig.h gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 152foreign import ccall "trig.h gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
120 153
121-- | wrapper for int gsl_sf_rect_to_polar(double x,double y,gsl_sf_result* r,gsl_sf_result* theta); 154-- | wrapper for int gsl_sf_rect_to_polar(double x,double y,gsl_sf_result* r,gsl_sf_result* theta);
122rect_to_polar :: Double -> Double -> Ptr Double -> (Double,Double) 155--
156-- <http://www.google.com/search?q=gsl_sf_rect_to_polar&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
157rect_to_polar :: Double -> Double -> Ptr () -> (Double,Double)
123rect_to_polar x y r = createSFR "rect_to_polar" $ gsl_sf_rect_to_polar x y r 158rect_to_polar x y r = createSFR "rect_to_polar" $ gsl_sf_rect_to_polar x y r
124foreign import ccall "trig.h gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 159foreign import ccall "trig.h gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
125 160
126-- | wrapper for int gsl_sf_sin_err_e(double x,double dx,gsl_sf_result* result); 161-- | wrapper for int gsl_sf_sin_err_e(double x,double dx,gsl_sf_result* result);
162--
163-- <http://www.google.com/search?q=gsl_sf_sin_err_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
127sin_err_e :: Double -> Double -> (Double,Double) 164sin_err_e :: Double -> Double -> (Double,Double)
128sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx 165sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx
129foreign import ccall "trig.h gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr Double -> IO(Int) 166foreign import ccall "trig.h gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr () -> IO CInt
130 167
131-- | wrapper for int gsl_sf_cos_err_e(double x,double dx,gsl_sf_result* result); 168-- | wrapper for int gsl_sf_cos_err_e(double x,double dx,gsl_sf_result* result);
169--
170-- <http://www.google.com/search?q=gsl_sf_cos_err_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
132cos_err_e :: Double -> Double -> (Double,Double) 171cos_err_e :: Double -> Double -> (Double,Double)
133cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx 172cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx
134foreign import ccall "trig.h gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr Double -> IO(Int) 173foreign import ccall "trig.h gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr () -> IO CInt
135 174
136-- | wrapper for int gsl_sf_angle_restrict_symm_e(double* theta); 175-- | wrapper for int gsl_sf_angle_restrict_symm_e(double* theta);
137angle_restrict_symm_e :: Ptr Double -> Int 176--
177-- <http://www.google.com/search?q=gsl_sf_angle_restrict_symm_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
178angle_restrict_symm_e :: Ptr Double -> CInt
138angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e 179angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e
139foreign import ccall "trig.h gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> Int 180foreign import ccall "trig.h gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> CInt
140 181
141-- | wrapper for double gsl_sf_angle_restrict_symm(double theta); 182-- | wrapper for double gsl_sf_angle_restrict_symm(double theta);
183--
184-- <http://www.google.com/search?q=gsl_sf_angle_restrict_symm&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
142angle_restrict_symm :: Double -> Double 185angle_restrict_symm :: Double -> Double
143angle_restrict_symm = gsl_sf_angle_restrict_symm 186angle_restrict_symm = gsl_sf_angle_restrict_symm
144foreign import ccall "trig.h gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double 187foreign import ccall "trig.h gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double
145 188
146-- | wrapper for int gsl_sf_angle_restrict_pos_e(double* theta); 189-- | wrapper for int gsl_sf_angle_restrict_pos_e(double* theta);
147angle_restrict_pos_e :: Ptr Double -> Int 190--
191-- <http://www.google.com/search?q=gsl_sf_angle_restrict_pos_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
192angle_restrict_pos_e :: Ptr Double -> CInt
148angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e 193angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e
149foreign import ccall "trig.h gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> Int 194foreign import ccall "trig.h gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> CInt
150 195
151-- | wrapper for double gsl_sf_angle_restrict_pos(double theta); 196-- | wrapper for double gsl_sf_angle_restrict_pos(double theta);
197--
198-- <http://www.google.com/search?q=gsl_sf_angle_restrict_pos&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
152angle_restrict_pos :: Double -> Double 199angle_restrict_pos :: Double -> Double
153angle_restrict_pos = gsl_sf_angle_restrict_pos 200angle_restrict_pos = gsl_sf_angle_restrict_pos
154foreign import ccall "trig.h gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double 201foreign import ccall "trig.h gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double
155 202
156-- | wrapper for int gsl_sf_angle_restrict_symm_err_e(double theta,gsl_sf_result* result); 203-- | wrapper for int gsl_sf_angle_restrict_symm_err_e(double theta,gsl_sf_result* result);
204--
205-- <http://www.google.com/search?q=gsl_sf_angle_restrict_symm_err_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
157angle_restrict_symm_err_e :: Double -> (Double,Double) 206angle_restrict_symm_err_e :: Double -> (Double,Double)
158angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta 207angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta
159foreign import ccall "trig.h gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr Double -> IO(Int) 208foreign import ccall "trig.h gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr () -> IO CInt
160 209
161-- | wrapper for int gsl_sf_angle_restrict_pos_err_e(double theta,gsl_sf_result* result); 210-- | wrapper for int gsl_sf_angle_restrict_pos_err_e(double theta,gsl_sf_result* result);
211--
212-- <http://www.google.com/search?q=gsl_sf_angle_restrict_pos_err_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
162angle_restrict_pos_err_e :: Double -> (Double,Double) 213angle_restrict_pos_err_e :: Double -> (Double,Double)
163angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta 214angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta
164foreign import ccall "trig.h gsl_sf_angle_restrict_pos_err_e" gsl_sf_angle_restrict_pos_err_e :: Double -> Ptr Double -> IO(Int) 215foreign import ccall "trig.h gsl_sf_angle_restrict_pos_err_e" gsl_sf_angle_restrict_pos_err_e :: Double -> Ptr () -> IO CInt
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-09 21:14:59 +0000