* ```
ghci> paraLista $ M Branco (Just (M Azul (Just (M Vermelho (Just (M Verde Nothing))))))
[Branco, Azul, Vermelho, Verde]
```