(define debug (external-procedure "UNREGISTERED::James Clark//Procedure::debug")) (element cookbook (sosofo-append (make paragraph space-before: 20pt break-after: 'page font-size: 20pt (literal "Table of contents") (process-node-list (select-elements (descendants (current-node)) 'TITLE))) (process-children))) (element CTITLE (make paragraph font-size: 30pt quadding: 'center space-before: 10pt line-spacing: 20pt)) (element TITLE (make paragraph font-size: 24pt line-spacing: 20pt)) (element INGREDIENT (make paragraph font-size: 12pt line-spacing: 20pt))