SwissEphemeris.Internal

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

Documentation

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

type Rep Planet

Defined in SwissEphemeris.Internal

type Rep Planet = D1 ('MetaData "Planet" "SwissEphemeris.Internal" "swiss-ephemeris-1.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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))))

newtype JulianTime

Represents an instant in Julian time. see: 8. Date and time conversion functions also cf. julianDay

Constructors

JulianTime

Fields

• unJulianTime :: Double

Instances

Eq JulianTime

Defined in SwissEphemeris.Internal

Methods

(==) :: JulianTime -> JulianTime -> Bool

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

Ord JulianTime

Defined in SwissEphemeris.Internal

Methods

compare :: JulianTime -> JulianTime -> Ordering

(<) :: JulianTime -> JulianTime -> Bool

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

(>) :: JulianTime -> JulianTime -> Bool

(>=) :: JulianTime -> JulianTime -> Bool

max :: JulianTime -> JulianTime -> JulianTime

min :: JulianTime -> JulianTime -> JulianTime

Show JulianTime

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> JulianTime -> ShowS

show :: JulianTime -> String

showList :: [JulianTime] -> ShowS

newtype SiderealTime

Represents an instant in sidereal time

Constructors

SiderealTime

Fields

• unSiderealTime :: Double

Instances

Eq SiderealTime

Defined in SwissEphemeris.Internal

Methods

(==) :: SiderealTime -> SiderealTime -> Bool

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

Ord SiderealTime

Defined in SwissEphemeris.Internal

Methods

compare :: SiderealTime -> SiderealTime -> Ordering

(<) :: SiderealTime -> SiderealTime -> Bool

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

(>) :: SiderealTime -> SiderealTime -> Bool

(>=) :: SiderealTime -> SiderealTime -> Bool

max :: SiderealTime -> SiderealTime -> SiderealTime

min :: SiderealTime -> SiderealTime -> SiderealTime

Show SiderealTime

Defined in SwissEphemeris.Internal

Methods

showsPrec :: Int -> SiderealTime -> ShowS

show :: SiderealTime -> String

showList :: [SiderealTime] -> 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

type Rep EclipticPosition

Defined in SwissEphemeris.Internal

type Rep EclipticPosition = D1 ('MetaData "EclipticPosition" "SwissEphemeris.Internal" "swiss-ephemeris-1.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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.2.1.1-99WGKB5wR11Akm10wzfMqP" '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))))))

mkCalculationOptions :: [CalcFlag] -> CalcFlag

defaultCalculationOptions :: [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.

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