summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Trig.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Trig.hs')
-rw-r--r--lib/Numeric/GSL/Special/Trig.hs50
1 files changed, 25 insertions, 25 deletions
diff --git a/lib/Numeric/GSL/Special/Trig.hs b/lib/Numeric/GSL/Special/Trig.hs
index 33e598c..4b7ae67 100644
--- a/lib/Numeric/GSL/Special/Trig.hs
+++ b/lib/Numeric/GSL/Special/Trig.hs
@@ -39,100 +39,100 @@ import Numeric.GSL.Special.Internal
39 39
40sin_e :: Double -> (Double,Double) 40sin_e :: Double -> (Double,Double)
41sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x 41sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x
42foreign import ccall "gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr () -> IO CInt 42foreign import ccall SAFE_CHEAP "gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr () -> IO CInt
43 43
44sin :: Double -> Double 44sin :: Double -> Double
45sin = gsl_sf_sin 45sin = gsl_sf_sin
46foreign import ccall "gsl_sf_sin" gsl_sf_sin :: Double -> Double 46foreign import ccall SAFE_CHEAP "gsl_sf_sin" gsl_sf_sin :: Double -> Double
47 47
48cos_e :: Double -> (Double,Double) 48cos_e :: Double -> (Double,Double)
49cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x 49cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x
50foreign import ccall "gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr () -> IO CInt 50foreign import ccall SAFE_CHEAP "gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr () -> IO CInt
51 51
52cos :: Double -> Double 52cos :: Double -> Double
53cos = gsl_sf_cos 53cos = gsl_sf_cos
54foreign import ccall "gsl_sf_cos" gsl_sf_cos :: Double -> Double 54foreign import ccall SAFE_CHEAP "gsl_sf_cos" gsl_sf_cos :: Double -> Double
55 55
56hypot_e :: Double -> Double -> (Double,Double) 56hypot_e :: Double -> Double -> (Double,Double)
57hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y 57hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y
58foreign import ccall "gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr () -> IO CInt 58foreign import ccall SAFE_CHEAP "gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr () -> IO CInt
59 59
60hypot :: Double -> Double -> Double 60hypot :: Double -> Double -> Double
61hypot = gsl_sf_hypot 61hypot = gsl_sf_hypot
62foreign import ccall "gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double 62foreign import ccall SAFE_CHEAP "gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double
63 63
64complex_sin_e :: Double -> Double -> Ptr () -> (Double,Double) 64complex_sin_e :: Double -> Double -> Ptr () -> (Double,Double)
65complex_sin_e zr zi szr = createSFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi szr 65complex_sin_e zr zi szr = createSFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi szr
66foreign import ccall "gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 66foreign import ccall SAFE_CHEAP "gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
67 67
68complex_cos_e :: Double -> Double -> Ptr () -> (Double,Double) 68complex_cos_e :: Double -> Double -> Ptr () -> (Double,Double)
69complex_cos_e zr zi czr = createSFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi czr 69complex_cos_e zr zi czr = createSFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi czr
70foreign import ccall "gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 70foreign import ccall SAFE_CHEAP "gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
71 71
72complex_logsin_e :: Double -> Double -> Ptr () -> (Double,Double) 72complex_logsin_e :: Double -> Double -> Ptr () -> (Double,Double)
73complex_logsin_e zr zi lszr = createSFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi lszr 73complex_logsin_e zr zi lszr = createSFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi lszr
74foreign import ccall "gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 74foreign import ccall SAFE_CHEAP "gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
75 75
76sinc_e :: Double -> (Double,Double) 76sinc_e :: Double -> (Double,Double)
77sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x 77sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x
78foreign import ccall "gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr () -> IO CInt 78foreign import ccall SAFE_CHEAP "gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr () -> IO CInt
79 79
80sinc :: Double -> Double 80sinc :: Double -> Double
81sinc = gsl_sf_sinc 81sinc = gsl_sf_sinc
82foreign import ccall "gsl_sf_sinc" gsl_sf_sinc :: Double -> Double 82foreign import ccall SAFE_CHEAP "gsl_sf_sinc" gsl_sf_sinc :: Double -> Double
83 83
84lnsinh_e :: Double -> (Double,Double) 84lnsinh_e :: Double -> (Double,Double)
85lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x 85lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x
86foreign import ccall "gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr () -> IO CInt 86foreign import ccall SAFE_CHEAP "gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr () -> IO CInt
87 87
88lnsinh :: Double -> Double 88lnsinh :: Double -> Double
89lnsinh = gsl_sf_lnsinh 89lnsinh = gsl_sf_lnsinh
90foreign import ccall "gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double 90foreign import ccall SAFE_CHEAP "gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double
91 91
92lncosh_e :: Double -> (Double,Double) 92lncosh_e :: Double -> (Double,Double)
93lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x 93lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x
94foreign import ccall "gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr () -> IO CInt 94foreign import ccall SAFE_CHEAP "gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr () -> IO CInt
95 95
96lncosh :: Double -> Double 96lncosh :: Double -> Double
97lncosh = gsl_sf_lncosh 97lncosh = gsl_sf_lncosh
98foreign import ccall "gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double 98foreign import ccall SAFE_CHEAP "gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double
99 99
100polar_to_rect :: Double -> Double -> Ptr () -> (Double,Double) 100polar_to_rect :: Double -> Double -> Ptr () -> (Double,Double)
101polar_to_rect r theta x = createSFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta x 101polar_to_rect r theta x = createSFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta x
102foreign import ccall "gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 102foreign import ccall SAFE_CHEAP "gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
103 103
104rect_to_polar :: Double -> Double -> Ptr () -> (Double,Double) 104rect_to_polar :: Double -> Double -> Ptr () -> (Double,Double)
105rect_to_polar x y r = createSFR "rect_to_polar" $ gsl_sf_rect_to_polar x y r 105rect_to_polar x y r = createSFR "rect_to_polar" $ gsl_sf_rect_to_polar x y r
106foreign import ccall "gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 106foreign import ccall SAFE_CHEAP "gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
107 107
108sin_err_e :: Double -> Double -> (Double,Double) 108sin_err_e :: Double -> Double -> (Double,Double)
109sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx 109sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx
110foreign import ccall "gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr () -> IO CInt 110foreign import ccall SAFE_CHEAP "gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr () -> IO CInt
111 111
112cos_err_e :: Double -> Double -> (Double,Double) 112cos_err_e :: Double -> Double -> (Double,Double)
113cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx 113cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx
114foreign import ccall "gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr () -> IO CInt 114foreign import ccall SAFE_CHEAP "gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr () -> IO CInt
115 115
116angle_restrict_symm_e :: Ptr Double -> CInt 116angle_restrict_symm_e :: Ptr Double -> CInt
117angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e 117angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e
118foreign import ccall "gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> CInt 118foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> CInt
119 119
120angle_restrict_symm :: Double -> Double 120angle_restrict_symm :: Double -> Double
121angle_restrict_symm = gsl_sf_angle_restrict_symm 121angle_restrict_symm = gsl_sf_angle_restrict_symm
122foreign import ccall "gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double 122foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double
123 123
124angle_restrict_pos_e :: Ptr Double -> CInt 124angle_restrict_pos_e :: Ptr Double -> CInt
125angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e 125angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e
126foreign import ccall "gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> CInt 126foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> CInt
127 127
128angle_restrict_pos :: Double -> Double 128angle_restrict_pos :: Double -> Double
129angle_restrict_pos = gsl_sf_angle_restrict_pos 129angle_restrict_pos = gsl_sf_angle_restrict_pos
130foreign import ccall "gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double 130foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double
131 131
132angle_restrict_symm_err_e :: Double -> (Double,Double) 132angle_restrict_symm_err_e :: Double -> (Double,Double)
133angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta 133angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta
134foreign import ccall "gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr () -> IO CInt 134foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr () -> IO CInt
135 135
136angle_restrict_pos_err_e :: Double -> (Double,Double) 136angle_restrict_pos_err_e :: Double -> (Double,Double)
137angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta 137angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta
138foreign import ccall "gsl_sf_angle_restrict_pos_err_e" gsl_sf_angle_restrict_pos_err_e :: Double -> Ptr () -> IO CInt 138foreign import ccall SAFE_CHEAP "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-09-21 20:31:31 +0000