(let ((var i 1) (var br 10))
  (begin
    (for (i 1 20) (when (= i br) (break)))
    (while (< i 20) (if (<> i br) (break) (:= i (+ i 1))))))