input/regression/hairpin-shorten-pair-circled-tip.ly

   1 \version "2.19.55"
   2
   3 \header {
   4   texidoc = "The @code{shorten-pair} property works with circled-tip
   5 hairpins.  When two hairpins share a circle, the adjoining ends are
   6 not moved.
   7 "
   8 }
   9
  10 {
  11   \override Hairpin.circled-tip = ##t
  12   \once \override Hairpin.shorten-pair = #'(-2 . -4)
  13   c'1~\<
  14   c'2~ c'\!
  15   \once \override Hairpin.shorten-pair = #'(0 . -4)
  16   c'1~\>
  17   c'2~ c'\!
  18   \break
  19   \override Hairpin.shorten-pair = #'(4 . -8)
  20   c'2~\> c'2~\<
  21   c'2~ c'2\!
  22 }