(declare-initial-value font-size 14pt) (declare-initial-value line-spacing 18pt) (declare-initial-value min-leading 1pt) (element DOC (make simple-page-sequence left-margin: 3cm right-margin: 3cm top-margin: 2cm bottom-margin: 2cm language: 'JA)) (element HEAD (make display-group quadding: 'end font-size: 10pt (process-children) (make paragraph font-weight: 'bold quadding: 'start (literal "�Ј��e��")) (make paragraph (literal "������")))) (element DOCNO (make paragraph)) (element DATE (make paragraph ; font-weight: 'bold )) (element (DOC TITLE) (make paragraph font-family-name: "GothicBBB Medium" space-before: 20pt space-after: 40pt font-weight: 'bold quadding: 'center font-size: 15pt)) (element MAINTXT (make paragraph font-size: 12pt font-posture: 'italic first-line-start-indent: 12pt)) (element MTTITLE (make paragraph font-family-name: "GothicBBB Medium" quadding: 'center font-weight: 'bold space-after: 24pt space-before: 24pt font-size: 10pt)) (element CONTENT (make display-group space-after: 14pt start-indent: 20pt)) (element (CONTENT TITLE) (make paragraph font-size: 15pt first-line-start-indent: -15pt font-weight: 'bold font-family-name: "GothicBBB Medium" (make line-field field-width: 15pt (literal (number->string (child-number (parent (current-node)))))) (process-children))) (element P (let ((level (attribute-string "LEVEL"))) (case level (("0") (make paragraph font-size: 12pt start-indent: 30pt first-line-start-indent: -24pt (make line-field field-width: 24pt (literal "(" (number->string (child-number)) ")")) (process-children))) (("1" "2" "3") (empty-sosofo))))) (element list (empty-sosofo))