Wrong pitch

[Christophe Papazian]

Hi,

I made a simple example of what I did, and I don't understand what's wrong :

%%%%%%%%%%%%%%%%
 \version "2.16.1"

ArpOne =
#(define-music-function
     (parser location noteA noteB)
     (ly:music? ly:music?)
   #{           
     #noteA #noteB
     #noteA #noteB
     #noteA #noteB
     #noteA #noteB
   #})


\relative c'' {\clef treble
aes1 \ArpOne a8 b c1
}
%%%%%%%%%%%%%%%%

If someone can help me to repeat my notes using a music function within the 
right octave !
(Here the octave is wrong as you can see if you try to typeset that example)

Thanks,

        Christophe