]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/clefs.ly
release: 1.3.129
[lilypond.git] / input / regression / clefs.ly
1
2 \header{
3 texidoc="
4 The transparent clef should not occupy any space and with style
5 @code{fullSizeChanges}, the changing clef should be typeset in full
6 size. For octaviated clefs, the ``8'' should appear closely above or
7 below the clef respectively.  The ``8'' is processed in a convoluted
8 way, so this is fragile as well.
9 ";
10 }
11
12 \version "1.3.117";
13
14 \score {
15        \notes{ 
16        
17          \clef "treble"; c'1^"{treble}" \bar "||";
18          \clef "french";c'1^"{french}" \bar "||";
19          \clef "soprano";c'1^"{soprano}" \bar "||";
20          \clef "mezzosoprano";c'1^"{mezzosoprano}" \bar "||";
21          \clef "alto";c'1^"{alto}" \bar "||";
22          \clef "tenor";c'1^"{tenor}" \bar "||";
23          \clef "baritone";c'1^"{baritone}" \bar "||";
24          \clef "varbaritone";c'1^"{varbaritone}" \bar "||";
25          \clef "G_8";c'1^"{sub 8?}" c'1 \bar "||";
26          \clef "G^8";c'1^"{sup 8?}" c'1 \bar "||";
27          \clef "bass";c'1^"{bass}" \bar "||";
28          \clef "subbass";c'1^"{subbass}" \bar "||";
29          \property Staff.Clef \override #'transparent = ##t
30          \clef "treble"; c'1^"transparent=\#t" \bar "||";
31          \property Staff.Clef \override #'transparent = ##f
32          \context Staff \outputproperty #(make-type-checker 'clef-interface) #'full-size-change = ##t
33          \clef "french"; c'1^"full-size-change = \#t" \bar "|.";
34          }
35          \paper{
36            \translator{
37              \StaffContext
38 %            Clef \override #'full-size-change = ##t
39            }
40          }
41 }
42