RBT definition
Some RBT
color :: Tree a -> Color
Pretty print a RBT
countRB :: Tree a -> (Int, Int)
Intermediary commit - not working yet