;; RoboVasion ;;
(define (display el) 
(writes nil el))

(define (newline)
  (writes nil "\n"))

(define (for-each func lst)
  (cond ((not (null? lst))
         (func (car lst))
         (for-each func (cdr lst)))))

(define (println . args)
  (for-each display
            args)
  (newline))


;; EOF ;;