:set -XTemplateHaskell
let x = True
let y = [d| x = 'c' |]