\version "2.8.0"

\paper {
  #(set-paper-size "a5")
  indent = 0\mm
}

upper = {

  \time 3/8
  \key b \minor

  << {fis'4( ~ fis'16 a') | } 
  \\ {fis'16( \tieUp d' ~ \once \override Stem #'transparent = ##t d' 
  \change Staff = lower \stemUp 
  \once \override Staff.Clef #'extra-offset = #'(-2.0 . -0.25)
  \once \override Staff.Clef #'font-size = #-1
  \clef G g ~ < g e> 8) | } 
  \\ {s8 d'4 | } 
  \\ { \oneVoice
       \override Stem #'length = #13.5
       \override Stem #'flag-style = #'no-flag
       s8 b16 s8. | } 
  >> 
  
  << {g'4( ~ g'16 fis') | }
  \\ {g'16( \tieUp e' ~ \once \override Stem #'transparent = ##t e' 
  \change Staff = lower \stemUp 
  a fis d) | } 
  \\ {s8 e'4 | } 
  \\ { \oneVoice
       %\override Stem #'length = #'(3.5 3.5 7.0 4.5 5.0)
       %\override Stem #'flag-style = #'no-flag
       s8 cis'16 s8. | }  
  \\ { s4. } 
  \\ { \override NoteColumn #'force-hshift = #-0.6484375 
       \override NoteHead #'transparent = ##t 
       \change Staff = lower s8. a | } 
  \\ { s4. } 
  \\ { \change Staff = lower s4 fis8 | } 
  \\ { \oneVoice 
       \override Stem #'flag-style = #'no-flag 
       \change Staff = lower s4 s16 d | } 
  >>
  
  << {cis'4( ~ cis'16 b16) | }
  \\ {cis'16( \tieUp a ~ \once \override Stem #'transparent = ##t a 
  \change Staff = lower \stemUp 
  \once \override Staff.Clef #'font-size = #1
  \clef F d b, g,) | } 
  \\ {s8 a4 | } 
  \\ { %\oneVoice
       \override Stem #'length = #7.0
       %\override Stem #'flag-style = #'no-flag
       \override NoteColumn #'force-hshift = #0.0
       s8 fis16 s8. | }  
  \\ { s4. } 
  \\ { \override NoteColumn #'force-hshift = #-0.6484375
       \override NoteHead #'transparent = ##t 
       \change Staff = lower s8. d | } 
  \\ { s4. } 
  \\ { \change Staff = lower s4 b,8 | } 
  \\ { \oneVoice 
       \override Stem #'flag-style = #'no-flag 
       \change Staff = lower s4 s16 g, | } 
  >>

}

dynamics = {

  \override DynamicText #'extra-offset = #'(-1 . 2)

  s\p 

}

\score {
  \context PianoStaff <<
    \context Staff=upper \transpose c c' \upper
    \context Dynamics=dynamics \dynamics
    \context Staff=lower <<
      \clef bass \key b \minor s4. | s4. | s4. | 
    >>
  >>
  \layout {
    \context {
      \type "Engraver_group"
      \name Dynamics
      \consists "Output_property_engraver"
    
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
     
      \consists "Dynamic_engraver"
  
      \override DynamicText #'extra-offset = #'(0 . 2.5)
     
      \consists "Skip_event_swallow_translator"
    
      \consists "Axis_group_engraver"
    }
    \context {
      \PianoStaff
      \accepts Dynamics
      \override VerticalAlignment #'forced-distance = #6.75
    }
  }
  \midi { \tempo 4=36 }
}