SwissEphemeris.Internal

The types defined here are exported publicly for convenience, but at least in versions <= 2.x, they're likely to evolve.

Documentation

class Eq a => HasEclipticLongitude a where

For objects that can be placed along the ecliptic in a 1-dimensional "longitude-only" manner.

Methods

getEclipticLongitude :: a -> Double

setEclipticLongitude :: a -> Double -> a

Instances

HasEclipticLongitude EclipticPosition

Defined in SwissEphemeris.Internal

Methods

getEclipticLongitude :: EclipticPosition -> Double

setEclipticLongitude :: EclipticPosition -> Double -> EclipticPosition

(Real a, Eq a, Fractional a) => HasEclipticLongitude (EphemerisPosition a)

Defined in SwissEphemeris.Precalculated

Methods

getEclipticLongitude :: EphemerisPosition a -> Double

setEclipticLongitude :: EphemerisPosition a -> Double -> EphemerisPosition a

data Planet

All bodies for which a position can be calculated. Covers planets in the solar system, points between the Earth and the Moon, and astrologically significant asteroids (currently, only Chiron, but ephemerides data is available for others.) More at 2.1 Planetary and lunar ephemerides and 3.2 bodies

Constructors

Sun

Moon

Mercury

Venus

Mars

Jupiter

Saturn

Uranus

Neptune

Pluto

MeanNode

TrueNode

MeanApog

OscuApog

Earth

Chiron

Instances

Enum Planet

Defined in SwissEphemeris.Internal

Methods

succ :: Planet -> Planet

pred :: Planet -> Planet

toEnum :: Int -> Planet

fromEnum :: Planet -> Int

enumFrom :: Planet -> [Planet]

enumFromThen :: Planet -> Planet -> [Planet]

enumFromTo :: Planet -> Planet -> [Planet]

enumFromThenTo :: Planet -> Planet -> Planet -> [Planet]

Eq Planet

Defined in SwissEphemeris.Internal

Methods

(==) :: Planet -> Planet -> Bool

(/=) :: Planet -> Planet -> Bool

Ord Planet

Defined in SwissEphemeris.Internal

Methods

compare :: Planet -> Planet -> Ordering

(<) :: Planet -> Planet -> Bool

(<=) :: Planet -> Planet -> Bool

(>) :: Planet -> Planet -> Bool

(>=) :: Planet -> Planet -> Bool

max :: Planet -> Planet -> Planet

min :: Planet -> Planet -> Planet

Show Planet

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> Planet -> ShowS

show :: Planet -> String

showList :: [Planet] -> ShowS

Generic Planet

Defined in SwissEphemeris.Internal

Associated Types

type Rep Planet :: Type -> Type

Methods

from :: Planet -> Rep Planet x

to :: Rep Planet x -> Planet

Storable Planet

When marshaling a Planet to/from C, use the underlying integer PlanetNumber.

Defined in SwissEphemeris.Internal

Methods

sizeOf :: Planet -> Int

alignment :: Planet -> Int

peekElemOff :: Ptr Planet -> Int -> IO Planet

pokeElemOff :: Ptr Planet -> Int -> Planet -> IO ()

peekByteOff :: Ptr b -> Int -> IO Planet

pokeByteOff :: Ptr b -> Int -> Planet -> IO ()

peek :: Ptr Planet -> IO Planet

poke :: Ptr Planet -> Planet -> IO ()

type Rep Planet

Defined in SwissEphemeris.Internal

type Rep Planet = D1 ('MetaData "Planet" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) ((((C1 ('MetaCons "Sun" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Moon" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Mercury" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Venus" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "Mars" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Jupiter" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Saturn" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Uranus" 'PrefixI 'False) (U1 :: Type -> Type)))) :+: (((C1 ('MetaCons "Neptune" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Pluto" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "MeanNode" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "TrueNode" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "MeanApog" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "OscuApog" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Earth" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Chiron" 'PrefixI 'False) (U1 :: Type -> Type)))))

data HouseSystem

The major house systems. The underlying library supports many more, including the 36-cusp outlier Gauquelin. More info at 6.2 Astrological house systems and 14. House cusp calculation

Constructors

Placidus

Koch

Porphyrius

Regiomontanus

Campanus

Equal

WholeSign

Instances

Enum HouseSystem

Defined in SwissEphemeris.Internal

Methods

succ :: HouseSystem -> HouseSystem

pred :: HouseSystem -> HouseSystem

toEnum :: Int -> HouseSystem

fromEnum :: HouseSystem -> Int

enumFrom :: HouseSystem -> [HouseSystem]

enumFromThen :: HouseSystem -> HouseSystem -> [HouseSystem]

enumFromTo :: HouseSystem -> HouseSystem -> [HouseSystem]

enumFromThenTo :: HouseSystem -> HouseSystem -> HouseSystem -> [HouseSystem]

Eq HouseSystem

Defined in SwissEphemeris.Internal

Methods

(==) :: HouseSystem -> HouseSystem -> Bool

(/=) :: HouseSystem -> HouseSystem -> Bool

Ord HouseSystem

Defined in SwissEphemeris.Internal

Methods

compare :: HouseSystem -> HouseSystem -> Ordering

(<) :: HouseSystem -> HouseSystem -> Bool

(<=) :: HouseSystem -> HouseSystem -> Bool

(>) :: HouseSystem -> HouseSystem -> Bool

(>=) :: HouseSystem -> HouseSystem -> Bool

max :: HouseSystem -> HouseSystem -> HouseSystem

min :: HouseSystem -> HouseSystem -> HouseSystem

Show HouseSystem

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> HouseSystem -> ShowS

show :: HouseSystem -> String

showList :: [HouseSystem] -> ShowS

Generic HouseSystem

Defined in SwissEphemeris.Internal

Associated Types

type Rep HouseSystem :: Type -> Type

Methods

from :: HouseSystem -> Rep HouseSystem x

to :: Rep HouseSystem x -> HouseSystem

type Rep HouseSystem

Defined in SwissEphemeris.Internal

type Rep HouseSystem = D1 ('MetaData "HouseSystem" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) ((C1 ('MetaCons "Placidus" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Koch" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Porphyrius" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "Regiomontanus" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Campanus" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Equal" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "WholeSign" 'PrefixI 'False) (U1 :: Type -> Type))))

data ZodiacSignName

Represents western zodiac signs. Unless otherwise stated, they correspond to tropical divisions of the ecliptic, vs. the actual constellations.

Constructors

Aries

Taurus

Gemini

Cancer

Leo

Virgo

Libra

Scorpio

Sagittarius

Capricorn

Aquarius

Pisces

Instances

Enum ZodiacSignName

Defined in SwissEphemeris.Internal

Methods

succ :: ZodiacSignName -> ZodiacSignName

pred :: ZodiacSignName -> ZodiacSignName

toEnum :: Int -> ZodiacSignName

fromEnum :: ZodiacSignName -> Int

enumFrom :: ZodiacSignName -> [ZodiacSignName]

enumFromThen :: ZodiacSignName -> ZodiacSignName -> [ZodiacSignName]

enumFromTo :: ZodiacSignName -> ZodiacSignName -> [ZodiacSignName]

enumFromThenTo :: ZodiacSignName -> ZodiacSignName -> ZodiacSignName -> [ZodiacSignName]

Eq ZodiacSignName

Defined in SwissEphemeris.Internal

Methods

(==) :: ZodiacSignName -> ZodiacSignName -> Bool

(/=) :: ZodiacSignName -> ZodiacSignName -> Bool

Show ZodiacSignName

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> ZodiacSignName -> ShowS

show :: ZodiacSignName -> String

showList :: [ZodiacSignName] -> ShowS

Generic ZodiacSignName

Defined in SwissEphemeris.Internal

Associated Types

type Rep ZodiacSignName :: Type -> Type

Methods

from :: ZodiacSignName -> Rep ZodiacSignName x

to :: Rep ZodiacSignName x -> ZodiacSignName

type Rep ZodiacSignName

Defined in SwissEphemeris.Internal

type Rep ZodiacSignName = D1 ('MetaData "ZodiacSignName" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (((C1 ('MetaCons "Aries" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Taurus" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Gemini" 'PrefixI 'False) (U1 :: Type -> Type))) :+: (C1 ('MetaCons "Cancer" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Leo" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Virgo" 'PrefixI 'False) (U1 :: Type -> Type)))) :+: ((C1 ('MetaCons "Libra" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Scorpio" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Sagittarius" 'PrefixI 'False) (U1 :: Type -> Type))) :+: (C1 ('MetaCons "Capricorn" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Aquarius" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Pisces" 'PrefixI 'False) (U1 :: Type -> Type)))))

data NakshatraName

Nakshatras, provided for thoroughness, please excuse any misspellings! List from: https://en.wikipedia.org/wiki/List_of_Nakshatras note that the underlying library uses 27 nakshatras, so Abhijit is omitted.

Constructors

Ashvini

Bharani

Krittika

Rohini

Mrigashirsha

Ardra

Punarvasu

Pushya

Ashlesha

Magha

PurvaPhalghuni

UttaraPhalguni

Hasta

Chitra

Swati

Vishakha

Anuradha

Jyeshtha

Mula

PurvaAshadha

UttaraAshadha

Sravana

Dhanishta

Shatabhisha

PurvaBhadrapada

UttaraBhadrapada

Revati

Instances

Enum NakshatraName

Defined in SwissEphemeris.Internal

Methods

succ :: NakshatraName -> NakshatraName

pred :: NakshatraName -> NakshatraName

toEnum :: Int -> NakshatraName

fromEnum :: NakshatraName -> Int

enumFrom :: NakshatraName -> [NakshatraName]

enumFromThen :: NakshatraName -> NakshatraName -> [NakshatraName]

enumFromTo :: NakshatraName -> NakshatraName -> [NakshatraName]

enumFromThenTo :: NakshatraName -> NakshatraName -> NakshatraName -> [NakshatraName]

Eq NakshatraName

Defined in SwissEphemeris.Internal

Methods

(==) :: NakshatraName -> NakshatraName -> Bool

(/=) :: NakshatraName -> NakshatraName -> Bool

Show NakshatraName

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> NakshatraName -> ShowS

show :: NakshatraName -> String

showList :: [NakshatraName] -> ShowS

Generic NakshatraName

Defined in SwissEphemeris.Internal

Associated Types

type Rep NakshatraName :: Type -> Type

Methods

from :: NakshatraName -> Rep NakshatraName x

to :: Rep NakshatraName x -> NakshatraName

type Rep NakshatraName

Defined in SwissEphemeris.Internal

type Rep NakshatraName = D1 ('MetaData "NakshatraName" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) ((((C1 ('MetaCons "Ashvini" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Bharani" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Krittika" 'PrefixI 'False) (U1 :: Type -> Type))) :+: (C1 ('MetaCons "Rohini" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Mrigashirsha" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Ardra" 'PrefixI 'False) (U1 :: Type -> Type)))) :+: ((C1 ('MetaCons "Punarvasu" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Pushya" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Ashlesha" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "Magha" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "PurvaPhalghuni" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "UttaraPhalguni" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Hasta" 'PrefixI 'False) (U1 :: Type -> Type))))) :+: (((C1 ('MetaCons "Chitra" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Swati" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Vishakha" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "Anuradha" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Jyeshtha" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Mula" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "PurvaAshadha" 'PrefixI 'False) (U1 :: Type -> Type)))) :+: ((C1 ('MetaCons "UttaraAshadha" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Sravana" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Dhanishta" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "Shatabhisha" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "PurvaBhadrapada" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "UttaraBhadrapada" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Revati" 'PrefixI 'False) (U1 :: Type -> Type))))))

data SplitDegreesOption

Options to split a Double representing degrees: RoundSeconds -- round at the seconds granularity (omits seconds fraction.) RoundMinutes -- round at the minutes granularity. RoundDegrees -- round at the degrees granularity. SplitZodiacal -- relative to zodiac signs. SplitNakshatra -- relative to nakshatra. KeepSign -- when rounding, don't round if it'll move it to the next zodiac/nakshatra sector. KeepDegrees -- when rounding, don't round if it'll move it to the next degree.

Constructors

RoundSeconds

RoundMinutes

RoundDegrees

SplitZodiacal

SplitNakshatra

KeepSign

KeepDegrees

Instances

Enum SplitDegreesOption

Defined in SwissEphemeris.Internal

Methods

succ :: SplitDegreesOption -> SplitDegreesOption

pred :: SplitDegreesOption -> SplitDegreesOption

toEnum :: Int -> SplitDegreesOption

fromEnum :: SplitDegreesOption -> Int

enumFrom :: SplitDegreesOption -> [SplitDegreesOption]

enumFromThen :: SplitDegreesOption -> SplitDegreesOption -> [SplitDegreesOption]

enumFromTo :: SplitDegreesOption -> SplitDegreesOption -> [SplitDegreesOption]

enumFromThenTo :: SplitDegreesOption -> SplitDegreesOption -> SplitDegreesOption -> [SplitDegreesOption]

Eq SplitDegreesOption

Defined in SwissEphemeris.Internal

Methods

(==) :: SplitDegreesOption -> SplitDegreesOption -> Bool

(/=) :: SplitDegreesOption -> SplitDegreesOption -> Bool

Show SplitDegreesOption

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> SplitDegreesOption -> ShowS

show :: SplitDegreesOption -> String

showList :: [SplitDegreesOption] -> ShowS

Generic SplitDegreesOption

Defined in SwissEphemeris.Internal

Associated Types

type Rep SplitDegreesOption :: Type -> Type

Methods

from :: SplitDegreesOption -> Rep SplitDegreesOption x

to :: Rep SplitDegreesOption x -> SplitDegreesOption

type Rep SplitDegreesOption

Defined in SwissEphemeris.Internal

type Rep SplitDegreesOption = D1 ('MetaData "SplitDegreesOption" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) ((C1 ('MetaCons "RoundSeconds" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "RoundMinutes" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "RoundDegrees" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "SplitZodiacal" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "SplitNakshatra" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "KeepSign" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "KeepDegrees" 'PrefixI 'False) (U1 :: Type -> Type))))

data CalendarOption

Calendar options

Constructors

GregorianCal

JulianCal

Instances

Eq CalendarOption

Defined in SwissEphemeris.Internal

Methods

(==) :: CalendarOption -> CalendarOption -> Bool

(/=) :: CalendarOption -> CalendarOption -> Bool

Show CalendarOption

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> CalendarOption -> ShowS

show :: CalendarOption -> String

showList :: [CalendarOption] -> ShowS

data EphemerisOption

Constructors

UseSwissEphemeris

UseJPLEphemeris

UseMoshierEphemeris

Instances

Eq EphemerisOption

Defined in SwissEphemeris.Internal

Methods

(==) :: EphemerisOption -> EphemerisOption -> Bool

(/=) :: EphemerisOption -> EphemerisOption -> Bool

Show EphemerisOption

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> EphemerisOption -> ShowS

show :: EphemerisOption -> String

showList :: [EphemerisOption] -> ShowS

data EventSearchDirection

When looking for eclipses, occulations or crossings, determine the temporal direction to take from the provided start time.

Constructors

SearchBackward

SearchForward

Instances

Eq EventSearchDirection

Defined in SwissEphemeris.Internal

Methods

(==) :: EventSearchDirection -> EventSearchDirection -> Bool

(/=) :: EventSearchDirection -> EventSearchDirection -> Bool

Show EventSearchDirection

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> EventSearchDirection -> ShowS

show :: EventSearchDirection -> String

showList :: [EventSearchDirection] -> ShowS

data SolarEclipseType

All possible types of solar eclipses.

Constructors

TotalSolarEclipse

AnnularEclipse

AnnularTotalEclipse

PartialSolarEclipse

Instances

Eq SolarEclipseType

Defined in SwissEphemeris.Internal

Methods

(==) :: SolarEclipseType -> SolarEclipseType -> Bool

(/=) :: SolarEclipseType -> SolarEclipseType -> Bool

Show SolarEclipseType

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> SolarEclipseType -> ShowS

show :: SolarEclipseType -> String

showList :: [SolarEclipseType] -> ShowS

data LunarEclipseType

All possible types of lunar eclipses.

Constructors

TotalLunarEclipse

PenumbralEclipse

PartialLunarEclipse

Instances

Eq LunarEclipseType

Defined in SwissEphemeris.Internal

Methods

(==) :: LunarEclipseType -> LunarEclipseType -> Bool

(/=) :: LunarEclipseType -> LunarEclipseType -> Bool

Show LunarEclipseType

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> LunarEclipseType -> ShowS

show :: LunarEclipseType -> String

showList :: [LunarEclipseType] -> ShowS

data PlanetMotion

Apparent motion of a planet, from a geocentric observation.

Constructors

RetrogradeMotion

DirectMotion

Instances

Eq PlanetMotion

Defined in SwissEphemeris.Internal

Methods

(==) :: PlanetMotion -> PlanetMotion -> Bool

(/=) :: PlanetMotion -> PlanetMotion -> Bool

Show PlanetMotion

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> PlanetMotion -> ShowS

show :: PlanetMotion -> String

showList :: [PlanetMotion] -> ShowS

data LunarPhaseName

Traditional western moon phases.

Constructors

NewMoon

WaxingCrescent

FirstQuarter

WaxingGibbous

FullMoon

WaningGibbous

LastQuarter

WaningCrescent

Instances

Eq LunarPhaseName

Defined in SwissEphemeris.Internal

Methods

(==) :: LunarPhaseName -> LunarPhaseName -> Bool

(/=) :: LunarPhaseName -> LunarPhaseName -> Bool

Ord LunarPhaseName

Defined in SwissEphemeris.Internal

Methods

compare :: LunarPhaseName -> LunarPhaseName -> Ordering

(<) :: LunarPhaseName -> LunarPhaseName -> Bool

(<=) :: LunarPhaseName -> LunarPhaseName -> Bool

(>) :: LunarPhaseName -> LunarPhaseName -> Bool

(>=) :: LunarPhaseName -> LunarPhaseName -> Bool

max :: LunarPhaseName -> LunarPhaseName -> LunarPhaseName

min :: LunarPhaseName -> LunarPhaseName -> LunarPhaseName

Show LunarPhaseName

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> LunarPhaseName -> ShowS

show :: LunarPhaseName -> String

showList :: [LunarPhaseName] -> ShowS

type HouseCusp = Double

The cusp of a given "house" or "sector". It is an ecliptic longitude. see: 14.1 House cusp calculation and 6.2 Astrological house systems

data EclipticPosition

Position data for a celestial body on the ecliptic, includes rotational speeds. see: 3.4 Position and speed

Constructors

EclipticPosition

Fields

• lng :: Double
• lat :: Double
• distance :: Double
• lngSpeed :: Double
• latSpeed :: Double
• distSpeed :: Double

Instances

Eq EclipticPosition

Defined in SwissEphemeris.Internal

Methods

(==) :: EclipticPosition -> EclipticPosition -> Bool

(/=) :: EclipticPosition -> EclipticPosition -> Bool

Show EclipticPosition

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> EclipticPosition -> ShowS

show :: EclipticPosition -> String

showList :: [EclipticPosition] -> ShowS

Generic EclipticPosition

Defined in SwissEphemeris.Internal

Associated Types

type Rep EclipticPosition :: Type -> Type

Methods

from :: EclipticPosition -> Rep EclipticPosition x

to :: Rep EclipticPosition x -> EclipticPosition

HasEclipticLongitude EclipticPosition

Defined in SwissEphemeris.Internal

Methods

getEclipticLongitude :: EclipticPosition -> Double

setEclipticLongitude :: EclipticPosition -> Double -> EclipticPosition

type Rep EclipticPosition

Defined in SwissEphemeris.Internal

type Rep EclipticPosition = D1 ('MetaData "EclipticPosition" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "EclipticPosition" 'PrefixI 'True) ((S1 ('MetaSel ('Just "lng") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: (S1 ('MetaSel ('Just "lat") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "distance") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))) :*: (S1 ('MetaSel ('Just "lngSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: (S1 ('MetaSel ('Just "latSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "distSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)))))

data GeographicPosition

Represents a point on Earth, with negative values for latitude meaning South, and negative values for longitude meaning West. No speed information is included (or needed,) because all calculations are geocentric.

Constructors

GeographicPosition

Fields

• geoLat :: Double
• geoLng :: Double

Instances

Eq GeographicPosition

Defined in SwissEphemeris.Internal

Methods

(==) :: GeographicPosition -> GeographicPosition -> Bool

(/=) :: GeographicPosition -> GeographicPosition -> Bool

Show GeographicPosition

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> GeographicPosition -> ShowS

show :: GeographicPosition -> String

showList :: [GeographicPosition] -> ShowS

Generic GeographicPosition

Defined in SwissEphemeris.Internal

Associated Types

type Rep GeographicPosition :: Type -> Type

Methods

from :: GeographicPosition -> Rep GeographicPosition x

to :: Rep GeographicPosition x -> GeographicPosition

type Rep GeographicPosition

Defined in SwissEphemeris.Internal

type Rep GeographicPosition = D1 ('MetaData "GeographicPosition" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "GeographicPosition" 'PrefixI 'True) (S1 ('MetaSel ('Just "geoLat") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "geoLng") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)))

data EquatorialPosition

Represents a position on the celestial sphere, with speed information included.

Constructors

EquatorialPosition

Fields

• rightAscension :: Double
• declination :: Double
• eqDistance :: Double
• ascensionSpeed :: Double
• declinationSpeed :: Double
• eqDistanceSpeed :: Double

Instances

Eq EquatorialPosition

Defined in SwissEphemeris.Internal

Methods

(==) :: EquatorialPosition -> EquatorialPosition -> Bool

(/=) :: EquatorialPosition -> EquatorialPosition -> Bool

Show EquatorialPosition

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> EquatorialPosition -> ShowS

show :: EquatorialPosition -> String

showList :: [EquatorialPosition] -> ShowS

Generic EquatorialPosition

Defined in SwissEphemeris.Internal

Associated Types

type Rep EquatorialPosition :: Type -> Type

Methods

from :: EquatorialPosition -> Rep EquatorialPosition x

to :: Rep EquatorialPosition x -> EquatorialPosition

type Rep EquatorialPosition

Defined in SwissEphemeris.Internal

type Rep EquatorialPosition = D1 ('MetaData "EquatorialPosition" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "EquatorialPosition" 'PrefixI 'True) ((S1 ('MetaSel ('Just "rightAscension") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: (S1 ('MetaSel ('Just "declination") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "eqDistance") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))) :*: (S1 ('MetaSel ('Just "ascensionSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: (S1 ('MetaSel ('Just "declinationSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "eqDistanceSpeed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)))))

data ObliquityInformation

Includes the obliquity of the ecliptic, the Nutation as longitude as well as mean values.

Constructors

ObliquityInformation

Fields

• eclipticObliquity :: Double
• eclipticMeanObliquity :: Double
• nutationLongitude :: Double
• nutationObliquity :: Double

Instances

Eq ObliquityInformation

Defined in SwissEphemeris.Internal

Methods

(==) :: ObliquityInformation -> ObliquityInformation -> Bool

(/=) :: ObliquityInformation -> ObliquityInformation -> Bool

Show ObliquityInformation

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> ObliquityInformation -> ShowS

show :: ObliquityInformation -> String

showList :: [ObliquityInformation] -> ShowS

Generic ObliquityInformation

Defined in SwissEphemeris.Internal

Associated Types

type Rep ObliquityInformation :: Type -> Type

Methods

from :: ObliquityInformation -> Rep ObliquityInformation x

to :: Rep ObliquityInformation x -> ObliquityInformation

type Rep ObliquityInformation

Defined in SwissEphemeris.Internal

type Rep ObliquityInformation = D1 ('MetaData "ObliquityInformation" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "ObliquityInformation" 'PrefixI 'True) ((S1 ('MetaSel ('Just "eclipticObliquity") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "eclipticMeanObliquity") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)) :*: (S1 ('MetaSel ('Just "nutationLongitude") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "nutationObliquity") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))))

data HousePosition

The house a celestial body is in.

Constructors

HousePosition

Fields

• houseNumber :: Int
• houseCuspDistance :: Double

Instances

Eq HousePosition

Defined in SwissEphemeris.Internal

Methods

(==) :: HousePosition -> HousePosition -> Bool

(/=) :: HousePosition -> HousePosition -> Bool

Show HousePosition

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> HousePosition -> ShowS

show :: HousePosition -> String

showList :: [HousePosition] -> ShowS

Generic HousePosition

Defined in SwissEphemeris.Internal

Associated Types

type Rep HousePosition :: Type -> Type

Methods

from :: HousePosition -> Rep HousePosition x

to :: Rep HousePosition x -> HousePosition

type Rep HousePosition

Defined in SwissEphemeris.Internal

type Rep HousePosition = D1 ('MetaData "HousePosition" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "HousePosition" 'PrefixI 'True) (S1 ('MetaSel ('Just "houseNumber") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "houseCuspDistance") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)))

data Angles

Relevant angles: ascendant and MC, plus other "exotic" ones: 14. House cusp calculation

Constructors

Angles

Fields

• ascendant :: Double
• mc :: Double
• armc :: Double
• vertex :: Double
• equatorialAscendant :: Double
• coAscendantKoch :: Double
• coAscendantMunkasey :: Double
• polarAscendant :: Double

Instances

Eq Angles

Defined in SwissEphemeris.Internal

Methods

(==) :: Angles -> Angles -> Bool

(/=) :: Angles -> Angles -> Bool

Show Angles

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> Angles -> ShowS

show :: Angles -> String

showList :: [Angles] -> ShowS

Generic Angles

Defined in SwissEphemeris.Internal

Associated Types

type Rep Angles :: Type -> Type

Methods

from :: Angles -> Rep Angles x

to :: Rep Angles x -> Angles

type Rep Angles

Defined in SwissEphemeris.Internal

type Rep Angles = D1 ('MetaData "Angles" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "Angles" 'PrefixI 'True) (((S1 ('MetaSel ('Just "ascendant") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "mc") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)) :*: (S1 ('MetaSel ('Just "armc") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "vertex") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))) :*: ((S1 ('MetaSel ('Just "equatorialAscendant") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "coAscendantKoch") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)) :*: (S1 ('MetaSel ('Just "coAscendantMunkasey") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "polarAscendant") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)))))

data CuspsCalculation

Result of calculating the cusps for a given event; will include a list of cusps (most systems use 12 cusps, Gauquelin uses 36.)

Constructors

CuspsCalculation

Fields

• houseCusps :: [HouseCusp]
• angles :: Angles
• systemUsed :: HouseSystem

Instances

Eq CuspsCalculation

Defined in SwissEphemeris.Internal

Methods

(==) :: CuspsCalculation -> CuspsCalculation -> Bool

(/=) :: CuspsCalculation -> CuspsCalculation -> Bool

Show CuspsCalculation

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> CuspsCalculation -> ShowS

show :: CuspsCalculation -> String

showList :: [CuspsCalculation] -> ShowS

Generic CuspsCalculation

Defined in SwissEphemeris.Internal

Associated Types

type Rep CuspsCalculation :: Type -> Type

Methods

from :: CuspsCalculation -> Rep CuspsCalculation x

to :: Rep CuspsCalculation x -> CuspsCalculation

type Rep CuspsCalculation

Defined in SwissEphemeris.Internal

type Rep CuspsCalculation = D1 ('MetaData "CuspsCalculation" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "CuspsCalculation" 'PrefixI 'True) (S1 ('MetaSel ('Just "houseCusps") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [HouseCusp]) :*: (S1 ('MetaSel ('Just "angles") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Angles) :*: S1 ('MetaSel ('Just "systemUsed") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 HouseSystem))))

data LongitudeComponents

A longitude expressed in its constituent parts.

Constructors

LongitudeComponents

Fields

• longitudeZodiacSign :: Maybe ZodiacSignName
• longitudeDegrees :: Integer
• longitudeMinutes :: Integer
• longitudeSeconds :: Integer
• longitudeSecondsFraction :: Double
• longitudeSignum :: Maybe Int
• longitudeNakshatra :: Maybe NakshatraName

Instances

Eq LongitudeComponents

Defined in SwissEphemeris.Internal

Methods

(==) :: LongitudeComponents -> LongitudeComponents -> Bool

(/=) :: LongitudeComponents -> LongitudeComponents -> Bool

Show LongitudeComponents

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> LongitudeComponents -> ShowS

show :: LongitudeComponents -> String

showList :: [LongitudeComponents] -> ShowS

Generic LongitudeComponents

Defined in SwissEphemeris.Internal

Associated Types

type Rep LongitudeComponents :: Type -> Type

Methods

from :: LongitudeComponents -> Rep LongitudeComponents x

to :: Rep LongitudeComponents x -> LongitudeComponents

type Rep LongitudeComponents

Defined in SwissEphemeris.Internal

type Rep LongitudeComponents = D1 ('MetaData "LongitudeComponents" "SwissEphemeris.Internal" "swiss-ephemeris-1.4.2.0-L04TftoLY8F1DiWYvjvWR6" 'False) (C1 ('MetaCons "LongitudeComponents" 'PrefixI 'True) ((S1 ('MetaSel ('Just "longitudeZodiacSign") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe ZodiacSignName)) :*: (S1 ('MetaSel ('Just "longitudeDegrees") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Integer) :*: S1 ('MetaSel ('Just "longitudeMinutes") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Integer))) :*: ((S1 ('MetaSel ('Just "longitudeSeconds") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Integer) :*: S1 ('MetaSel ('Just "longitudeSecondsFraction") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double)) :*: (S1 ('MetaSel ('Just "longitudeSignum") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: S1 ('MetaSel ('Just "longitudeNakshatra") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe NakshatraName))))))

data PlanetPhenomenon

A Planet's "phenomena" record

Constructors

PlanetPhenomenon

Fields

• planetPhaseAngle :: Double
• planetPhase :: Double
• planetElongation :: Double
• planetApparentDiameter :: Double
• planetApparentMagnitude :: Double

Instances

Eq PlanetPhenomenon

Defined in SwissEphemeris.Internal

Methods

(==) :: PlanetPhenomenon -> PlanetPhenomenon -> Bool

(/=) :: PlanetPhenomenon -> PlanetPhenomenon -> Bool

Show PlanetPhenomenon

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> PlanetPhenomenon -> ShowS

show :: PlanetPhenomenon -> String

showList :: [PlanetPhenomenon] -> ShowS

mkCalculationOptions :: [CalcFlag] -> CalcFlag

defaultCalculationOptions :: [CalcFlag]

defaultCalculationFlag :: CalcFlag

foldSplitDegOptions :: [SplitDegFlag] -> SplitDegFlag

splitOptionToFlag :: SplitDegreesOption -> SplitDegFlag

defaultSplitDegreesOptions :: [SplitDegreesOption]

Convenient defaults when using splitDegrees: Omit rounding if it would bring it over the next sign or degree.

solarEclipseTypeToFlag :: SolarEclipseType -> EclipseFlag

lunarEclipseTypeToFlag :: LunarEclipseType -> EclipseFlag

eclipseFlagToTypeSolar :: EclipseFlag -> Maybe SolarEclipseType

eclipseFlagToTypeLunar :: EclipseFlag -> Maybe LunarEclipseType

match :: EclipseFlag -> EclipseFlag -> Bool

Equivalent to flag & FLAG_VALUE in C.

foldEclipseOptions :: [EclipseFlag] -> EclipseFlag

defaultEclipseFlag :: EclipseFlag

totalSolarEclipseFlag :: EclipseFlag

annularSolarEclipseFlag :: EclipseFlag

hybridSolarEclipseFlag :: EclipseFlag

partialSolarEclipseFlag :: EclipseFlag

totalLunarEclipseFlag :: EclipseFlag

partialLunarEclipseFlag :: EclipseFlag

penumbralLunarEclipseFlag :: EclipseFlag

toHouseSystemFlag :: HouseSystem -> Int

coordinatesFromList :: [Double] -> EclipticPosition

eclipticFromList :: [Double] -> EclipticPosition

eclipticToList :: EclipticPosition -> [Double]

equatorialFromList :: [Double] -> EquatorialPosition

equatorialToList :: EquatorialPosition -> [Double]

obliquityNutationFromList :: [Double] -> ObliquityInformation

anglesFromList :: [Double] -> Angles

planetNumber :: Planet -> PlanetNumber

numberToPlanet :: PlanetNumber -> Planet

allocaErrorMessage :: (Ptr CChar -> IO b) -> IO b

As per the programmers manual, error output strings should accommodate at most 256 characters: see sweodef.h#266 and the manual: https://www.astro.com/swisseph/swephprg.htm in e.g.

calendarOptionToFlag :: CalendarOption -> GregFlag

ephemerisOptionToFlag :: EphemerisOption -> EpheFlag

moonPhaseToAngle :: LunarPhaseName -> Double