\version "2.18.2"

\paper {
  ragged-last = ##f
  ragged-last-bottom = ##f
}

pianoRH = \relative c'' { c4 d e c }

pianoLH = \relative c { c2 g'4 e }

hornNotes = \relative c'' { g2 c }

dyn = { s2\mf\< s\!\f }
        
\score {
  <<
    \new Staff 
    \with { 
      fontSize = #-3
      \override StaffSymbol.staff-space = #(magstep -3)
      \override StaffSymbol.thickness = #(magstep -3)
    }
    \new Voice \hornNotes
    \new Dynamics {
      \override DynamicText.font-size = #-3
      \dyn
    }
    \new PianoStaff <<
      \new Staff \pianoRH
      \new Dynamics \dyn
      \new Staff {
        \clef bass
        \pianoLH
      }
    >>
  >>
  \layout {
    \context {
      \Staff
      \override VerticalAxisGroup.default-staff-staff-spacing =
        #'((basic-distance . 2)
           (minimum-distance . 2)
           (padding . 1))
      \override VerticalAxisGroup.staff-staff-spacing = #'((basic-distance . 2))
    }
  }
}