diff options
author | Clark Gaebel <cgaebel@csclub.uwaterloo.ca> | 2012-03-10 18:26:56 -0500 |
---|---|---|
committer | Clark Gaebel <cgaebel@csclub.uwaterloo.ca> | 2012-03-10 18:26:56 -0500 |
commit | f8b7b3734fa6bb8d63914719e09d17940add27d4 (patch) | |
tree | 233c1c41ea8d5a0cf43bf9430cc2b60cff38a3e9 /packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs | |
parent | 13fe05779923baad386b0059ff6fbc7c6af405d9 (diff) |
Removed foreign import safety.
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs')
-rw-r--r-- | packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs b/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs index c39c096..11ed8a2 100644 --- a/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs +++ b/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs | |||
@@ -39,72 +39,72 @@ import Numeric.GSL.Special.Internal | |||
39 | 39 | ||
40 | fermi_dirac_m1_e :: Double -> (Double,Double) | 40 | fermi_dirac_m1_e :: Double -> (Double,Double) |
41 | fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x | 41 | fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x |
42 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr () -> IO CInt | 42 | foreign import ccall unsafe "gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr () -> IO CInt |
43 | 43 | ||
44 | fermi_dirac_m1 :: Double -> Double | 44 | fermi_dirac_m1 :: Double -> Double |
45 | fermi_dirac_m1 = gsl_sf_fermi_dirac_m1 | 45 | fermi_dirac_m1 = gsl_sf_fermi_dirac_m1 |
46 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double | 46 | foreign import ccall unsafe "gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double |
47 | 47 | ||
48 | fermi_dirac_0_e :: Double -> (Double,Double) | 48 | fermi_dirac_0_e :: Double -> (Double,Double) |
49 | fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x | 49 | fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x |
50 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr () -> IO CInt | 50 | foreign import ccall unsafe "gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr () -> IO CInt |
51 | 51 | ||
52 | fermi_dirac_0 :: Double -> Double | 52 | fermi_dirac_0 :: Double -> Double |
53 | fermi_dirac_0 = gsl_sf_fermi_dirac_0 | 53 | fermi_dirac_0 = gsl_sf_fermi_dirac_0 |
54 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double | 54 | foreign import ccall unsafe "gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double |
55 | 55 | ||
56 | fermi_dirac_1_e :: Double -> (Double,Double) | 56 | fermi_dirac_1_e :: Double -> (Double,Double) |
57 | fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x | 57 | fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x |
58 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr () -> IO CInt | 58 | foreign import ccall unsafe "gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr () -> IO CInt |
59 | 59 | ||
60 | fermi_dirac_1 :: Double -> Double | 60 | fermi_dirac_1 :: Double -> Double |
61 | fermi_dirac_1 = gsl_sf_fermi_dirac_1 | 61 | fermi_dirac_1 = gsl_sf_fermi_dirac_1 |
62 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double | 62 | foreign import ccall unsafe "gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double |
63 | 63 | ||
64 | fermi_dirac_2_e :: Double -> (Double,Double) | 64 | fermi_dirac_2_e :: Double -> (Double,Double) |
65 | fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x | 65 | fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x |
66 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr () -> IO CInt | 66 | foreign import ccall unsafe "gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr () -> IO CInt |
67 | 67 | ||
68 | fermi_dirac_2 :: Double -> Double | 68 | fermi_dirac_2 :: Double -> Double |
69 | fermi_dirac_2 = gsl_sf_fermi_dirac_2 | 69 | fermi_dirac_2 = gsl_sf_fermi_dirac_2 |
70 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double | 70 | foreign import ccall unsafe "gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double |
71 | 71 | ||
72 | fermi_dirac_int_e :: CInt -> Double -> (Double,Double) | 72 | fermi_dirac_int_e :: CInt -> Double -> (Double,Double) |
73 | fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x | 73 | fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x |
74 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: CInt -> Double -> Ptr () -> IO CInt | 74 | foreign import ccall unsafe "gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: CInt -> Double -> Ptr () -> IO CInt |
75 | 75 | ||
76 | fermi_dirac_int :: CInt -> Double -> Double | 76 | fermi_dirac_int :: CInt -> Double -> Double |
77 | fermi_dirac_int = gsl_sf_fermi_dirac_int | 77 | fermi_dirac_int = gsl_sf_fermi_dirac_int |
78 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: CInt -> Double -> Double | 78 | foreign import ccall unsafe "gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: CInt -> Double -> Double |
79 | 79 | ||
80 | fermi_dirac_mhalf_e :: Double -> (Double,Double) | 80 | fermi_dirac_mhalf_e :: Double -> (Double,Double) |
81 | fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x | 81 | fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x |
82 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr () -> IO CInt | 82 | foreign import ccall unsafe "gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr () -> IO CInt |
83 | 83 | ||
84 | fermi_dirac_mhalf :: Double -> Double | 84 | fermi_dirac_mhalf :: Double -> Double |
85 | fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf | 85 | fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf |
86 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double | 86 | foreign import ccall unsafe "gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double |
87 | 87 | ||
88 | fermi_dirac_half_e :: Double -> (Double,Double) | 88 | fermi_dirac_half_e :: Double -> (Double,Double) |
89 | fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x | 89 | fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x |
90 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr () -> IO CInt | 90 | foreign import ccall unsafe "gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr () -> IO CInt |
91 | 91 | ||
92 | fermi_dirac_half :: Double -> Double | 92 | fermi_dirac_half :: Double -> Double |
93 | fermi_dirac_half = gsl_sf_fermi_dirac_half | 93 | fermi_dirac_half = gsl_sf_fermi_dirac_half |
94 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double | 94 | foreign import ccall unsafe "gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double |
95 | 95 | ||
96 | fermi_dirac_3half_e :: Double -> (Double,Double) | 96 | fermi_dirac_3half_e :: Double -> (Double,Double) |
97 | fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x | 97 | fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x |
98 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr () -> IO CInt | 98 | foreign import ccall unsafe "gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr () -> IO CInt |
99 | 99 | ||
100 | fermi_dirac_3half :: Double -> Double | 100 | fermi_dirac_3half :: Double -> Double |
101 | fermi_dirac_3half = gsl_sf_fermi_dirac_3half | 101 | fermi_dirac_3half = gsl_sf_fermi_dirac_3half |
102 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double | 102 | foreign import ccall unsafe "gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double |
103 | 103 | ||
104 | fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double) | 104 | fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double) |
105 | fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b | 105 | fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b |
106 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr () -> IO CInt | 106 | foreign import ccall unsafe "gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr () -> IO CInt |
107 | 107 | ||
108 | fermi_dirac_inc_0 :: Double -> Double -> Double | 108 | fermi_dirac_inc_0 :: Double -> Double -> Double |
109 | fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0 | 109 | fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0 |
110 | foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double | 110 | foreign import ccall unsafe "gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double |