Safe Haskell	None
Language	Haskell2010

Data.Thyme.Calendar

Contents

Days
Gregorian calendar
Lenses
Orphan instances

Description

UTCTime is not Y294K-compliant, and Bounded instances for the various calendar types reflect this fact. That said, the calendar calculations by themselves work perfectly fine for a wider range of dates, subject to the size of Int for your platform.

Synopsis

Documentation

type Years = Int Source #

type Months = Int Source #

type Days = Int Source #

Days

newtype Day Source #

The Modified Julian Day is a standard count of days, with zero being the day 1858-11-17.

Constructors

ModifiedJulianDay
Fields toModifiedJulianDay :: Int

Instances

Enum Day Source #
Methods succ :: Day -> Day # pred :: Day -> Day # toEnum :: Int -> Day # fromEnum :: Day -> Int # enumFrom :: Day -> [Day] # enumFromThen :: Day -> Day -> [Day] # enumFromTo :: Day -> Day -> [Day] # enumFromThenTo :: Day -> Day -> Day -> [Day] #
Eq Day Source #
Methods (==) :: Day -> Day -> Bool # (/=) :: Day -> Day -> Bool #
Data Day Source #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Day -> c Day # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Day # toConstr :: Day -> Constr # dataTypeOf :: Day -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c Day) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Day) # gmapT :: (forall b. Data b => b -> b) -> Day -> Day # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Day -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Day -> r # gmapQ :: (forall d. Data d => d -> u) -> Day -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Day -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Day -> m Day # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Day -> m Day # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Day -> m Day #
Ord Day Source #
Methods compare :: Day -> Day -> Ordering # (<) :: Day -> Day -> Bool # (<=) :: Day -> Day -> Bool # (>) :: Day -> Day -> Bool # (>=) :: Day -> Day -> Bool # max :: Day -> Day -> Day # min :: Day -> Day -> Day #
Show Day Source #
Methods showsPrec :: Int -> Day -> ShowS # show :: Day -> String # showList :: [Day] -> ShowS #
Ix Day Source #
Methods range :: (Day, Day) -> [Day] # index :: (Day, Day) -> Day -> Int # unsafeIndex :: (Day, Day) -> Day -> Int inRange :: (Day, Day) -> Day -> Bool # rangeSize :: (Day, Day) -> Int # unsafeRangeSize :: (Day, Day) -> Int
Generic Day Source #
Associated Types type Rep Day :: * -> * # Methods from :: Day -> Rep Day x # to :: Rep Day x -> Day #
CoArbitrary Day Source #
Methods coarbitrary :: Day -> Gen b -> Gen b #
NFData Day Source #
Methods rnf :: Day -> () #
Unbox Day Source #

AffineSpace Day Source #
Associated Types type Diff Day :: * # Methods (.-.) :: Day -> Day -> Diff Day # (.+^) :: Day -> Diff Day -> Day #
ParseTime Day Source #
Methods buildTime :: TimeParse -> Day Source #
FormatTime Day Source #
Methods showsTime :: TimeLocale -> Day -> (Char -> ShowS) -> Char -> ShowS Source #
Vector Vector Day Source #
Methods basicUnsafeFreeze :: PrimMonad m => Mutable Vector (PrimState m) Day -> m (Vector Day) # basicUnsafeThaw :: PrimMonad m => Vector Day -> m (Mutable Vector (PrimState m) Day) # basicLength :: Vector Day -> Int # basicUnsafeSlice :: Int -> Int -> Vector Day -> Vector Day # basicUnsafeIndexM :: Monad m => Vector Day -> Int -> m Day # basicUnsafeCopy :: PrimMonad m => Mutable Vector (PrimState m) Day -> Vector Day -> m () # elemseq :: Vector Day -> Day -> b -> b #
MVector MVector Day Source #
Methods basicLength :: MVector s Day -> Int # basicUnsafeSlice :: Int -> Int -> MVector s Day -> MVector s Day # basicOverlaps :: MVector s Day -> MVector s Day -> Bool # basicUnsafeNew :: PrimMonad m => Int -> m (MVector (PrimState m) Day) # basicInitialize :: PrimMonad m => MVector (PrimState m) Day -> m () # basicUnsafeReplicate :: PrimMonad m => Int -> Day -> m (MVector (PrimState m) Day) # basicUnsafeRead :: PrimMonad m => MVector (PrimState m) Day -> Int -> m Day # basicUnsafeWrite :: PrimMonad m => MVector (PrimState m) Day -> Int -> Day -> m () # basicClear :: PrimMonad m => MVector (PrimState m) Day -> m () # basicSet :: PrimMonad m => MVector (PrimState m) Day -> Day -> m () # basicUnsafeCopy :: PrimMonad m => MVector (PrimState m) Day -> MVector (PrimState m) Day -> m () # basicUnsafeMove :: PrimMonad m => MVector (PrimState m) Day -> MVector (PrimState m) Day -> m () # basicUnsafeGrow :: PrimMonad m => MVector (PrimState m) Day -> Int -> m (MVector (PrimState m) Day) #
Thyme Day Day Source #
Methods thyme :: Iso' Day Day Source #
type Rep Day Source #
type Rep Day = D1 * (MetaData "Day" "Data.Thyme.Calendar.Internal" "thyme-0.3.5.5-J1ErmNbLmoGE4Ys0FAccE5" True) (C1 * (MetaCons "ModifiedJulianDay" PrefixI True) (S1 * (MetaSel (Just Symbol "toModifiedJulianDay") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)))
data Vector Day Source #
data Vector Day = V_Day (Vector Int)
type Diff Day Source #
type Diff Day = Days
data MVector s Day Source #
data MVector s Day = MV_Day (MVector s Int)

modifiedJulianDay :: Iso' Day Int Source #

Gregorian calendar

type Year = Int Source #

type Month = Int Source #

type DayOfMonth = Int Source #

data YearMonthDay Source #

Constructors

YearMonthDay
Fields ymdYear :: !Year ymdMonth :: !Month ymdDay :: !DayOfMonth

Instances

Eq YearMonthDay Source #
Methods (==) :: YearMonthDay -> YearMonthDay -> Bool # (/=) :: YearMonthDay -> YearMonthDay -> Bool #
Data YearMonthDay Source #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> YearMonthDay -> c YearMonthDay # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c YearMonthDay # toConstr :: YearMonthDay -> Constr # dataTypeOf :: YearMonthDay -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c YearMonthDay) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c YearMonthDay) # gmapT :: (forall b. Data b => b -> b) -> YearMonthDay -> YearMonthDay # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> YearMonthDay -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> YearMonthDay -> r # gmapQ :: (forall d. Data d => d -> u) -> YearMonthDay -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> YearMonthDay -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> YearMonthDay -> m YearMonthDay # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> YearMonthDay -> m YearMonthDay # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> YearMonthDay -> m YearMonthDay #
Ord YearMonthDay Source #
Methods compare :: YearMonthDay -> YearMonthDay -> Ordering # (<) :: YearMonthDay -> YearMonthDay -> Bool # (<=) :: YearMonthDay -> YearMonthDay -> Bool # (>) :: YearMonthDay -> YearMonthDay -> Bool # (>=) :: YearMonthDay -> YearMonthDay -> Bool # max :: YearMonthDay -> YearMonthDay -> YearMonthDay # min :: YearMonthDay -> YearMonthDay -> YearMonthDay #
Show YearMonthDay Source #
Methods showsPrec :: Int -> YearMonthDay -> ShowS # show :: YearMonthDay -> String # showList :: [YearMonthDay] -> ShowS #
Generic YearMonthDay Source #
Associated Types type Rep YearMonthDay :: * -> * # Methods from :: YearMonthDay -> Rep YearMonthDay x # to :: Rep YearMonthDay x -> YearMonthDay #
NFData YearMonthDay Source #
Methods rnf :: YearMonthDay -> () #
Unbox YearMonthDay Source #

ParseTime YearMonthDay Source #
Methods buildTime :: TimeParse -> YearMonthDay Source #
FormatTime YearMonthDay Source #
Methods showsTime :: TimeLocale -> YearMonthDay -> (Char -> ShowS) -> Char -> ShowS Source #
Vector Vector YearMonthDay Source #
Methods basicUnsafeFreeze :: PrimMonad m => Mutable Vector (PrimState m) YearMonthDay -> m (Vector YearMonthDay) # basicUnsafeThaw :: PrimMonad m => Vector YearMonthDay -> m (Mutable Vector (PrimState m) YearMonthDay) # basicLength :: Vector YearMonthDay -> Int # basicUnsafeSlice :: Int -> Int -> Vector YearMonthDay -> Vector YearMonthDay # basicUnsafeIndexM :: Monad m => Vector YearMonthDay -> Int -> m YearMonthDay # basicUnsafeCopy :: PrimMonad m => Mutable Vector (PrimState m) YearMonthDay -> Vector YearMonthDay -> m () # elemseq :: Vector YearMonthDay -> YearMonthDay -> b -> b #
MVector MVector YearMonthDay Source #
Methods basicLength :: MVector s YearMonthDay -> Int # basicUnsafeSlice :: Int -> Int -> MVector s YearMonthDay -> MVector s YearMonthDay # basicOverlaps :: MVector s YearMonthDay -> MVector s YearMonthDay -> Bool # basicUnsafeNew :: PrimMonad m => Int -> m (MVector (PrimState m) YearMonthDay) # basicInitialize :: PrimMonad m => MVector (PrimState m) YearMonthDay -> m () # basicUnsafeReplicate :: PrimMonad m => Int -> YearMonthDay -> m (MVector (PrimState m) YearMonthDay) # basicUnsafeRead :: PrimMonad m => MVector (PrimState m) YearMonthDay -> Int -> m YearMonthDay # basicUnsafeWrite :: PrimMonad m => MVector (PrimState m) YearMonthDay -> Int -> YearMonthDay -> m () # basicClear :: PrimMonad m => MVector (PrimState m) YearMonthDay -> m () # basicSet :: PrimMonad m => MVector (PrimState m) YearMonthDay -> YearMonthDay -> m () # basicUnsafeCopy :: PrimMonad m => MVector (PrimState m) YearMonthDay -> MVector (PrimState m) YearMonthDay -> m () # basicUnsafeMove :: PrimMonad m => MVector (PrimState m) YearMonthDay -> MVector (PrimState m) YearMonthDay -> m () # basicUnsafeGrow :: PrimMonad m => MVector (PrimState m) YearMonthDay -> Int -> m (MVector (PrimState m) YearMonthDay) #
type Rep YearMonthDay Source #
type Rep YearMonthDay = D1 * (MetaData "YearMonthDay" "Data.Thyme.Calendar.Internal" "thyme-0.3.5.5-J1ErmNbLmoGE4Ys0FAccE5" False) (C1 * (MetaCons "YearMonthDay" PrefixI True) ((::) (S1 * (MetaSel (Just Symbol "ymdYear") SourceUnpack SourceStrict DecidedStrict) (Rec0 * Year)) ((::) (S1 * (MetaSel (Just Symbol "ymdMonth") SourceUnpack SourceStrict DecidedStrict) (Rec0 * Month)) (S1 * (MetaSel (Just Symbol "ymdDay") SourceUnpack SourceStrict DecidedStrict) (Rec0 * DayOfMonth)))))
data Vector YearMonthDay Source #
data Vector YearMonthDay = V_YearMonthDay (Vector Int)
data MVector s YearMonthDay Source #
data MVector s YearMonthDay = MV_YearMonthDay (MVector s Int)

isLeapYear :: Year -> Bool Source #

Gregorian leap year?

yearMonthDay :: Iso' OrdinalDate YearMonthDay Source #

gregorian :: Iso' Day YearMonthDay Source #

gregorianValid :: YearMonthDay -> Maybe Day Source #

showGregorian :: Day -> String Source #

gregorianMonthLength :: Year -> Month -> Days Source #

gregorianMonthsClip :: Months -> YearMonthDay -> YearMonthDay Source #

gregorianMonthsRollover :: Months -> YearMonthDay -> YearMonthDay Source #

gregorianYearsClip :: Years -> YearMonthDay -> YearMonthDay Source #

gregorianYearsRollover :: Years -> YearMonthDay -> YearMonthDay Source #

Lenses

_ymdYear :: Lens' YearMonthDay Year Source #

_ymdMonth :: Lens' YearMonthDay Month Source #

_ymdDay :: Lens' YearMonthDay DayOfMonth Source #

Orphan instances

Bounded YearMonthDay Source #
Methods minBound :: YearMonthDay # maxBound :: YearMonthDay #
Bounded Day Source #
Methods minBound :: Day # maxBound :: Day #
Arbitrary YearMonthDay Source #
Methods arbitrary :: Gen YearMonthDay # shrink :: YearMonthDay -> [YearMonthDay] #
Arbitrary Day Source #
Methods arbitrary :: Gen Day # shrink :: Day -> [Day] #
CoArbitrary YearMonthDay Source #
Methods coarbitrary :: YearMonthDay -> Gen b -> Gen b #
Random YearMonthDay Source #
Methods randomR :: RandomGen g => (YearMonthDay, YearMonthDay) -> g -> (YearMonthDay, g) # random :: RandomGen g => g -> (YearMonthDay, g) # randomRs :: RandomGen g => (YearMonthDay, YearMonthDay) -> g -> [YearMonthDay] # randoms :: RandomGen g => g -> [YearMonthDay] # randomRIO :: (YearMonthDay, YearMonthDay) -> IO YearMonthDay # randomIO :: IO YearMonthDay #
Random Day Source #
Methods randomR :: RandomGen g => (Day, Day) -> g -> (Day, g) # random :: RandomGen g => g -> (Day, g) # randomRs :: RandomGen g => (Day, Day) -> g -> [Day] # randoms :: RandomGen g => g -> [Day] # randomRIO :: (Day, Day) -> IO Day # randomIO :: IO Day #