defn add x y = { x + y } defn main = { case add of { n -> { 1 } } }