module TravelData
    (ClimbDirection(..)) where

data ClimbDirection = ClimbUp | ClimbDown
    deriving (Read,Show)