(define *rgb-color-space* (color-space "ISO/IEC 10179:1996//Color-Space Family::Device RGB")) (define *blue* (color *rgb-color-space* 0 0 1)) (define *red* (color *rgb-color-space* 1 0 0)) (root ;set up the page geometry (make simple-page-sequence ;as a simple page page-width: 8.5in ;with characteristics page-height: 11in top-margin: 1in bottom-margin: 1in left-margin: 1in right-margin: 1in (process-children))) ;process the content of document (element test (process-children)) (element a (make paragraph ; make a paragraph font-size: 24pt color: *blue* quadding: 'center space-before: 10pt line-spacing: 20pt)) (element b (make paragraph ; make another paragraph font-size: 18pt color: *red* line-spacing: 30pt))