>ugly, or enhancement request

I think the "high bass clef" is an important information and should be added to 
the music glossary.

At the "vienna symphonic library" pages (http://www.vsl.co.at/en) --> vienna 
academy -->
Brass --> Horns --> Horn in F --> Notation, Section "older notation" you'll 
find some description of it.

I remember a report, Mozart did switch frequently between treble and high bass 
clef in a confusing way
in a certain basset horn part for Anton Stadler.

For my enclosed suggestion I counted the pitch usage in two sheet music prints
(also the publication years are more than a century apart) to illustrate it.


Best regards,
ArnoldTheresius

diff --git a/lilypond-2.17.5/Documentation/music-glossary.tely 
b/lilypond-2.17.5q/Documentation/music-glossary.tely
index 115e757..77d5fd4 100644
--- a/lilypond-2.17.5/Documentation/music-glossary.tely
+++ b/lilypond-2.17.5q/Documentation/music-glossary.tely
@@ -243,10 +243,11 @@ Languages in this order.
 * half rest::
 * harmonic cadence::
 * harmonics::
 * harmony::
 * hemiola::
+* high bass clef::
 * homophony::
 * hook::
 * hymn meter::
 * incomplete dominant seventh chord::
 * interval::
@@ -1223,11 +1224,11 @@ S: basklav,
 FI: bassoavain.
 
 A clef setting with middle C on the first top ledger line.
 
 @seealso
-@ref{F clef}.
+@ref{F clef}, @ref{high bass clef}.
 
 
 @node beam
 @section beam
 
@@ -4287,10 +4288,306 @@ and is therefore a polymeter (second definition) of 
considerable antiquity.
 
 @seealso
 @ref{mensural notation}, @ref{meter}, @ref{polymeter}, @ref{proportion}.
 
 
+@node high bass clef
+@section high bass clef
+
+ES: ?,
+I: ?,
+F: ?,
+D: hoher Bassschlüssel,
+NL: ?,
+DK: ?,
+S: ?,
+FI: ?.
+
+Since the 18th century the @i{high bass clef} is used in french horn parts
+for the lowest pitches. It looks identical to the @i{@q{standard} bass clef},
+but in relation to the treble clef it is an @i{octave up bass clef} without
+the octavation number.
+(The octavation number above or below the clefs was introduced much
+later, at the beginning of the 20th century.)
+This usage of the @i{F clef} was inherited from the french horn to the
+basset horn and to the bass clarinet.
+
+In modern music literature (and modern reprints) for the french horn mostly the
+@i{@q{standard} bass clef} is used today.
+The player can usually answer the question "high or standard bass clef in this
+piece?" based on the melodic context.
+
+@lilypond[quote,staffsize=17,notime,line-width=13.0\cm]
+#(define-markup-command (histogram-element layout props up-value down-value)
+  (integer? integer?)
+  #:category font
+  #:properties ((thickness 0.1)
+                (baseline-length 3.5) (block-width 1.5) (height-factor 0.3))
+  (let*
+   ((erg (make-line-stencil thickness
+          (* -0.5 baseline-length) 0.0 (* 0.5 baseline-length) 0.0))
+    (box-l (* -0.5 block-width))
+    (box-r (* 0.5 block-width)))
+   (if (> up-value 0)
+    (let ((h (* up-value height-factor)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l 0.0 box-l h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-r 0.0 box-r h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l h box-r h)))))
+   (if (> down-value 0)
+    (let ((h (* -1.0 down-value height-factor)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l 0.0 box-l h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-r 0.0 box-r h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l h box-r h)))))
+   erg))
+
+Chart = \lyricmode {
+  \set stanza = \markup \translate #'(0 . 2.4) \column {
+    \fontsize #-2 \concat { "      1" \super "st"
+                            " Horn " \italic "(in E" \flat \italic")" }
+    \scale #'(0.85 . 1.0) \fontsize #-1 "TONE USAGE CHART"
+    \fontsize #-2 \concat { "      2" \super "nd"
+                            " Horn " \italic "(in C)" }
+  }
+  \markup { \histogram-element #1 #0 }
+  \markup { \histogram-element #1 #0 }
+  \markup { \histogram-element #8 #2 }
+  \markup { \histogram-element #1 #0 }
+  \markup { \histogram-element #8 #36 }
+  \markup { \histogram-element #16 #0 }
+  \markup { \histogram-element #5 #8 }
+  \markup { \histogram-element #23 #9 }
+  \markup { \histogram-element #16 #6 }
+  \markup { \histogram-element #10 #0 }
+  \markup { \histogram-element #0 #1 }
+}
+
+HrItrebleUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 1 \super "st"
+    " Horn " \italic "(in E" \flat \italic")" } }
+  \override LyricText #'font-size = #-1
+  \skip4 \skip4 "7" "1" "8" "16" "5" "23" "16" "10" "-"
+}
+
+HrIItrebleUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 2 \super "nd"
+    " Horn " \italic "(in C)" } }
+  \override LyricText #'font-size = #-1
+  \skip4 \skip4 "2" "-" "36" "-" "8" "9" "6" "-" "1"
+}
+
+HrIbassUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 1 \super "st"
+    " Horn " \italic "(in E" \flat \italic")" } }
+  \override LyricText #'font-size = #-1
+  "1" "1" "1"
+}
+
+HrIIbassUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 2 \super "nd"
+    " Horn " \italic "(in C)" } }
+  \override LyricText #'font-size = #-1
+  "-" "-" "-"
+}
+
+\score {
+  <<
+    \new Lyrics = "HrIt" { s4 }
+    \new Lyrics = "HrIIt" { s4 }
+    \new Staff {
+      \clef treble
+      \override Stem #'stencil = ##f
+      s4
+      \override NoteHead #'color = #(x11-color 'grey70)
+      f
+      \revert NoteHead #'color
+      g b c' e' g' c'' d'' e'' g''
+    }
+    \new Lyrics = "Histo" { s4 }
+    \new Staff {
+      \new Voice = "Histogram" {
+        \clef "bass^8"
+        \set Staff.clefOctavation = #0
+        \override Stem #'stencil = ##f
+        c4 f g
+        \override NoteHead #'color = #(x11-color 'grey70)
+        b c' e' g'
+        \override NoteHead #'transparent = ##t
+        c' c' c' c'
+      }
+    }
+    \new Lyrics = "HrIb" { s4 }
+    \new Lyrics = "HrIIb" { s4 }
+    \context Lyrics = HrIt \lyricsto Histogram \HrItrebleUsage
+    \context Lyrics = HrIIt \lyricsto Histogram \HrIItrebleUsage
+    \context Lyrics = HrIb \lyricsto Histogram \HrIbassUsage
+    \context Lyrics = HrIIb \lyricsto Histogram \HrIIbassUsage
+    \context Lyrics = Histo \lyricsto Histogram \Chart
+  >>
+  \layout {
+    \context {
+      \Lyrics
+      \override LyricSpace #'minimum-distance = #0.0
+    }
+  }
+  \header {
+    piece = \markup \column {
+      \fontsize #-1 \underline "Pitch usage in:"
+      "W. A. Mozart (1756-1791): Masonic Funeral Music, KV 477"
+      \fontsize #-1 "score by Breitkopf & Härtel, Leipzig, 1881"
+    }
+  }
+}
+@end lilypond
+
+@lilypond[quote,staffsize=17,notime,line-width=13.0\cm]
+#(define-markup-command (histogram-element layout props up-value down-value)
+  (integer? integer?)
+  #:category font
+  #:properties ((thickness 0.1)
+                (baseline-length 3.5) (block-width 1.5) (height-factor 0.3))
+  (let*
+   ((erg (make-line-stencil thickness
+          (* -0.5 baseline-length) 0.0 (* 0.5 baseline-length) 0.0))
+    (box-l (* -0.5 block-width))
+    (box-r (* 0.5 block-width)))
+   (if (> up-value 0)
+    (let ((h (* up-value height-factor)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l 0.0 box-l h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-r 0.0 box-r h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l h box-r h)))))
+   (if (> down-value 0)
+    (let ((h (* -1.0 down-value height-factor)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l 0.0 box-l h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-r 0.0 box-r h)))
+     (set! erg (ly:stencil-add erg (make-line-stencil thickness
+       box-l h box-r h)))))
+   erg))
+
+Chart = \lyricmode {
+  \set stanza = \markup \translate #'(0 . 2.4) \column {
+    \fontsize #-2 \concat { "      1" \super "st" " Horn " \italic "(in F)" }
+    \scale #'(0.85 . 1.0) \fontsize #-1 "TONE USAGE CHART"
+    \fontsize #-2 \concat { "      2" \super "nd" " Horn " \italic "(in F)" }
+  }
+  \markup { \histogram-element #2 #0 }
+  \markup { \histogram-element #2 #1 }
+  \markup { \histogram-element #0 #3 }
+  \markup { \histogram-element #2 #1 }
+  \markup { \histogram-element #3 #8 }
+  \markup { \histogram-element #2 #1 }
+  \markup { \histogram-element #6 #1 }
+  \markup { \histogram-element #4 #1 }
+  \markup { \histogram-element #0 #8 }
+  \markup { \histogram-element #14 #14 }
+  \markup { \histogram-element #17 #5 }
+  \markup { \histogram-element #9 #1 }
+  \markup { \histogram-element #9 #4 }
+  \markup { \histogram-element #9 #3 }
+  \markup { \histogram-element #1 #0 }
+  \markup { \histogram-element #8 #2 }
+  \markup { \histogram-element #5 #0 }
+  \markup { \histogram-element #9 #0 }
+  \markup { \histogram-element #1 #0 }
+}
+
+HrItrebleUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 1 \super "st"
+    " Horn " \italic "(in F)" } }
+  \override LyricText #'font-size = #-1
+  \skip4 "2" "-" "2" "3" "2" "6" "4" "-" "14" "17" "9" "9" "9" "1" "8"
+  "5" "9" "1"
+}
+
+HrIItrebleUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 2 \super "nd"
+    " Horn " \italic "(in F)" } }
+  \override LyricText #'font-size = #-1
+  \skip4 "1" "3" "1" "8" "1" "1" "1" "8" "14" "5" "1" "4" "3" "-" "2"
+  "-" "-" "-"
+}
+
+HrIbassUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 1 \super "st"
+    " Horn " \italic "(in F)" } }
+  \override LyricText #'font-size = #-1
+  "2"
+}
+
+HrIIbassUsage = \lyricmode {
+  \set stanza = \markup { \fontsize #-2 \concat { 2 \super "nd"
+    " Horn " \italic "(in F)" } }
+  \override LyricText #'font-size = #-1
+  "-"
+}
+
+\score {
+  <<
+    \new Lyrics = "HrIt" { s4 }
+    \new Lyrics = "HrIIt" { s4 }
+    \new Staff {
+      \clef treble
+      \override Stem #'stencil = ##f
+      s4 g b c' d' es' e' f' fis' g' a' b' c'' d'' dis'' e'' f'' g'' a''
+    }
+    \new Lyrics = "Histo" { s4 }
+    \new Staff {
+      \new Voice = "Histogram" {
+        \clef "bass^8"
+        \set Staff.clefOctavation = #0
+        \override Stem #'stencil = ##f
+        c4
+        \override NoteHead #'color = #(x11-color 'grey70)
+        \override Accidental #'color = #(x11-color 'grey70)
+        g b c' d' es' e' f' fis' g' a'
+        \override NoteHead #'transparent = ##t
+        c' c' c' c' c' c' c' c'
+      }
+    }
+    \new Lyrics = "HrIb" { s4 }
+    \new Lyrics = "HrIIb" { s4 }
+    \context Lyrics = HrIt \lyricsto Histogram \HrItrebleUsage
+    \context Lyrics = HrIIt \lyricsto Histogram \HrIItrebleUsage
+    \context Lyrics = HrIb \lyricsto Histogram \HrIbassUsage
+    \context Lyrics = HrIIb \lyricsto Histogram \HrIIbassUsage
+    \context Lyrics = Histo \lyricsto Histogram \Chart
+  >>
+  \layout {
+    \context {
+      \Lyrics
+      \override LyricSpace #'minimum-distance = #0.0
+    }
+  }
+  \header {
+    piece = \markup \column {
+      \fontsize #-1 \underline "Pitch usage in:"
+      "Willy Hess (1906-1997): Concerto for basset horn and orchestra, op.116, 
2nd movement"
+      \fontsize #-1 "score and parts by Amadeus Verlag, Winterthur, 1988"
+    }
+  }
+}
+@end lilypond
+
+You will often find transposing instructions which move the octavation
+from the @i{high bass clef} to the @i{instrument transposition} to achieve
+the same result, e.g. @i{"whenever the bass clef is used you have to alter
+the instrument transposition one octave up."}
+
+@seealso
+@ref{F clef}, @ref{bass clef}.
+
+
 @node homophony
 @section homophony
 
 ES: homofonía,
 I: omofonia,
_______________________________________________
bug-lilypond mailing list
bug-lilypond@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-lilypond

Reply via email to