% original code: % github.com/openlilylib/oll-core/blob/master/internal/predicates.scm

#(begin

(define (lilypond-version-string)
  (string-join
    (map (lambda (elt) (if (integer? elt) (number->string elt) elt))
      (ly:version))
   "."))

(display (format "~a\n~a\n" (lilypond-version-string) (ly:get-option 'datadir)))

)