keyboardIntroUpper = \relative c' {
  <cis e g>8 ~ <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r <cis e gis>-.
  r <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r

  <cis e g>8 ~
  <cis e g>8 ~ <cis e gis>-.
  r <cis e gis>-. r <cis e gis>-. r <cis e gis>-.
  r <cis e gis>-. r <cis e gis>-.

  <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 |
  <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 |
  r2 |
}

keyboardIntroLower = \relative c {
  cis4-. gis-. cis-. gis-.
  cis-. gis-. cis-. r8 cis ~
  cis4 gis-. cis-. gis-.
  cis-. gis-.
  dis8 r r d ~ d2 |
  dis8 r r d ~ d2 |
  r2 |
}

keyboard = \new PianoStaff <<
  \new Staff \relative c'  {
    \set Staff.midiInstrument = #"reed organ"
    \time 2/4
    \key cis \minor
    r4 r8 <cis e g> ~ |
    \keyboardIntroUpper
    \keyboardIntroUpper
  }

  \new Staff \relative c {
    \set Staff.midiInstrument = #"reed organ"
    \clef bass
    \key cis \minor
    r2 |
    \keyboardIntroLower
    \keyboardIntroLower
  }
>>