2 texidoc = "LilyPond syntax can be used inside scheme to
3 build music expressions, with the @code{#@{ ... #@}} syntax.
4 Scheme forms can be introduced inside these blocks by escaping
5 them with a @code{$}, both in a LilyPond context (see the @code{music} variable) or in a Scheme
6 context (see the @code{$padding} and @code{$(* padding 2)} forms.)"
9 \paper { raggedright = ##t }
11 withPaddingA = #(def-music-function (location padding music) (number? ly:music?)
12 #{ \override TextScript #'padding = #$padding
14 \revert TextScript #'padding #})
16 withPaddingB = #(def-music-function (location padding music) (number? ly:music?)
17 #{ \override TextScript #'padding = #$(* padding 2)
19 \revert TextScript #'padding #})
21 withPaddingC = #(def-music-function (location padding music) (number? ly:music?)
22 #{ \override TextScript #'padding = #(+ 1 $(* padding 2))
24 \revert TextScript #'padding #})