(define FontSize 12pt) (root (make simple-page-sequence left-margin: 1cm page-width: 10cm right-margin: 1cm (make scroll font-size: FontSize (process-children)))) (element invitation (make sequence (make paragraph quadding: 'center space-before: 20pt font-weight: 'bold font-size: 24pt (literal "INVITATION")) (make table table-border: #f ; no border display-alignment: 'start space-before: 20pt (make table-part (make table-column width: 25mm) (make table-column width: 10cm) (make table-row (make table-cell (make paragraph quadding: 'start (literal "When:"))) (make table-cell (make paragraph quadding: 'start (literal (attribute-string "date"))))) (make table-row (make table-cell (make paragraph quadding: 'start (literal "To:"))) (make table-cell (make paragraph quadding: 'start (literal (attribute-string "to"))))) (make table-row (make table-cell (make paragraph quadding: 'start (literal "Venue:"))) (make table-cell (make paragraph quadding: 'start (literal (attribute-string "where"))))) (make table-row (make table-cell (make paragraph quadding: 'start (literal "Occasion:"))) (make table-cell (make paragraph quadding: 'start (literal (attribute-string "why"))))))) (process-children) (make paragraph quadding: 'end space-before: FontSize (literal "From: " (attribute-string "signature"))))) (element par (make paragraph quadding: 'justify font-size: FontSize space-before: FontSize (process-children-trim))) (element emph (make sequence font-posture: 'italic (process-children-trim)))