{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}

module Data.Time.Calendar.Instances
  (
  ) where

import ClassyPrelude

import Data.Time.Calendar

import Data.Universe


deriving newtype instance Hashable Day

deriving instance Ord DayOfWeek
instance Universe DayOfWeek where
  universe = [Monday .. Sunday]
instance Finite DayOfWeek
