;;;;
;;;; LilyPond is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU General Public License as published by
;;;;
;;;; LilyPond is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU General Public License as published by
(layout-set-absolute-staff-size-in-module (current-module) sz))
(define-public (layout-set-staff-size sz)
(layout-set-absolute-staff-size-in-module (current-module) sz))
(define-public (layout-set-staff-size sz)
(("binding-offset" . ,w) . '())
(("top-margin" . ,h) . '())
(("bottom-margin" . ,h) . '())
(("binding-offset" . ,w) . '())
(("top-margin" . ,h) . '())
(("bottom-margin" . ,h) . '())
(if (number? val)
(module-define! scope v (/ val scale))
;; Cannot warn for non-numbers, eg. for paper-width, paper-height.
(if (number? val)
(module-define! scope v (/ val scale))
;; Cannot warn for non-numbers, eg. for paper-width, paper-height.