%% Generated by lilypond-book
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm,paper-height=845.047\pt,paper-width=597.508\pt,papersize='(cons (* 597.508 pt) (* 845.047 pt))]
\include "lilypond-book-preamble.ly"


% ****************************************************************
% Start cut-&-pastable-section
% ****************************************************************

#(ly:set-option 'eps-box-padding 3.000000)



\paper {
  #(set-paper-size '(cons (* 597.508 pt) (* 845.047 pt)))
  indent = 0\mm
  line-width = 160\mm
  % offset the left padding, also add 1mm as lilypond creates cropped
  % images with a little space on the right
  line-width = #(- line-width (* mm  3.000000) (* mm 1))
}

\layout {
  
}




% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "/lilypond-2.26.0/input/regression/ledger-line-properties.ly"
\sourcefileline 0
\header {
  texidoc = "This regression test combines the @code{StaffSymbol} properties
@code{line-positions}, @code{ledger-positions}, and @code{ledger-extra} to
check ledger line creation behaviour.  The red line indicates the single
staff line used, with the number below showing its vertical position."
}

\version "2.25.27"

#(define ledger-positions '(0 (2 3 4)))

\markup \concat { "ledger line positions: #"
                  #(scm->string ledger-positions) }

$@(map
   (lambda (x)
     #{
       \new Staff \with {
         \omit Clef
         \omit TimeSignature
         \override StaffSymbol.ledger-positions = #ledger-positions
         \override StaffSymbol.color = #red
         \override TextScript.Y-offset = #-7
         \override StaffSymbol.ledger-extra = #x
         instrumentName = #(format #f "ledger-extra: ~a" x)
       } {
         \cadenzaOn
         $@(map
            (lambda (i)
              #{
                \startStaff\stopStaff
                \override Staff.StaffSymbol.line-positions = #(list i)
                <>_\markup \tiny #(number->string i)
                e''4
              #})
            (iota 19 -9 1))
       }
     #})
   (iota 5 -8 4))



% ****************************************************************
% end ly snippet
% ****************************************************************
