Copyright | Alexander Ignatyev 2016 |
---|---|
Safe Haskell | Safe |
Language | Haskell2010 |
Data.Astro.Time.Sidereal
Description
According to the Sidereal Clock any observed star returns to the same position in the sky every 24 hours.
Each sidereal day is shorter than the solar day, 24 hours of sidereal time corresponding to 23:56:04.0916 of solar time.
Synopsis
- data GreenwichSiderealTime
- data LocalSiderealTime
- dhToGST :: DecimalHours -> GreenwichSiderealTime
- dhToLST :: DecimalHours -> LocalSiderealTime
- gstToDH :: GreenwichSiderealTime -> DecimalHours
- lstToDH :: LocalSiderealTime -> DecimalHours
- hmsToGST :: Int -> Int -> TimeBaseType -> GreenwichSiderealTime
- hmsToLST :: Int -> Int -> TimeBaseType -> LocalSiderealTime
- utToGST :: JulianDate -> GreenwichSiderealTime
- gstToUT :: JulianDate -> GreenwichSiderealTime -> JulianDate
- gstToLST :: DecimalDegrees -> GreenwichSiderealTime -> LocalSiderealTime
- lstToGST :: DecimalDegrees -> LocalSiderealTime -> GreenwichSiderealTime
- lstToGSTwDC :: DecimalDegrees -> LocalSiderealTime -> GreenwichSiderealTime
Documentation
data GreenwichSiderealTime Source #
Greenwich Sidereal Time GST can be in range [-12h, 36h] carrying out a day correction
Instances
Eq GreenwichSiderealTime Source # | |
Defined in Data.Astro.Time.Sidereal Methods (==) :: GreenwichSiderealTime -> GreenwichSiderealTime -> Bool # (/=) :: GreenwichSiderealTime -> GreenwichSiderealTime -> Bool # | |
Show GreenwichSiderealTime Source # | |
Defined in Data.Astro.Time.Sidereal Methods showsPrec :: Int -> GreenwichSiderealTime -> ShowS # show :: GreenwichSiderealTime -> String # showList :: [GreenwichSiderealTime] -> ShowS # |
data LocalSiderealTime Source #
Local Sidereal Time
Instances
Eq LocalSiderealTime Source # | |
Defined in Data.Astro.Time.Sidereal Methods (==) :: LocalSiderealTime -> LocalSiderealTime -> Bool # (/=) :: LocalSiderealTime -> LocalSiderealTime -> Bool # | |
Show LocalSiderealTime Source # | |
Defined in Data.Astro.Time.Sidereal Methods showsPrec :: Int -> LocalSiderealTime -> ShowS # show :: LocalSiderealTime -> String # showList :: [LocalSiderealTime] -> ShowS # |
dhToGST :: DecimalHours -> GreenwichSiderealTime Source #
Convert Decimal Hours to Greenwich Sidereal Time
dhToLST :: DecimalHours -> LocalSiderealTime Source #
Convert Decimal Hours to Local Sidereal Time
gstToDH :: GreenwichSiderealTime -> DecimalHours Source #
Convert Greenwich Sidereal Time to Decimal Hours
lstToDH :: LocalSiderealTime -> DecimalHours Source #
Convert Local Sidereal Time to Decimal Hours
hmsToGST :: Int -> Int -> TimeBaseType -> GreenwichSiderealTime Source #
Comvert Hours, Minutes, Seconds to Greenwich Sidereal Time
hmsToLST :: Int -> Int -> TimeBaseType -> LocalSiderealTime Source #
Comvert Hours, Minutes, Seconds to Local Sidereal Time
utToGST :: JulianDate -> GreenwichSiderealTime Source #
Convert from Universal Time (UT) to Greenwich Sidereal Time (GST)
gstToUT :: JulianDate -> GreenwichSiderealTime -> JulianDate Source #
Convert from Greenwich Sidereal Time (GST) to Universal Time (UT). It takes GST and Greenwich Date, returns JulianDate. Because the sidereal day is shorter than the solar day (see comment to the module). In case of such ambiguity the early time will be returned. You can easily check the ambiguity: if time is equal or less 00:03:56 you can get the second time by adding 23:56:04
gstToLST :: DecimalDegrees -> GreenwichSiderealTime -> LocalSiderealTime Source #
Convert Greenwich Sidereal Time to Local Sidereal Time. It takes GST and longitude in decimal degrees
lstToGST :: DecimalDegrees -> LocalSiderealTime -> GreenwichSiderealTime Source #
Convert Local Sidereal Time to Greenwich Sidereal Time It takes LST and longitude in decimal degrees
lstToGSTwDC :: DecimalDegrees -> LocalSiderealTime -> GreenwichSiderealTime Source #
Convert Local Sidereal Time to Greenwich Sidereal Time with Day Correction. It takes LST and longitude in decimal degrees