input/test/force-hshift.fly

   1
   2 \context Staff <
   3         \context Voice = VA {
   4                 \property Voice.forceHorizontalShift = "0.1"
   5                 % \stemup \shifton
   6                 \property Voice.verticalDirection=1
   7                 \property Voice.horizontalNoteShift=1
   8                 <g' d'>
   9         }
  10
  11         \context Voice = VB {
  12                 %\stemdown \shifton
  13                 \property Voice.verticalDirection=-1
  14                 \property Voice.horizontalNoteShift=1
  15                 \property Voice.forceHorizontalShift = #-0.1
  16                 <bes f'>
  17         }
  18 >