@(bind a "x")
@(define f (in out))
@(bind out @(upcase-str a))
@(end)
@(bind b `@{a :filter (:fun f)}`)