Safe Haskell	None
Language	Haskell2010

Foreign.SwissEphemeris

Description

Exposes very low-level FFI bindings to the C library. Use the SwissEphemeris module and its more Haskell-friendly exports.

Synopsis

newtype PlanetNumber = PlanetNumber {
- unPlanetNumber :: CInt
}
newtype GregFlag = GregFlag {
- unGregFlag :: CInt
}
newtype CalcFlag = CalcFlag {
- unCalcFlag :: CInt
}
newtype SplitDegFlag = SplitDegFlag {
- unSplitDegFlag :: CInt
}
sun :: PlanetNumber
moon :: PlanetNumber
mercury :: PlanetNumber
venus :: PlanetNumber
mars :: PlanetNumber
jupiter :: PlanetNumber
saturn :: PlanetNumber
uranus :: PlanetNumber
neptune :: PlanetNumber
pluto :: PlanetNumber
julian :: GregFlag
meanNode :: PlanetNumber
gregorian :: GregFlag
trueNode :: PlanetNumber
meanApog :: PlanetNumber
speed :: CalcFlag
oscuApog :: PlanetNumber
swissEph :: CalcFlag
earth :: PlanetNumber
chiron :: PlanetNumber
equatorialPositions :: CalcFlag
splitRoundSec :: SplitDegFlag
specialEclNut :: PlanetNumber
splitRoundMin :: SplitDegFlag
splitRoundDeg :: SplitDegFlag
splitZodiacal :: SplitDegFlag
splitNakshatra :: SplitDegFlag
splitKeepSign :: SplitDegFlag
c_swe_set_ephe_path :: CString -> IO ()
splitKeepDeg :: SplitDegFlag
c_swe_close :: IO ()
c_swe_julday :: CInt -> CInt -> CInt -> CDouble -> GregFlag -> CDouble
c_swe_calc_ut :: CDouble -> PlanetNumber -> CalcFlag -> Ptr CDouble -> CString -> IO CalcFlag
c_swe_houses :: CDouble -> CDouble -> CDouble -> CInt -> Ptr CDouble -> Ptr CDouble -> IO CInt
c_swe_house_pos :: CDouble -> CDouble -> CDouble -> CInt -> Ptr CDouble -> CString -> IO CDouble
c_swe_cotrans_sp :: Ptr CDouble -> Ptr CDouble -> CDouble -> IO ()
c_swe_split_deg :: CDouble -> SplitDegFlag -> Ptr CInt -> Ptr CInt -> Ptr CInt -> Ptr CDouble -> Ptr CInt -> IO ()
c_swe_deltat :: CDouble -> IO CDouble
c_swe_sidtime :: CDouble -> IO CDouble
c_swe_sidtime0 :: CDouble -> CDouble -> CDouble -> IO CDouble

Documentation

newtype PlanetNumber Source #

Constructors

PlanetNumber
Fields unPlanetNumber :: CInt

Instances

Eq PlanetNumber Source #
Instance details Defined in Foreign.SwissEphemeris Methods (==) :: PlanetNumber -> PlanetNumber -> Bool # (/=) :: PlanetNumber -> PlanetNumber -> Bool #
Show PlanetNumber Source #
Instance details Defined in Foreign.SwissEphemeris Methods showsPrec :: Int -> PlanetNumber -> ShowS # show :: PlanetNumber -> String # showList :: [PlanetNumber] -> ShowS #

newtype GregFlag Source #

Constructors

GregFlag
Fields unGregFlag :: CInt

Instances

Eq GregFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods (==) :: GregFlag -> GregFlag -> Bool # (/=) :: GregFlag -> GregFlag -> Bool #
Show GregFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods showsPrec :: Int -> GregFlag -> ShowS # show :: GregFlag -> String # showList :: [GregFlag] -> ShowS #

newtype CalcFlag Source #

Constructors

CalcFlag
Fields unCalcFlag :: CInt

Instances

Eq CalcFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods (==) :: CalcFlag -> CalcFlag -> Bool # (/=) :: CalcFlag -> CalcFlag -> Bool #
Show CalcFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods showsPrec :: Int -> CalcFlag -> ShowS # show :: CalcFlag -> String # showList :: [CalcFlag] -> ShowS #

newtype SplitDegFlag Source #

Constructors

SplitDegFlag
Fields unSplitDegFlag :: CInt

Instances

Eq SplitDegFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods (==) :: SplitDegFlag -> SplitDegFlag -> Bool # (/=) :: SplitDegFlag -> SplitDegFlag -> Bool #
Show SplitDegFlag Source #
Instance details Defined in Foreign.SwissEphemeris Methods showsPrec :: Int -> SplitDegFlag -> ShowS # show :: SplitDegFlag -> String # showList :: [SplitDegFlag] -> ShowS #

sun :: PlanetNumber Source #

moon :: PlanetNumber Source #

mercury :: PlanetNumber Source #

venus :: PlanetNumber Source #

mars :: PlanetNumber Source #

jupiter :: PlanetNumber Source #

saturn :: PlanetNumber Source #

uranus :: PlanetNumber Source #

neptune :: PlanetNumber Source #

pluto :: PlanetNumber Source #

julian :: GregFlag Source #

meanNode :: PlanetNumber Source #

gregorian :: GregFlag Source #

trueNode :: PlanetNumber Source #

meanApog :: PlanetNumber Source #

speed :: CalcFlag Source #

oscuApog :: PlanetNumber Source #

swissEph :: CalcFlag Source #

earth :: PlanetNumber Source #

chiron :: PlanetNumber Source #

equatorialPositions :: CalcFlag Source #

splitRoundSec :: SplitDegFlag Source #

specialEclNut :: PlanetNumber Source #

splitRoundMin :: SplitDegFlag Source #

splitRoundDeg :: SplitDegFlag Source #

splitZodiacal :: SplitDegFlag Source #

splitNakshatra :: SplitDegFlag Source #

splitKeepSign :: SplitDegFlag Source #

c_swe_set_ephe_path :: CString -> IO () Source #

splitKeepDeg :: SplitDegFlag Source #

c_swe_close :: IO () Source #

c_swe_julday :: CInt -> CInt -> CInt -> CDouble -> GregFlag -> CDouble Source #

c_swe_calc_ut :: CDouble -> PlanetNumber -> CalcFlag -> Ptr CDouble -> CString -> IO CalcFlag Source #

Calculate the position of a body, given a time in Universal Time. Note that this is marginally more expensive than swe_calc, but I use this one to keep consistency with swe_houses.

c_swe_houses :: CDouble -> CDouble -> CDouble -> CInt -> Ptr CDouble -> Ptr CDouble -> IO CInt Source #

Get the house cusps and other relevant angles for a given time and place. Note that there's also a swe_houses_armc if one happens to have the ARMC and the ecliptic obliquity handy from other calculations.

c_swe_house_pos :: CDouble -> CDouble -> CDouble -> CInt -> Ptr CDouble -> CString -> IO CDouble Source #

Calculate the house a planet is in. Takes into account obliquity of the ecliptic. Works for all house systems, except Koch.

c_swe_cotrans_sp :: Ptr CDouble -> Ptr CDouble -> CDouble -> IO () Source #

Low-level function to translate between coordinate systems, with speed position included.

c_swe_split_deg :: CDouble -> SplitDegFlag -> Ptr CInt -> Ptr CInt -> Ptr CInt -> Ptr CDouble -> Ptr CInt -> IO () Source #

Split a given ecliptic longitude into sign (number) degrees, minutes and seconds.

c_swe_deltat :: CDouble -> IO CDouble Source #

Calculate the delta time for a given julian time, delta time + julian time = ephemeris time NOTE: there's also swe_deltat_ex which takes an ephemeris flag explicitly, vs. the current global value. my calculations work in one ephemeris, so this one is suitable.

c_swe_sidtime :: CDouble -> IO CDouble Source #

Calculate the sidereal time for a given julian time. NOTE: there's also swe_sidtime0 which requires obliquity and nutation, this one computes them internally.

c_swe_sidtime0 :: CDouble -> CDouble -> CDouble -> IO CDouble Source #

Calculate the sidereal time for a given julian time, obliquity and nutation.