konkrete Syntax:
(foo (bar baz ()) 1234)
data Expression = Identifier String | List [ Expression ]
String -> Expression
Expression -> String
Expression -> Doc