+ (map (lambda (x) (document-translator-property x)) propsr))))
+ (if (null? propsw)
+ ""
+ (string-append
+ (texi-section (+ level 1) "Properties (write)" #f)
+ (description-list->texi
+ (map (lambda (x) (document-translator-property x)) propsw))))
+ (if (null? grobs)