Skip to content

Instantly share code, notes, and snippets.

@neongreen
Created March 15, 2019 18:51
Show Gist options
  • Save neongreen/49b3b3a49318275c66a4853cde8966d4 to your computer and use it in GitHub Desktop.
Save neongreen/49b3b3a49318275c66a4853cde8966d4 to your computer and use it in GitHub Desktop.
> putStrLn $ drawVerticalTree (Node g [Node g [], Node g [Node g [], Node g [], Node g []]])
┌───────┐
│ o o . │
│ o x x │
│ . . . │
└───────┘
|
---------------------
/ \
┌───────┐ ┌───────┐
│ o o . │ │ o o . │
│ o x x │ │ o x x │
│ . . . │ │ . . . │
└───────┘ └───────┘
|
---------------------
/ | \
┌───────┐ ┌───────┐ ┌───────┐
│ o o . │ │ o o . │ │ o o . │
│ o x x │ │ o x x │ │ o x x │
│ . . . │ │ . . . │ │ . . . │
└───────┘ └───────┘ └───────┘
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment