(define (displayln x) (begin (display x) (newline)))