Music function for arrow directions in arpeggios

[Caio Giovaneti de Barros]

I'm trying to write a function to make easier for me to change arrow 
directions in arpeggios. When writing music for guitar is very annoying 
to be constantly changing the arrow directions. Consider, for instance:

\relative c' {
 \arpeggioArrowDown
 <c c' e>8.\arpeggio
 \arpeggioArrowUp
 q16\arpeggio
 \arpeggioArrowDown
 q8.\arpeggio
 \arpeggioArrowUp
 q16\arpeggio
 \arpeggioArrowDown
 q4\arpeggio
}

I tried the following code, but lilypond doesn't understand it. Any 
suggestions?

arpeggioUp = #(define-music-function (chord) (ly:music?)
                #{
                  \arpeggioArrowUp
                  #chord \arpeggio
                #})

\relative c' { \arpeggioUp { <c c' e> } }