syndicate-2017/_includes/frontpage_racket_example1.md

(actor
 (forever #:collect [(balance 0)]
   (assert (account balance))
   (on (message (deposit $amount))
       (+ balance amount))))