BetaCalendars.GridAlgebra.Grid

data GridMode

Natural height or a fixed six-week calendar surface.

Constructors

• NaturalRows
• FixedSixWeeks

Instances

• Eq GridMode

data AdjacentPolicy

Whether dates outside the displayed month are rendered in spare cells.

Constructors

• EmptyAdjacent
• IncludeAdjacent

Instances

• Eq AdjacentPolicy

data CellRelation

The relationship of a cell's date to the displayed month.

Constructors

• PreviousMonth
• CurrentMonth
• NextMonth
• EmptyCell

Instances

• Eq CellRelation

type GridCell = { date :: Maybe CivilDate, index :: Int, relation :: CellRelation }

One row-major cell in a month grid.

type MonthTopology = { days :: Int, firstWeekday :: Weekday, fixedCells :: Int, lastWeekday :: Weekday, leadingCells :: Int, month :: Month, naturalRows :: Int, trailingCells :: Int, year :: Year }

Structural facts about one month under one week origin.

newtype TopologySignature

Descriptive signature of a month's shape under a selected week origin. This package-specific tuple is useful for comparing shapes; it is not an external calendar standard.

Instances

• Eq TopologySignature

topologySignature :: MonthTopology -> WeekStart -> TopologySignature

Create this package's descriptive topology tuple.

type MonthGrid = { adjacentPolicy :: AdjacentPolicy, cells :: Array GridCell, columns :: Int, mode :: GridMode, month :: Month, rows :: Int, topology :: MonthTopology, weekStart :: WeekStart, year :: Year }

A complete dated month surface.

monthTopology :: Year -> Month -> WeekStart -> MonthTopology

Compute month topology without allocating its cells.

monthGrid :: Year -> Month -> WeekStart -> GridMode -> AdjacentPolicy -> MonthGrid

Build a row-major month grid for a validated year and month.

currentMonthDays :: MonthGrid -> Int

The number of current-month cells in a grid.