A contrived example to learn mtl. Ended up refactoring many functions back to pure IO. TODO Remove dead code Make a project with servant and beam to possibly have an actual use case for mtl