summaryrefslogtreecommitdiff
path: root/packages/special/lib/Numeric/GSL/Special/Hyperg.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2012-03-13 14:51:12 +0100
committerAlberto Ruiz <aruiz@um.es>2012-03-13 14:51:12 +0100
commit072055e1658fa6fd64a4462b6a243ec0f5e5cdb4 (patch)
tree09e3a46185a1ee231cdddab6955437a2b0ead601 /packages/special/lib/Numeric/GSL/Special/Hyperg.hs
parent9c4a8a37291f902312215452d0bdd9ad95408ae9 (diff)
revert to SAFE_CHEAP macro, unsafe by default
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Hyperg.hs')
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Hyperg.hs44
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 ec974a4..ac237a5 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
44hyperg_0F1_e :: Double -> Double -> (Double,Double) 44hyperg_0F1_e :: Double -> Double -> (Double,Double)
45hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x 45hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x
46foreign import ccall unsafe "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt 46foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt
47 47
48hyperg_0F1 :: Double -> Double -> Double 48hyperg_0F1 :: Double -> Double -> Double
49hyperg_0F1 = gsl_sf_hyperg_0F1 49hyperg_0F1 = gsl_sf_hyperg_0F1
50foreign import ccall unsafe "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double 50foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double
51 51
52hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double) 52hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double)
53hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x 53hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x
54foreign import ccall unsafe "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 54foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
55 55
56hyperg_1F1_int :: CInt -> CInt -> Double -> Double 56hyperg_1F1_int :: CInt -> CInt -> Double -> Double
57hyperg_1F1_int = gsl_sf_hyperg_1F1_int 57hyperg_1F1_int = gsl_sf_hyperg_1F1_int
58foreign import ccall unsafe "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double 58foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double
59 59
60hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) 60hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double)
61hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x 61hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x
62foreign import ccall unsafe "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt 62foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt
63 63
64hyperg_1F1 :: Double -> Double -> Double -> Double 64hyperg_1F1 :: Double -> Double -> Double -> Double
65hyperg_1F1 = gsl_sf_hyperg_1F1 65hyperg_1F1 = gsl_sf_hyperg_1F1
66foreign import ccall unsafe "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double 66foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double
67 67
68hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double) 68hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double)
69hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x 69hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x
70foreign import ccall unsafe "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 70foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
71 71
72hyperg_U_int :: CInt -> CInt -> Double -> Double 72hyperg_U_int :: CInt -> CInt -> Double -> Double
73hyperg_U_int = gsl_sf_hyperg_U_int 73hyperg_U_int = gsl_sf_hyperg_U_int
74foreign import ccall unsafe "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double 74foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double
75 75
76hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double) 76hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double)
77hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x 77hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x
78foreign import ccall unsafe "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 78foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
79 79
80hyperg_U_e :: Double -> Double -> Double -> (Double,Double) 80hyperg_U_e :: Double -> Double -> Double -> (Double,Double)
81hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x 81hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x
82foreign import ccall unsafe "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt 82foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt
83 83
84hyperg_U :: Double -> Double -> Double -> Double 84hyperg_U :: Double -> Double -> Double -> Double
85hyperg_U = gsl_sf_hyperg_U 85hyperg_U = gsl_sf_hyperg_U
86foreign import ccall unsafe "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double 86foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double
87 87
88hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) 88hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double)
89hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x 89hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x
90foreign import ccall unsafe "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt 90foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt
91 91
92hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) 92hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double)
93hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x 93hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x
94foreign import ccall unsafe "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 94foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
95 95
96hyperg_2F1 :: Double -> Double -> Double -> Double -> Double 96hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
97hyperg_2F1 = gsl_sf_hyperg_2F1 97hyperg_2F1 = gsl_sf_hyperg_2F1
98foreign import ccall unsafe "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double 98foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
99 99
100hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) 100hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double)
101hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x 101hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x
102foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 102foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
103 103
104hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double 104hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
105hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj 105hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj
106foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double 106foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
107 107
108hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) 108hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
109hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x 109hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x
110foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 110foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
111 111
112hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double 112hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
113hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm 113hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm
114foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double 114foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
115 115
116hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) 116hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
117hyperg_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 117hyperg_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
118foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 118foreign 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
119 119
120hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double 120hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
121hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm 121hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm
122foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double 122foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
123 123
124hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) 124hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double)
125hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x 125hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x
126foreign import ccall unsafe "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt 126foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt
127 127
128hyperg_2F0 :: Double -> Double -> Double -> Double 128hyperg_2F0 :: Double -> Double -> Double -> Double
129hyperg_2F0 = gsl_sf_hyperg_2F0 129hyperg_2F0 = gsl_sf_hyperg_2F0
130foreign import ccall unsafe "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double 130foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-01 15:05:03 +0000