\score {
  \context PianoStaff \notes \relative c' <
    \context Staff="up" {
      \autochange Staff \context Voice=VA {
      f e d c | b a g f | f g a b | c d e f |
      <f,4 a f' a> <g b g' b> <a c a' c> <b d b' d> |
      <c e c' e> <d f d' f> <e g e' g> <f a f' a> |
      <f a f' a> <e g e' g> <d f d' f> <c e c' e> |
      <b d b' d> <a c a' c> <g b g' b> <f a f' a> |
      <e g e' g> <d f d' f> <c e c' e> <b d b' d>
      }
    }
    \context Staff=down {\clef bass s1*8}
  >
}