Chars.hs

module UI.Chars where

import Data.Char

verticalLine :: Char
verticalLine = chr 0x2502

horizontalLine :: Char
horizontalLine = chr 0x2500

cornerLT :: Char
cornerLT = chr 0x250c

cornerRT :: Char
cornerRT = chr 0x2510

cornerRB :: Char
cornerRB = chr 0x2518

cornerLB :: Char
cornerLB = chr 0x2514

verticalLeft :: Char
verticalLeft = chr 0x251C

verticalRight :: Char
verticalRight = chr 0x2524