input/regression/tie-chord.ly

   1 \header {
   2
   3
   4   texidoc = "In chords, ties keep closer to the note head vertically,
   5 but never collide with heads or stems. Seconds are formatted up/down;
   6 the rest of the ties are positioned according to their vertical
   7 position.
   8
   9 The code does not handle all cases. Sometimes ties will printed on top
  10 of or very close to each other. This happens in the last chords of
  11 each system.  "
  12
  13
  14 }
  15
  16 \version "2.7.13"
  17
  18 \paper {
  19   indent = #0.0
  20   raggedright = ##t
  21 }
  22
  23 testShort =
  24 {
  25    \time 4/4
  26   \key c \major
  27   \relative c'' {
  28                                 %  c ~ c
  29     <c e> ~ <c e>
  30     <b c e> ~ <b c e>
  31     <a c e> ~ <a c e>
  32     <a b e> ~ <a b e>
  33     <a b e f> ~ <a b e f>
  34   }
  35
  36   \relative c' {
  37     <c e f a> ~ <c e f a>
  38     <c e g a> ~ <c e g a>
  39
  40     <a' c d f> ~ <a c d f>
  41     <a c e f> ~ <a c e f>
  42     <f b e a>4 ~ <f b e a>
  43   }
  44 }
  45
  46 testLong =
  47 {
  48   \time 5/8
  49   \key c \major
  50   \relative c'' {
  51     <c e>2 ~ <c e>8
  52     <b c e>2 ~ <b c e>8
  53     <a c e>2 ~ <a c e>8
  54     <a b e>2 ~ <a b e>8
  55     <a b e f>2 ~ <a b e f>8
  56   }
  57
  58   \relative c' {
  59     <c e f a>2 ~ <c e f a>8
  60     <c e g a>2 ~ <c e g a>8
  61     <a' c d f>2  ~ <a c d f>8
  62     <a c e f>2  ~ <a c e f>8
  63     <f b e a>2 ~ <f b e a>8
  64   }
  65 }
  66
  67 \new Voice
  68 { \testShort \break
  69   \transpose c d \testShort \break
  70   \testLong \break
  71   \transpose c d \testLong \break
  72 }
  73