4 \header { texidoc="@cindex Slur Ugly
5 You can get ugly slurs, if you want. "
8 baseWalk = \notes \relative c {
9 d,8( a' d f a d f d a f d a)
13 \notes \context PianoStaff <<
15 \context Staff=up { s1 * 6/4 }
16 \context Staff=down <<
18 \autochange \context Voice \baseWalk
25 \override Slur #'beautiful = #5.0
26 \override Slur #'direction = #1
27 \override Stem #'direction = #-1
28 \override autoBeamSettings #'(end * * * *)
29 = #(ly:make-moment 1 2)
33 \override VerticalAlignment #'threshold = #'(5 . 5)