implementation module test import pprint, eval Start = (pprint expr, eval expr) where expr = Var \x=4 In Lit 38 +. x