module Data.JLD.Model.Direction (Direction (..)) where

import Data.JLD.Prelude

import Text.Show (Show (..))

data Direction = LTR | RTL | NoDirection
    deriving (Eq, Ord)

instance Show Direction where
    show LTR = "ltr"
    show RTL = "rtl"
    show NoDirection = "none"