av = #(define-music-function (parser location x) (ly:music?)
  #{
   \changePitch \samePitch { c8 ~ c4 } $x
  #})

But of course, for this example, this will work without any added file :-)

av = #(define-music-function (parser location x) (ly:pitch?)
 #{
   $x 8 ~ $x 4
 #})

\new Staff \relative c' {
   c4. \av es f4
   fis4. \av fis g4
}


--
Gilles

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to