Simple scheme function

[Павел Буданов]

Hello, I'm newbie in scheme. I want to write simple function to octavize
melody, but something doesn't works...


\version "2.20.0"
octavize = #(define-music-function
    (parser location music) (ly:music?)
    #{ << #music \transpose c c' #music >> #})

music = { c' d' e' f' }

\markup "Need:"
\new Voice { << \music \transpose c c' \music >> }
\markup "Got:"
\new Voice { \octavize \music }