{-# LINE 1 "src/Foreign/Interpolate.hsc" #-}
{-# LANGUAGE CPP, ForeignFunctionInterface #-}
module Foreign.Interpolate where
import Foreign
import Foreign.C.Types
import Foreign.C.String
import Foreign.SwissEphemeris
foreign import ccall unsafe "interpolate.h swe_next_direction_change"
c_swe_next_direction_change :: CDouble
-> PlanetNumber
-> CalcFlag
-> Ptr CDouble
-> Ptr CInt
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_next_direction_change_ut"
c_swe_next_direction_change_ut :: CDouble
-> PlanetNumber
-> CalcFlag
-> Ptr CDouble
-> Ptr CInt
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_next_direction_change_between"
c_swe_next_direction_change_between :: CDouble
-> CDouble
-> PlanetNumber
-> CalcFlag
-> Ptr CDouble
-> Ptr CInt
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_next_direction_change_ut_between"
c_swe_next_direction_change_ut_between :: CDouble
-> CDouble
-> PlanetNumber
-> CalcFlag
-> Ptr CDouble
-> Ptr CInt
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_interpolate"
c_swe_interpolate :: PlanetNumber
-> CDouble
-> CDouble
-> CDouble
-> CalcFlag
-> Ptr CDouble
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_interpolate_ut"
c_swe_interpolate_ut :: PlanetNumber
-> CDouble
-> CDouble
-> CDouble
-> CalcFlag
-> Ptr CDouble
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_interpolate_moon_phase"
c_swe_interpolate_moon_phase
:: CDouble
-> CDouble
-> CDouble
-> CalcFlag
-> Ptr CDouble
-> CString
-> IO CInt
foreign import ccall unsafe "interpolate.h swe_interpolate_moon_phase_ut"
c_swe_interpolate_moon_phase_ut
:: CDouble
-> CDouble
-> CDouble
-> CalcFlag
-> Ptr CDouble
-> CString
-> IO CInt