1 files changed, 13 insertions, 0 deletions

diff --git a/src/Data/JLD/Model/Direction.hs b/src/Data/JLD/Model/Direction.hs
new file mode 100644
index 0000000..2ed8e87
--- /dev/null
+++ b/src/Data/JLD/Model/Direction.hs
@@ -0,0 +1,13 @@
+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"