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/Transport.hs | |
parent | 6f6455593c0490e4710854b08fc63a2d0993dcac (diff) | |
parent | 032fe19ddfa6e4cfba33f76aaa13043b54568fcf (diff) |
Merge remote-tracking branch 'wowus/master' into unsafe
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Transport.hs')
-rw-r--r-- | packages/special/lib/Numeric/GSL/Special/Transport.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/packages/special/lib/Numeric/GSL/Special/Transport.hs b/packages/special/lib/Numeric/GSL/Special/Transport.hs index b92b578..f2d83a2 100644 --- a/packages/special/lib/Numeric/GSL/Special/Transport.hs +++ b/packages/special/lib/Numeric/GSL/Special/Transport.hs | |||
@@ -29,32 +29,32 @@ import Numeric.GSL.Special.Internal | |||
29 | 29 | ||
30 | transport_2_e :: Double -> (Double,Double) | 30 | transport_2_e :: Double -> (Double,Double) |
31 | transport_2_e x = createSFR "transport_2_e" $ gsl_sf_transport_2_e x | 31 | transport_2_e x = createSFR "transport_2_e" $ gsl_sf_transport_2_e x |
32 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_2_e" gsl_sf_transport_2_e :: Double -> Ptr () -> IO CInt | 32 | foreign import ccall unsafe "gsl_sf_transport_2_e" gsl_sf_transport_2_e :: Double -> Ptr () -> IO CInt |
33 | 33 | ||
34 | transport_2 :: Double -> Double | 34 | transport_2 :: Double -> Double |
35 | transport_2 = gsl_sf_transport_2 | 35 | transport_2 = gsl_sf_transport_2 |
36 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_2" gsl_sf_transport_2 :: Double -> Double | 36 | foreign import ccall unsafe "gsl_sf_transport_2" gsl_sf_transport_2 :: Double -> Double |
37 | 37 | ||
38 | transport_3_e :: Double -> (Double,Double) | 38 | transport_3_e :: Double -> (Double,Double) |
39 | transport_3_e x = createSFR "transport_3_e" $ gsl_sf_transport_3_e x | 39 | transport_3_e x = createSFR "transport_3_e" $ gsl_sf_transport_3_e x |
40 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_3_e" gsl_sf_transport_3_e :: Double -> Ptr () -> IO CInt | 40 | foreign import ccall unsafe "gsl_sf_transport_3_e" gsl_sf_transport_3_e :: Double -> Ptr () -> IO CInt |
41 | 41 | ||
42 | transport_3 :: Double -> Double | 42 | transport_3 :: Double -> Double |
43 | transport_3 = gsl_sf_transport_3 | 43 | transport_3 = gsl_sf_transport_3 |
44 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_3" gsl_sf_transport_3 :: Double -> Double | 44 | foreign import ccall unsafe "gsl_sf_transport_3" gsl_sf_transport_3 :: Double -> Double |
45 | 45 | ||
46 | transport_4_e :: Double -> (Double,Double) | 46 | transport_4_e :: Double -> (Double,Double) |
47 | transport_4_e x = createSFR "transport_4_e" $ gsl_sf_transport_4_e x | 47 | transport_4_e x = createSFR "transport_4_e" $ gsl_sf_transport_4_e x |
48 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_4_e" gsl_sf_transport_4_e :: Double -> Ptr () -> IO CInt | 48 | foreign import ccall unsafe "gsl_sf_transport_4_e" gsl_sf_transport_4_e :: Double -> Ptr () -> IO CInt |
49 | 49 | ||
50 | transport_4 :: Double -> Double | 50 | transport_4 :: Double -> Double |
51 | transport_4 = gsl_sf_transport_4 | 51 | transport_4 = gsl_sf_transport_4 |
52 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_4" gsl_sf_transport_4 :: Double -> Double | 52 | foreign import ccall unsafe "gsl_sf_transport_4" gsl_sf_transport_4 :: Double -> Double |
53 | 53 | ||
54 | transport_5_e :: Double -> (Double,Double) | 54 | transport_5_e :: Double -> (Double,Double) |
55 | transport_5_e x = createSFR "transport_5_e" $ gsl_sf_transport_5_e x | 55 | transport_5_e x = createSFR "transport_5_e" $ gsl_sf_transport_5_e x |
56 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_5_e" gsl_sf_transport_5_e :: Double -> Ptr () -> IO CInt | 56 | foreign import ccall unsafe "gsl_sf_transport_5_e" gsl_sf_transport_5_e :: Double -> Ptr () -> IO CInt |
57 | 57 | ||
58 | transport_5 :: Double -> Double | 58 | transport_5 :: Double -> Double |
59 | transport_5 = gsl_sf_transport_5 | 59 | transport_5 = gsl_sf_transport_5 |
60 | foreign import ccall SAFE_CHEAP "gsl_sf_transport_5" gsl_sf_transport_5 :: Double -> Double | 60 | foreign import ccall unsafe "gsl_sf_transport_5" gsl_sf_transport_5 :: Double -> Double |