input/regression/cross-staff-slur-vertical-spacing.ly

   1 \version "2.17.0"
   2
   3 \header {
   4   texidoc = "Cross-staff slurs are accounted for in vertical spacing.
   5 "
   6 }
   7
   8 %#(ly:set-option 'debug-skylines #t)
   9
  10 \new PianoStaff <<
  11   \new Staff = "up" {
  12     <e' c'>8
  13     \change Staff = "down"
  14     \slurDown
  15     g,,8 ( fis g
  16     \change Staff = "up"
  17     <g'' c''>8 )
  18     \change Staff = "down"
  19     e8 dis e
  20     \change Staff = "up"
  21     \break
  22     a'8 a'8 a'8^\markup \column { "f" "o" "o" } a'8 a'8 a'8 a'8 a'8
  23   }
  24   \new Staff = "down" {
  25     \clef bass
  26     % keep staff alive
  27     s1 s1
  28   }
  29 >>
  30
  31 \new PianoStaff <<
  32   \new Staff = "up" {
  33     <e' c'>8
  34     \change Staff = "down"
  35     \slurDown
  36     g,,8 (
  37     \change Staff = "up"
  38     fis'' g <g c''>8 )
  39     \change Staff = "down"
  40     e8 dis e
  41     \change Staff = "up"
  42     \break
  43     a'8 a'8 a'8^\markup \column { "f" "o" "o" } a'8 a'8 a'8 a'8 a'8
  44   }
  45   \new Staff = "down" {
  46     \clef bass
  47     % keep staff alive
  48     s1 s1
  49   }
  50 >>
  51
  52 \new PianoStaff <<
  53   \new Staff = "up" {
  54     R1
  55     <e' c'>8
  56     \change Staff = "down"
  57     \slurUp
  58     g,,8 (
  59     \change Staff = "up"
  60     fis'' g \override Stem #'direction = #UP
  61     <g'' c''>8 )
  62     \change Staff = "down"
  63     e8 dis e
  64     \change Staff = "up"
  65   }
  66   \new Staff = "down" {
  67     \clef bass
  68     % keep staff alive
  69     a8 a8 a8_\markup \column { "f" "o" "o" }
  70     a8 a8 a8 a8 a8
  71     \break s1
  72   }
  73 >>