input/test/drarn.ly

   1
   2 \score {
   3   \context Staff \notes <
   4     \time 3/8;
   5     \context Voice=one \relative c'' {
   6       \property Voice.Stem \set #'direction = #1
   7       \property Voice.Tie \set #'direction = #1
   8       \property Voice.Slur \set #'direction = #1
   9       \property Voice.Slur \set #'attachment = #'(head . head)
  10       c8~c()c
  11     }
  12     \context Voice=two \relative c'' {
  13       \property Voice.Stem \set #'direction = #-1
  14       \property Voice.Tie \set #'direction = #-1
  15       \property Voice.Slur \set #'direction = #-1
  16       \property Voice.Slur \set #'attachment = #'(head . head)
  17       a8()a~a
  18     }
  19   >
  20   \paper { linewidth = 40*\staffspace; }
  21 }