4 texidoc ="Test font selection and scm text markup"
16 d-#'(lines "one" "two" "three")
17 e-#'(lines (bold "one")
18 (columns "and" "there" "is" ((font-family . number) "2"))
21 g-#'(music (named "noteheads-2"
22 ((kern . -0.1) "flags-stem")
23 (((kern . -0.1) (raise . 3.5)) "flags-u3")))
24 b-#'(columns "a" (((kern . 3) (raise . 2)) "b") "c")
25 c-#'(columns "1" (((raise . -2) (kern . -1)) "2") "3")
27 d-#'(lines "Violoncello" " e" "Contrabasso")
28 e-#'((lines (baselineskip . 0) (kern . 1.5)) "Violoncello" " e" "Contrabasso")
29 e-#'(((baselineskip . 0) (kern . 1.5) lines) "Violoncello" " e" "Contrabasso")
35 c4^#'(lines "1" "" "2")
36 c^#'(lines "3" "4" "5")
38 c_#'(lines "6" "" "7")
39 c_#'(lines "8" "9" "0")
48 c^#'(columns "foe" ((raise . 3) "bar"))
49 c^#'(columns "foe" (super "12") (sub "3 4"))
51 c^#'(columns "foe" (super ((raise . 1) "12")) (sub ((raise . -1) "3 4")))
52 c^#'(columns "foe" (super (overstrike "o") "/") (sub "x"))
53 c^#'(columns "foe" (overstrike "o") "/")
54 c^#'(columns "foe" ((bold roman overstrike) "o") "/")
55 c^#'(columns "foe" ((extent . (0 . 0)) "o") "/")
56 c^#'(columns "foo" (super "bar" (super "baz")))
58 %% c^#`(columns (lines "" ";" "") (lines "1" ((bold) "2") "3"))
59 c^#`(columns (lines "" ";" "") (lines "1" "2" "3"))
60 c^#`(columns (lines "" ";" "") (lines "1" (bold "2") "3"))
61 c^#`(columns (lines "" ";" "") (lines "1" (columns (bold "2")) "3"))
70 TextScript \override #'font-family = #'roman
71 TextScript \override #'font-shape = #'upright
72 TextScript \revert #'no-spacing-rods
73 TextScript \override #'direction = #1
78 %%% LilyPond-indent-level:2