Hi Emilio,
Something like this can be adapted to your need?
Andrew
====
\version "2.19.81"
% simple debug print
#(define (dbg . args)
"Simple debug console print."
(cond
((not (null? args))
(display (car args))
(display " ")
(apply dbg (cdr args)))
(else (newline))
)
)
%==========================
function =
#(define-scheme-function (arg1 arg2) (number? (symbol? 'bigHarmonica))
(dbg arg1)
(dbg arg2)
#t
)
myProperty = #'someHarmonica
{
\function 0 \myProperty
\function 1 #'mediumHarmonica
\function 2 #'littleHarmonica
\function 3 \default
\function 4 \myProperty
#(define myProperty 'anotherHarmonica)
\function 5 \myProperty
c''4
}
====
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
