input/test/octave-duplicate.ly

   1
   2 \version "2.1.7"
   3 \header { texidoc="@cindex Octave Doubling
   4 Octave doubling parts of music. "
   5 }
   6
   7 upperOne = \notes\relative c'' {
   8   a4 a a a
   9   a4 a a a
  10   a4 a a a
  11   a4 a a a
  12 }
  13
  14 upperOctave = \notes <<
  15   \context Thread=upperOne { \transpose c' c \upperOne }
  16   \context Thread=upperOne {
  17     \property Thread.devNullThread = #'allways s1*2
  18     \property Thread.devNullThread = #'() s1*2
  19   }
  20 >>
  21
  22 lowerOne = \notes\relative c {
  23   a8 a a a  a a a a
  24   a8 a a a  a a a a
  25   a8 a a a  a a a a
  26   a8 a a a  a a a a
  27 }
  28
  29 firstEight = \notes {
  30   \property Thread.devNullThread = #'() s8
  31   \property Thread.devNullThread = #'allways s8*7
  32 }
  33
  34 lowerOctave = \notes <<
  35   \context Thread=lowerOne { \transpose c' c  \lowerOne }
  36   \context Thread=lowerOne {
  37     \repeat "unfold" 4 { \firstEight }
  38   }
  39 >>
  40
  41 \score {
  42   <<
  43     \context PianoStaff <<
  44       \context Staff=upper <<
  45         \context Voice=upperOne <<
  46           \upperOne
  47           \upperOctave
  48         >>
  49       >>
  50       \context Staff=lower <<
  51         \clef bass
  52         \context Voice=lowerOne <<
  53           \lowerOne
  54           \lowerOctave
  55         >>
  56       >>
  57     >>
  58   >>
  59   \paper { }
  60 }
  61