\version "2.19.25"
\language "deutsch"
\paper { #(set-paper-size "a7") indent = 0 }
\header { tagline = ##f }

global =
#(define-music-function (mus) (ly:music?)
   #{
     \relative {
       \partial 8
       \time 2/4
       \key fis \major
       $mus
       %\bar "||"
     }
   #}
   )

\markup \column {
  \line { stripped-down example from }
  \line { Chopin: Nocturne op. 15 no. 2, m. 8/9 }
  \line { standardised notation A }
}
\global
<<
  {
    \grace { ais16 cis fis } ais16. h32
    \grace { h,16 eis } ais16 gis eis cis
  }
  \\
  {
    \mergeDifferentlyDottedOn
    \grace { ais8.~ } 8[
    \grace { h8~ } 16]
  }
>>

\markup { standardised notation B }
\score {
  \global {
    <<
      \set Staff.connectArpeggios = ##t
      {
        ais'16.\arpeggio h32
        ais16\arpeggio gis eis cis
      }
      \\
      {
        <ais cis fis>8\arpeggio [
        <h eis>16\arpeggio ]
      }
    >>
  }
  \layout {
    \context {
      \Staff
      \consists "Span_arpeggio_engraver"
    }
  }
}

\markup { approach to original notation }
\global <<
  {
    ais16*1/6 -\offset positions #'(-0.2 . -0.2) [
    \set fontSize = -3 cis fis] \unset fontSize ais16.*3/4 h32*3/4
    h,16*1/4[ \tweak font-size -3 eis] ais16*7/8 gis eis cis
  }
  \\
  {
    ais=8[
    h16*4/5]
  }
>>