\version "2.18.0"

MvmntIVoiceI = {
         d''8 d''8 d''8 d'' d''16( e'' fis'' e'' d''8) d''16( e''
         fis''8) fis''8 fis''8 fis''8 fis''16( g'' a'' g'' fis''8) 
         %{ \once \override Slur
      #'control-points = #'((0.2 . 3.04) (1.88 . 4.95) (4.67 . 5.3) (6.36 . 4.9)) %}
         fis''16( g''
         \break a''8) a''8 a''8 a''8 a''4. d'''8
         a''8 fis''8 r8 d''' a''8 fis''8 r8 a'' 
}


MvmntIVoiceII = {
         s1*4/4          \skip 4 \skip 2 \skip 8 a8(
         \clef treble d') <d' a'>8 <d' a'>8 <d' a'>8 \skip 2
         s1*4/4 }

\layout {indent = 0.0}
#(set-default-paper-size "a4")
#(set-global-staff-size 26)


\score { %Start of Movement
 
 \new PianoStaff 
 << 

   %Start of Staff
   \new Staff = "RH"  << 
     \new Voice = "VoiceIMvmntI"  { 
       
       \MvmntIVoiceI                } %End of voice
     
   >>

   \new Staff = "LH"  << 
     \new Voice = "VoiceIIMvmntI"  { 
       \clef bass 
       
       \MvmntIVoiceII                } %End of voice
     
   >>
%End of Staff
 >>

} %End of Movement