module Text.Layout.Table.LineStyle
(
LineStyle(..)
, makeLineBold
, makeLineLight
, makeLineDashed
, makeLineSolid
, asciiHorizontal
, asciiVertical
, asciiJoinString
, asciiJoinString4
, roundedAsciiJoinString
, roundedAsciiJoinString4
, unicodeHorizontal
, unicodeVertical
, unicodeJoinString
, unicodeJoinString4
) where
import Data.Default.Class
data LineStyle
= NoLine
| SingleLine
| HeavyLine
| DoubleLine
| DashLine
| HeavyDashLine
| Dash4Line
| HeavyDash4Line
| Dash2Line
| HeavyDash2Line
deriving (LineStyle -> LineStyle -> Bool
(LineStyle -> LineStyle -> Bool)
-> (LineStyle -> LineStyle -> Bool) -> Eq LineStyle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LineStyle -> LineStyle -> Bool
$c/= :: LineStyle -> LineStyle -> Bool
== :: LineStyle -> LineStyle -> Bool
$c== :: LineStyle -> LineStyle -> Bool
Eq)
instance Default LineStyle where
def :: LineStyle
def = LineStyle
SingleLine
makeLineBold :: LineStyle -> LineStyle
makeLineBold :: LineStyle -> LineStyle
makeLineBold LineStyle
SingleLine = LineStyle
HeavyLine
makeLineBold LineStyle
DashLine = LineStyle
HeavyDashLine
makeLineBold LineStyle
Dash4Line = LineStyle
HeavyDash4Line
makeLineBold LineStyle
Dash2Line = LineStyle
HeavyDash2Line
makeLineBold LineStyle
x = LineStyle
x
makeLineLight :: LineStyle -> LineStyle
makeLineLight :: LineStyle -> LineStyle
makeLineLight LineStyle
HeavyLine = LineStyle
SingleLine
makeLineLight LineStyle
HeavyDashLine = LineStyle
DashLine
makeLineLight LineStyle
HeavyDash4Line = LineStyle
Dash4Line
makeLineLight LineStyle
HeavyDash2Line = LineStyle
Dash2Line
makeLineLight LineStyle
x = LineStyle
x
makeLineDashed :: LineStyle -> LineStyle
makeLineDashed :: LineStyle -> LineStyle
makeLineDashed LineStyle
SingleLine = LineStyle
DashLine
makeLineDashed LineStyle
HeavyLine = LineStyle
HeavyDashLine
makeLineDashed LineStyle
x = LineStyle
x
makeLineSolid :: LineStyle -> LineStyle
makeLineSolid :: LineStyle -> LineStyle
makeLineSolid LineStyle
DashLine = LineStyle
SingleLine
makeLineSolid LineStyle
Dash4Line = LineStyle
SingleLine
makeLineSolid LineStyle
Dash2Line = LineStyle
SingleLine
makeLineSolid LineStyle
HeavyDashLine = LineStyle
HeavyLine
makeLineSolid LineStyle
HeavyDash4Line = LineStyle
HeavyLine
makeLineSolid LineStyle
HeavyDash2Line = LineStyle
HeavyLine
makeLineSolid LineStyle
x = LineStyle
x
data UnicodeJoin = NoJoin | Light | Heavy | Double
joinType :: LineStyle -> UnicodeJoin
joinType :: LineStyle -> UnicodeJoin
joinType LineStyle
NoLine = UnicodeJoin
NoJoin
joinType LineStyle
SingleLine = UnicodeJoin
Light
joinType LineStyle
DashLine = UnicodeJoin
Light
joinType LineStyle
Dash4Line = UnicodeJoin
Light
joinType LineStyle
Dash2Line = UnicodeJoin
Light
joinType LineStyle
HeavyLine = UnicodeJoin
Heavy
joinType LineStyle
HeavyDashLine = UnicodeJoin
Heavy
joinType LineStyle
HeavyDash4Line = UnicodeJoin
Heavy
joinType LineStyle
HeavyDash2Line = UnicodeJoin
Heavy
joinType LineStyle
DoubleLine = UnicodeJoin
Double
asciiHorizontal :: LineStyle -> String
asciiHorizontal :: LineStyle -> String
asciiHorizontal LineStyle
NoLine = String
""
asciiHorizontal LineStyle
DoubleLine = String
"="
asciiHorizontal LineStyle
_ = String
"-"
asciiVertical :: LineStyle -> String
asciiVertical :: LineStyle -> String
asciiVertical LineStyle
NoLine = String
""
asciiVertical LineStyle
DoubleLine = String
"||"
asciiVertical LineStyle
_ = String
"|"
asciiJoinString :: LineStyle -> LineStyle -> String
asciiJoinString :: LineStyle -> LineStyle -> String
asciiJoinString LineStyle
h LineStyle
v = LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
asciiJoinString4 LineStyle
h LineStyle
h LineStyle
v LineStyle
v
roundedAsciiJoinString :: LineStyle -> LineStyle -> String
roundedAsciiJoinString :: LineStyle -> LineStyle -> String
roundedAsciiJoinString LineStyle
h LineStyle
v = LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
roundedAsciiJoinString4 LineStyle
h LineStyle
h LineStyle
v LineStyle
v
asciiJoinString4 :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
asciiJoinString4 :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
asciiJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine = String
" "
asciiJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
n LineStyle
s | LineStyle
n LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
s = LineStyle -> String
asciiVertical LineStyle
n
asciiJoinString4 LineStyle
w LineStyle
e LineStyle
NoLine LineStyle
NoLine | LineStyle
w LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
e = LineStyle -> String
asciiHorizontal LineStyle
w
asciiJoinString4 LineStyle
w LineStyle
e LineStyle
n LineStyle
s = LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
aJoins LineStyle
w LineStyle
e LineStyle
n LineStyle
s
roundedAsciiJoinString4 :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
roundedAsciiJoinString4 :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
roundedAsciiJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine = String
" "
roundedAsciiJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
n LineStyle
s | LineStyle
n LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
s = LineStyle -> String
asciiVertical LineStyle
n
roundedAsciiJoinString4 LineStyle
w LineStyle
e LineStyle
NoLine LineStyle
NoLine | LineStyle
w LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
e = LineStyle -> String
asciiHorizontal LineStyle
w
roundedAsciiJoinString4 LineStyle
w LineStyle
e LineStyle
n LineStyle
s = LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
arJoins LineStyle
w LineStyle
e LineStyle
n LineStyle
s
aJoins :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
aJoins :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
aJoins LineStyle
_ LineStyle
_ LineStyle
DoubleLine LineStyle
_ = String
"++"
aJoins LineStyle
_ LineStyle
_ LineStyle
_ LineStyle
DoubleLine = String
"++"
aJoins LineStyle
_ LineStyle
_ LineStyle
_ LineStyle
_ = String
"+"
arJoins :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
arJoins :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
arJoins LineStyle
_ LineStyle
_ LineStyle
NoLine LineStyle
DoubleLine = String
".."
arJoins LineStyle
_ LineStyle
_ LineStyle
NoLine LineStyle
_ = String
"."
arJoins LineStyle
_ LineStyle
_ LineStyle
DoubleLine LineStyle
NoLine = String
"''"
arJoins LineStyle
_ LineStyle
_ LineStyle
_ LineStyle
NoLine = String
"'"
arJoins LineStyle
NoLine LineStyle
_ LineStyle
SingleLine LineStyle
SingleLine = String
":"
arJoins LineStyle
_ LineStyle
NoLine LineStyle
SingleLine LineStyle
SingleLine = String
":"
arJoins LineStyle
NoLine LineStyle
_ LineStyle
DoubleLine LineStyle
DoubleLine = String
"::"
arJoins LineStyle
_ LineStyle
NoLine LineStyle
DoubleLine LineStyle
DoubleLine = String
"::"
arJoins LineStyle
NoLine LineStyle
DoubleLine LineStyle
DoubleLine LineStyle
_ = String
"::"
arJoins LineStyle
NoLine LineStyle
DoubleLine LineStyle
_ LineStyle
_ = String
":"
arJoins LineStyle
NoLine LineStyle
SingleLine LineStyle
DoubleLine LineStyle
_ = String
"++"
arJoins LineStyle
NoLine LineStyle
SingleLine LineStyle
_ LineStyle
_ = String
"+"
arJoins LineStyle
DoubleLine LineStyle
NoLine LineStyle
DoubleLine LineStyle
_ = String
"::"
arJoins LineStyle
DoubleLine LineStyle
NoLine LineStyle
_ LineStyle
_ = String
":"
arJoins LineStyle
SingleLine LineStyle
NoLine LineStyle
DoubleLine LineStyle
_ = String
"++"
arJoins LineStyle
SingleLine LineStyle
NoLine LineStyle
_ LineStyle
_ = String
"+"
arJoins LineStyle
DoubleLine LineStyle
_ LineStyle
DoubleLine LineStyle
_ = String
"::"
arJoins LineStyle
DoubleLine LineStyle
_ LineStyle
_ LineStyle
_ = String
":"
arJoins LineStyle
_ LineStyle
_ LineStyle
DoubleLine LineStyle
_ = String
"++"
arJoins LineStyle
_ LineStyle
_ LineStyle
_ LineStyle
_ = String
"+"
unicodeHorizontal :: LineStyle -> String
unicodeHorizontal :: LineStyle -> String
unicodeHorizontal LineStyle
NoLine = String
""
unicodeHorizontal LineStyle
SingleLine = String
"─"
unicodeHorizontal LineStyle
HeavyLine = String
"━"
unicodeHorizontal LineStyle
DoubleLine = String
"═"
unicodeHorizontal LineStyle
DashLine = String
"┄"
unicodeHorizontal LineStyle
HeavyDashLine = String
"┅"
unicodeHorizontal LineStyle
Dash4Line = String
"┈"
unicodeHorizontal LineStyle
HeavyDash4Line = String
"┉"
unicodeHorizontal LineStyle
Dash2Line = String
"╌"
unicodeHorizontal LineStyle
HeavyDash2Line = String
"╍"
unicodeVertical :: LineStyle -> String
unicodeVertical :: LineStyle -> String
unicodeVertical LineStyle
NoLine = String
""
unicodeVertical LineStyle
SingleLine = String
"│"
unicodeVertical LineStyle
HeavyLine = String
"┃"
unicodeVertical LineStyle
DoubleLine = String
"║"
unicodeVertical LineStyle
DashLine = String
"┆"
unicodeVertical LineStyle
HeavyDashLine = String
"┇"
unicodeVertical LineStyle
Dash4Line = String
"┊"
unicodeVertical LineStyle
HeavyDash4Line = String
"┋"
unicodeVertical LineStyle
Dash2Line = String
"╎"
unicodeVertical LineStyle
HeavyDash2Line = String
"╏"
unicodeJoinString :: LineStyle -> LineStyle -> String
unicodeJoinString :: LineStyle -> LineStyle -> String
unicodeJoinString LineStyle
h LineStyle
v = LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
unicodeJoinString4 LineStyle
h LineStyle
h LineStyle
v LineStyle
v
unicodeJoinString4
:: LineStyle
-> LineStyle
-> LineStyle
-> LineStyle
-> String
unicodeJoinString4 :: LineStyle -> LineStyle -> LineStyle -> LineStyle -> String
unicodeJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine LineStyle
NoLine = String
" "
unicodeJoinString4 LineStyle
NoLine LineStyle
NoLine LineStyle
n LineStyle
s | LineStyle
n LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
s = LineStyle -> String
unicodeVertical LineStyle
n
unicodeJoinString4 LineStyle
w LineStyle
e LineStyle
NoLine LineStyle
NoLine | LineStyle
w LineStyle -> LineStyle -> Bool
forall a. Eq a => a -> a -> Bool
== LineStyle
e = LineStyle -> String
unicodeHorizontal LineStyle
w
unicodeJoinString4 LineStyle
w LineStyle
e LineStyle
n LineStyle
s = Char -> String
forall (f :: * -> *) a. Applicative f => a -> f a
pure (Char -> String) -> Char -> String
forall a b. (a -> b) -> a -> b
$ UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> Char
uJoins (LineStyle -> UnicodeJoin
joinType LineStyle
w) (LineStyle -> UnicodeJoin
joinType LineStyle
e) (LineStyle -> UnicodeJoin
joinType LineStyle
n) (LineStyle -> UnicodeJoin
joinType LineStyle
s)
uJoins :: UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> Char
uJoins :: UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> Char
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
' '
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light = Char
'│'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'─'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light = Char
'┼'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'╷'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'╵'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╶'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╴'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┌'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'└'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┐'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┘'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light = Char
'├'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light = Char
'┤'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┬'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┴'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'┃'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'━'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'╋'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'╻'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'╹'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╺'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╸'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┏'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┗'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┓'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┛'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'┣'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'┫'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┳'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┻'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'┠'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'┨'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'╂'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┯'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┷'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light = Char
'┿'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy = Char
'┢'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┲'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy = Char
'╆'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light = Char
'┡'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┺'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light = Char
'╄'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy = Char
'┪'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┱'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy = Char
'╅'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light = Char
'┩'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┹'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light = Char
'╃'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy = Char
'╽'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┎'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy = Char
'┟'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┒'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy = Char
'┧'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy = Char
'┰'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy = Char
'╁'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light = Char
'╿'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┖'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light = Char
'┞'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┚'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light = Char
'┦'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin = Char
'┸'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light = Char
'╀'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┍'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┕'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light = Char
'┝'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╼'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┮'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┶'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light = Char
'┾'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┑'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┙'
uJoins UnicodeJoin
Heavy UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light = Char
'┥'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╾'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┭'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┵'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light = Char
'┽'
uJoins UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'╊'
uJoins UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy UnicodeJoin
Heavy = Char
'╉'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light UnicodeJoin
Heavy = Char
'╈'
uJoins UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Heavy UnicodeJoin
Light = Char
'╇'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double = Char
'║'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'═'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double = Char
'╬'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╻'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╹'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╺'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╸'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╔'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╚'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╗'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╝'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double = Char
'╠'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double = Char
'╣'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╦'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╩'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double = Char
'╟'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double = Char
'╢'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double = Char
'╫'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'╤'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'╧'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light = Char
'╪'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double = Char
'┢'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'┲'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double = Char
'╆'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light = Char
'┡'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'┺'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light = Char
'╄'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double = Char
'┪'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'┱'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double = Char
'╅'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light = Char
'┩'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'┹'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light = Char
'╃'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double = Char
'╽'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╓'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double = Char
'┟'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╖'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double = Char
'┧'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double = Char
'╥'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double = Char
'╁'
uJoins UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light = Char
'╿'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╙'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light = Char
'┞'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╜'
uJoins UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light = Char
'┦'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin = Char
'╨'
uJoins UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light = Char
'╀'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'╓'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'╘'
uJoins UnicodeJoin
NoJoin UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light = Char
'╞'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╼'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┮'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┶'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light = Char
'┾'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'╕'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'╛'
uJoins UnicodeJoin
Double UnicodeJoin
NoJoin UnicodeJoin
Light UnicodeJoin
Light = Char
'╡'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
NoJoin = Char
'╾'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
NoJoin UnicodeJoin
Light = Char
'┭'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
NoJoin = Char
'┵'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Light UnicodeJoin
Light = Char
'┽'
uJoins UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double = Char
'╊'
uJoins UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double UnicodeJoin
Double = Char
'╉'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light UnicodeJoin
Double = Char
'╈'
uJoins UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Double UnicodeJoin
Light = Char
'╇'
uJoins UnicodeJoin
e UnicodeJoin
w UnicodeJoin
n UnicodeJoin
s = UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> UnicodeJoin -> Char
uJoins (UnicodeJoin -> UnicodeJoin
degrade UnicodeJoin
e) (UnicodeJoin -> UnicodeJoin
degrade UnicodeJoin
w) (UnicodeJoin -> UnicodeJoin
degrade UnicodeJoin
n) (UnicodeJoin -> UnicodeJoin
degrade UnicodeJoin
s)
where
degrade :: UnicodeJoin -> UnicodeJoin
degrade UnicodeJoin
Double = UnicodeJoin
Heavy
degrade UnicodeJoin
x = UnicodeJoin
x