\version "2.19.35"
\include "articulate.ly"
% -*- indent-width: 8; tab-width: 8; indent-tabs: true;
#(set-default-paper-size "a5" 'landscape)

global = { \key es \minor \time 4/4 \tempo 4 = 54 }

rightHand = \relative c' { \clef treble
	\times 2/3 { es8 ges as  } bes4 r4 ces |
	\times 2/3 { as8 ges bes } f4   r4 ges |
	\times 2/3 { es8 ges as  } bes4 r4 des |
}

leftHand = \relative c, { \clef bass
	\resetRelativeOctave c, \times 2/3 { es8  ges bes } es4  r2 |
	\resetRelativeOctave c, \times 2/3 { des8 f   as  } des4 r2 |
	\resetRelativeOctave c, \times 2/3 { ces8 es  ges } ces4 r2 |
}

pianoDynamics = {
	s1\p\< s1 s2 s4 s4\f
}

pedal = {
	\override SustainPedal.X-offset = -1
	s32*31\sustainOn s32\sustainOff
	s32*15\sustainOn
		\once\override SustainPedal.X-offset = -2
		s32\sustainOff s32*15\sustainOn s32\sustainOff
	s32*31\sustainOn s32\sustainOff
}

pianoStaff = \new PianoStaff = "piano" <<
	\new Staff = "up" << \global \rightHand >>
	\new Dynamics = "dynamics" \pianoDynamics
	\new Staff = "down" << \global \leftHand >>
	\new Dynamics = "pedal" \pedal
>>

pianoStaffMidi = \new PianoStaff = "piano" <<
	\set PianoStaff.midiInstrument = #"acoustic grand"
	\new Staff = "up" << \global \pianoDynamics \pedal \rightHand  >>
	\new Staff = "down" << \global \pianoDynamics \pedal \leftHand  >>	
>>

\score { \pianoStaff \layout { \context { \Score
	proportionalNotationDuration = #(ly:make-moment 1 16)
	\override SpacingSpanner #'uniform-stretching = ##t
} } }

\score { \unfoldRepeats \articulate << \pianoStaffMidi >> \midi {} }