Data.Astro.Types

Common Types are usfull across all subsystems like Time and Coordinate.

Examples

Decimal hours and Decimal degrees

import Data.Astro.Types

-- 10h 15m 19.7s
dh :: DecimalHours
dh = fromHMS 10 15 19.7
-- DH 10.255472222222222

(h, m, s) = toHMS dh
-- (10,15,19.699999999999562)


-- 51°28′40″
dd :: DecimalDegrees
dd = fromDMS 51 28 40
-- DD 51.477777777777774

(d, m, s) = toDMS dd
-- (51,28,39.999999999987494)

Geographic Coordinates

import Data.Astro.Types

-- the Royal Observatory, Greenwich
ro :: GeographicCoordinates
ro = GeoC (fromDMS 51 28 40) (-(fromDMS 0 0 5))
-- GeoC {geoLatitude = DD 51.4778, geoLongitude = DD (-0.0014)}

Documentation

newtype DecimalDegrees

Constructors

DD Double

Instances

Eq DecimalDegrees

Methods

(==) :: DecimalDegrees -> DecimalDegrees -> Bool

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

Fractional DecimalDegrees

Methods

(/) :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

recip :: DecimalDegrees -> DecimalDegrees

fromRational :: Rational -> DecimalDegrees

Num DecimalDegrees

Methods

(+) :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

(-) :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

(*) :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

negate :: DecimalDegrees -> DecimalDegrees

abs :: DecimalDegrees -> DecimalDegrees

signum :: DecimalDegrees -> DecimalDegrees

fromInteger :: Integer -> DecimalDegrees

Ord DecimalDegrees

Methods

compare :: DecimalDegrees -> DecimalDegrees -> Ordering

(<) :: DecimalDegrees -> DecimalDegrees -> Bool

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

(>) :: DecimalDegrees -> DecimalDegrees -> Bool

(>=) :: DecimalDegrees -> DecimalDegrees -> Bool

max :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

min :: DecimalDegrees -> DecimalDegrees -> DecimalDegrees

Real DecimalDegrees

Methods

toRational :: DecimalDegrees -> Rational

RealFrac DecimalDegrees

Methods

properFraction :: Integral b => DecimalDegrees -> (b, DecimalDegrees)

truncate :: Integral b => DecimalDegrees -> b

round :: Integral b => DecimalDegrees -> b

ceiling :: Integral b => DecimalDegrees -> b

floor :: Integral b => DecimalDegrees -> b

Show DecimalDegrees

Methods

showsPrec :: Int -> DecimalDegrees -> ShowS

show :: DecimalDegrees -> String

showList :: [DecimalDegrees] -> ShowS

newtype DecimalHours

Constructors

DH Double

Instances

Eq DecimalHours

Methods

(==) :: DecimalHours -> DecimalHours -> Bool

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

Fractional DecimalHours

Methods

(/) :: DecimalHours -> DecimalHours -> DecimalHours

recip :: DecimalHours -> DecimalHours

fromRational :: Rational -> DecimalHours

Num DecimalHours

Methods

(+) :: DecimalHours -> DecimalHours -> DecimalHours

(-) :: DecimalHours -> DecimalHours -> DecimalHours

(*) :: DecimalHours -> DecimalHours -> DecimalHours

negate :: DecimalHours -> DecimalHours

abs :: DecimalHours -> DecimalHours

signum :: DecimalHours -> DecimalHours

fromInteger :: Integer -> DecimalHours

Ord DecimalHours

Methods

compare :: DecimalHours -> DecimalHours -> Ordering

(<) :: DecimalHours -> DecimalHours -> Bool

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

(>) :: DecimalHours -> DecimalHours -> Bool

(>=) :: DecimalHours -> DecimalHours -> Bool

max :: DecimalHours -> DecimalHours -> DecimalHours

min :: DecimalHours -> DecimalHours -> DecimalHours

Real DecimalHours

Methods

toRational :: DecimalHours -> Rational

RealFrac DecimalHours

Methods

properFraction :: Integral b => DecimalHours -> (b, DecimalHours)

truncate :: Integral b => DecimalHours -> b

round :: Integral b => DecimalHours -> b

ceiling :: Integral b => DecimalHours -> b

floor :: Integral b => DecimalHours -> b

Show DecimalHours

Methods

showsPrec :: Int -> DecimalHours -> ShowS

show :: DecimalHours -> String

showList :: [DecimalHours] -> ShowS

data GeographicCoordinates

Geographic Coordinates

Constructors

GeoC

Fields

• geoLatitude :: DecimalDegrees
• geoLongitude :: DecimalDegrees

Instances

Eq GeographicCoordinates

Methods

(==) :: GeographicCoordinates -> GeographicCoordinates -> Bool

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

Show GeographicCoordinates

Methods

showsPrec :: Int -> GeographicCoordinates -> ShowS

show :: GeographicCoordinates -> String

showList :: [GeographicCoordinates] -> ShowS

newtype AstronomicalUnits

Astronomical Units, 1AU = 1.4960×1011 m (originally, the average distance of Earth's aphelion and perihelion).

Constructors

AU Double

Instances

Eq AstronomicalUnits

Methods

(==) :: AstronomicalUnits -> AstronomicalUnits -> Bool

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

Fractional AstronomicalUnits

Methods

(/) :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

recip :: AstronomicalUnits -> AstronomicalUnits

fromRational :: Rational -> AstronomicalUnits

Num AstronomicalUnits

Methods

(+) :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

(-) :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

(*) :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

negate :: AstronomicalUnits -> AstronomicalUnits

abs :: AstronomicalUnits -> AstronomicalUnits

signum :: AstronomicalUnits -> AstronomicalUnits

fromInteger :: Integer -> AstronomicalUnits

Ord AstronomicalUnits

Methods

compare :: AstronomicalUnits -> AstronomicalUnits -> Ordering

(<) :: AstronomicalUnits -> AstronomicalUnits -> Bool

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

(>) :: AstronomicalUnits -> AstronomicalUnits -> Bool

(>=) :: AstronomicalUnits -> AstronomicalUnits -> Bool

max :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

min :: AstronomicalUnits -> AstronomicalUnits -> AstronomicalUnits

Real AstronomicalUnits

Methods

toRational :: AstronomicalUnits -> Rational

RealFrac AstronomicalUnits

Methods

properFraction :: Integral b => AstronomicalUnits -> (b, AstronomicalUnits)

truncate :: Integral b => AstronomicalUnits -> b

round :: Integral b => AstronomicalUnits -> b

ceiling :: Integral b => AstronomicalUnits -> b

floor :: Integral b => AstronomicalUnits -> b

Show AstronomicalUnits

Methods

showsPrec :: Int -> AstronomicalUnits -> ShowS

show :: AstronomicalUnits -> String

showList :: [AstronomicalUnits] -> ShowS

lightTravelTime :: AstronomicalUnits -> DecimalHours

Light travel time of the distance in Astronomical Units

kmToAU :: Double -> AstronomicalUnits

Convert from kilometers to Astronomical Units

auToKM :: AstronomicalUnits -> Double

Comvert from Astronomical Units to kilometers

toDecimalHours :: DecimalDegrees -> DecimalHours

Convert decimal degrees to decimal hours

fromDecimalHours :: DecimalHours -> DecimalDegrees

Convert decimal hours to decimal degrees

toRadians :: DecimalDegrees -> Double

Convert from DecimalDegrees to Radians

fromRadians :: Double -> DecimalDegrees

Convert from Radians to DecimalDegrees

fromDMS :: RealFrac a => Int -> Int -> a -> DecimalDegrees

Convert Degrees, Minutes, Seconds to DecimalDegrees

toDMS :: (Integral t, Integral t1) => DecimalDegrees -> (t1, t, Double)

Convert DecimalDegrees to Degrees, Minutes, Seconds

fromHMS :: RealFrac a => Int -> Int -> a -> DecimalHours

Comvert Hours, Minutes, Seconds to DecimalHours

toHMS :: (Integral t, Integral t1) => DecimalHours -> (t1, t, Double)

Convert DecimalDegrees to Degrees, Minutes, Seconds