%-

(:def main
  (:match ("Hello", "World") 
    [(t, t) t]))