Thanks Thimothy

2018-01-13 13:49 GMT-05:00 Timothy Lanfear <timo...@lanfear.me>:
> See this thread

I will.

Here is where I am so far.

I'm trying to get some basic iteration going on.
Still, I'm not sure why it does not work.

-- 
Pierre-Luc Gauthier

%%%%%%%%%%%%%%%%%%%
\version "2.21.0"

scoreI = \score {{ces''4}}

scoreII = \score {{cis''4}}

bookFunc = #
(define-void-function
 (score-list filename)
 (list?  string?)
 (ly:book-process #{
   \book {
     \header {title = #(strftime "%H:%M:%S" (localtime (current-time)))}

     % $(car score-list) % This works
     % $(cadr score-list) % This works

     $(for-some-music ;; Or map? Neither works
        (lambda (score)
          score)
        score-list)
   }
   #} #{ \paper {} #} #{ \layout {} #}
   (string-append "Part-" filename)))

\bookFunc #(list scoreI scoreII) "fileName"
\version "2.21.0"

scoreI = \score {{ces''4}}

scoreII = \score {{cis''4}}

bookFunc = #
(define-void-function
 (score-list filename)
 (list?  string?)
 (ly:book-process #{
   \book {
     \header {title = #(strftime "%H:%M:%S" (localtime (current-time)))}

     % $(car score-list) % This works
     % $(cadr score-list) % This works

     $(for-some-music ;; Or map? Neither works
        (lambda (score)
          score)
        score-list)
   }
   #} #{ \paper {} #} #{ \layout {} #}
   (string-append "Part-" filename)))

\bookFunc #(list scoreI scoreII) "fileName"
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to