…list (1+ (modulo num mod))))) % Expand the (string fret) pairs to valid lilypond syntax #(define (fret-from-list … …n1)))) n1))) % arg1 is the list of (string fret) pairs making up the scale % arg2 is the … …is a scale factor used to enlarge the fret diagram #(define-markup-command (scale-diagramm layout props arg1 arg2 …