Skip to content

Commit

Permalink
comments
Browse files Browse the repository at this point in the history
  • Loading branch information
glguy committed Dec 19, 2023
1 parent 56c2640 commit eb0d5ab
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion solutions/src/2023/19.hs
Original file line number Diff line number Diff line change
Expand Up @@ -41,11 +41,12 @@ import Data.Map qualified as Map

-- | A part is a quadruple of parameters indexed by 'V'
data Part a = Part a a a a
deriving (Functor, Foldable, Traversable)
deriving (Functor, Foldable, Traversable, Show)

-- | 'V' is an index into a field of a 'Part'
data V = Vx | Vm | Va | Vs

-- | Less-than and greater-than comparison operators for the workflow rules.
data O = O_LT | O_GT

-- | 'Ints' is a range of 'Int' with an inclusive lower bound and exclusive upper bound.
Expand Down

0 comments on commit eb0d5ab

Please sign in to comment.