arpeggio on chord notated with separate voices

[Steven McDougall]

> I'm not top posting.

%% Bach keyboard partita in E minor (BWV 830) movement 4. Sarabande, measure 4
%% notates this chord with separate voices,
%% and then puts an arpeggio across the whole thing.

%% Is there any way to do this in LilyPond?

\version "2.10.33"

\paper{ ragged-right=##t }

\score 
{
  \new PianoStaff 
  <<
    \new Staff
    \relative c'''
    {
      << { a4 } \\ { f, } \\ { f' } \\ { } \\ { d } \\ { } \\ { b } >>
    }

    \new Staff 
    {
      \clef bass
      d'4
    }
  >>
}