diff options
author | Alberto Ruiz <aruiz@um.es> | 2012-03-13 11:21:21 +0100 |
---|---|---|
committer | Alberto Ruiz <aruiz@um.es> | 2012-03-13 11:21:21 +0100 |
commit | 9c4a8a37291f902312215452d0bdd9ad95408ae9 (patch) | |
tree | 72d468cfa9999dc079466f250883dfb131d016ba /packages/special/lib/Numeric/GSL/Special/Hyperg.hs | |
parent | 6f6455593c0490e4710854b08fc63a2d0993dcac (diff) | |
parent | 032fe19ddfa6e4cfba33f76aaa13043b54568fcf (diff) |
Merge remote-tracking branch 'wowus/master' into unsafe
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Hyperg.hs')
-rw-r--r-- | packages/special/lib/Numeric/GSL/Special/Hyperg.hs | 44 |
1 files changed, 22 insertions, 22 deletions
diff --git a/packages/special/lib/Numeric/GSL/Special/Hyperg.hs b/packages/special/lib/Numeric/GSL/Special/Hyperg.hs index ac237a5..ec974a4 100644 --- a/packages/special/lib/Numeric/GSL/Special/Hyperg.hs +++ b/packages/special/lib/Numeric/GSL/Special/Hyperg.hs | |||
@@ -43,88 +43,88 @@ import Numeric.GSL.Special.Internal | |||
43 | 43 | ||
44 | hyperg_0F1_e :: Double -> Double -> (Double,Double) | 44 | hyperg_0F1_e :: Double -> Double -> (Double,Double) |
45 | hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x | 45 | hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x |
46 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt | 46 | foreign import ccall unsafe "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt |
47 | 47 | ||
48 | hyperg_0F1 :: Double -> Double -> Double | 48 | hyperg_0F1 :: Double -> Double -> Double |
49 | hyperg_0F1 = gsl_sf_hyperg_0F1 | 49 | hyperg_0F1 = gsl_sf_hyperg_0F1 |
50 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double | 50 | foreign import ccall unsafe "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double |
51 | 51 | ||
52 | hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double) | 52 | hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double) |
53 | hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x | 53 | hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x |
54 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt | 54 | foreign import ccall unsafe "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt |
55 | 55 | ||
56 | hyperg_1F1_int :: CInt -> CInt -> Double -> Double | 56 | hyperg_1F1_int :: CInt -> CInt -> Double -> Double |
57 | hyperg_1F1_int = gsl_sf_hyperg_1F1_int | 57 | hyperg_1F1_int = gsl_sf_hyperg_1F1_int |
58 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double | 58 | foreign import ccall unsafe "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double |
59 | 59 | ||
60 | hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) | 60 | hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) |
61 | hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x | 61 | hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x |
62 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt | 62 | foreign import ccall unsafe "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt |
63 | 63 | ||
64 | hyperg_1F1 :: Double -> Double -> Double -> Double | 64 | hyperg_1F1 :: Double -> Double -> Double -> Double |
65 | hyperg_1F1 = gsl_sf_hyperg_1F1 | 65 | hyperg_1F1 = gsl_sf_hyperg_1F1 |
66 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double | 66 | foreign import ccall unsafe "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double |
67 | 67 | ||
68 | hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double) | 68 | hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double) |
69 | hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x | 69 | hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x |
70 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt | 70 | foreign import ccall unsafe "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt |
71 | 71 | ||
72 | hyperg_U_int :: CInt -> CInt -> Double -> Double | 72 | hyperg_U_int :: CInt -> CInt -> Double -> Double |
73 | hyperg_U_int = gsl_sf_hyperg_U_int | 73 | hyperg_U_int = gsl_sf_hyperg_U_int |
74 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double | 74 | foreign import ccall unsafe "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double |
75 | 75 | ||
76 | hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double) | 76 | hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double) |
77 | hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x | 77 | hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x |
78 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt | 78 | foreign import ccall unsafe "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt |
79 | 79 | ||
80 | hyperg_U_e :: Double -> Double -> Double -> (Double,Double) | 80 | hyperg_U_e :: Double -> Double -> Double -> (Double,Double) |
81 | hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x | 81 | hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x |
82 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt | 82 | foreign import ccall unsafe "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt |
83 | 83 | ||
84 | hyperg_U :: Double -> Double -> Double -> Double | 84 | hyperg_U :: Double -> Double -> Double -> Double |
85 | hyperg_U = gsl_sf_hyperg_U | 85 | hyperg_U = gsl_sf_hyperg_U |
86 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double | 86 | foreign import ccall unsafe "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double |
87 | 87 | ||
88 | hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) | 88 | hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) |
89 | hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x | 89 | hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x |
90 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt | 90 | foreign import ccall unsafe "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt |
91 | 91 | ||
92 | hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) | 92 | hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) |
93 | hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x | 93 | hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x |
94 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt | 94 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt |
95 | 95 | ||
96 | hyperg_2F1 :: Double -> Double -> Double -> Double -> Double | 96 | hyperg_2F1 :: Double -> Double -> Double -> Double -> Double |
97 | hyperg_2F1 = gsl_sf_hyperg_2F1 | 97 | hyperg_2F1 = gsl_sf_hyperg_2F1 |
98 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double | 98 | foreign import ccall unsafe "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double |
99 | 99 | ||
100 | hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) | 100 | hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) |
101 | hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x | 101 | hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x |
102 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt | 102 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt |
103 | 103 | ||
104 | hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double | 104 | hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double |
105 | hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj | 105 | hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj |
106 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double | 106 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double |
107 | 107 | ||
108 | hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) | 108 | hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) |
109 | hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x | 109 | hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x |
110 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt | 110 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt |
111 | 111 | ||
112 | hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double | 112 | hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double |
113 | hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm | 113 | hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm |
114 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double | 114 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double |
115 | 115 | ||
116 | hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) | 116 | hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) |
117 | hyperg_2F1_conj_renorm_e aR aI c x = createSFR "hyperg_2F1_conj_renorm_e" $ gsl_sf_hyperg_2F1_conj_renorm_e aR aI c x | 117 | hyperg_2F1_conj_renorm_e aR aI c x = createSFR "hyperg_2F1_conj_renorm_e" $ gsl_sf_hyperg_2F1_conj_renorm_e aR aI c x |
118 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt | 118 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt |
119 | 119 | ||
120 | hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double | 120 | hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double |
121 | hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm | 121 | hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm |
122 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double | 122 | foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double |
123 | 123 | ||
124 | hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) | 124 | hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) |
125 | hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x | 125 | hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x |
126 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt | 126 | foreign import ccall unsafe "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt |
127 | 127 | ||
128 | hyperg_2F0 :: Double -> Double -> Double -> Double | 128 | hyperg_2F0 :: Double -> Double -> Double -> Double |
129 | hyperg_2F0 = gsl_sf_hyperg_2F0 | 129 | hyperg_2F0 = gsl_sf_hyperg_2F0 |
130 | foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double | 130 | foreign import ccall unsafe "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double |