(define (add-x-elements-func number content a) (if (< a number) ((lambda () (element-insert! "body" content) (add-x-elements-func number content (+ a 1)))) #t)) (define (add-x-elements number content) (add-x-elements-func number content 0)) ; -------------------------------------------------; (add-x-elements 3 "<h1>Example</h1>")