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