%% Generated by lilypond-book.py
%% Options: [alt=[image of music],printfilename,indent=0\mm,texidoc,line-width=160\mm]
\include "lilypond-book-preamble.ly"


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



\paper {
  #(define dump-extents #t)
  
  indent = 0\mm
  line-width = 160\mm
  force-assignment = #""
  line-width = #(- line-width (* mm  3.000000))
}

\layout {
  
}



% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "/main/src/gub/target/linux-x86/src/lilypond-git.sv.gnu.org--lilypond.git-stable-2.12/input/regression/mensural-ligatures.ly"
\sourcefileline 0
\version "2.12.0"

\header {
  texidoc = "Mensural ligatures show different shapes, depending on the
  rhythmical pattern and direction of the melody line."
}


\layout {
  ragged-right = ##t
  indent = 0.0
  \context {
    \Voice
    \remove "Ligature_bracket_engraver"
    \consists "Mensural_ligature_engraver"
  }
  \context {
    \Score
    \override SpacingSpanner #'packed-spacing = ##t
  }
}

\context Voice {
  \clef "petrucci-c4"
  \set Staff.printKeyCancellation = ##f
  \cadenzaOn % turn off bar lines
  #(set-accidental-style 'forget)
  \textLengthOn

				% ligaturae binaria

  \[
    b\breve^\markup { \column { { \bold "ligaturae binaria" } "BL" } }
    g\longa
    \]

  \[
    g\breve^\markup { "BL" }
    b\longa
    \]

  \[
    b\longa^\markup { "LL" }
    g
    \]

  \[
    g\longa^\markup { "LL" }
    b
    \]

  \[
    b\breve^\markup { "BB" }
    g
    \]

  \[
    g\breve^\markup { "BB" }
    b
    \]

  \[
    b\longa^\markup { "LB" }
    g\breve
    \]

  \[
    g\longa^\markup { "LB" }
    b\breve
    \]

  \[
    b1^\markup { "SS" }
    g
    \]

  \[
    g1^\markup { "SS" }
    b
    \]

  \bar "|" \break

				% ligaturae ternariae, quaternariae, etc. (sicut in Apel[1])

  \[
    b\breve^\markup {
      \column { { \bold "ligaturae ternariae, quaternariae, etc." } "BBL" } }
    a
    g\longa
    \]

  \[
    a\breve^\markup { "BBBB" }
    g
    a
    b
    \]

  \[
    b1^\markup { "SSBBBLB" }
    a
    g\breve
    a
    b
    a\longa
    b\breve
    \]

  \[
    a\longa^\markup { "LBMxBL" }
    g\breve
    a\maxima
    b\breve
    a\longa
    \]

  \[
    d'\breve^\markup { "BBBBLL" }
    c'
    f
    d'
    b\longa
    g
    \]

  \[
    c'1^\markup { "SSBLLBB" }
    b
    g\breve
    d'\longa
    a
    c'\breve
    b
    \]

  \bar "|" \break

				% examples from "dtv-Atlas zur Musik" [2]

  \[
    d'\breve^\markup { \column { { \bold "dtv-Atlas" } "BBL" } }
    c'
    b\longa
    \]

  \[
    a\breve^\markup { "BBBL" }
    b
    c'
    d'\longa
    \]

  \[
    b\longa.^\markup { "L.B.BBLBBB" }
    g\breve.
    a\breve
    b
    c'\longa
    a\breve
    b
    a
    \]

  \[
    c'1^\markup { "SSBB" }
    b
    g\breve
    a
    \]

  \[
    b\longa^\markup { "LBL" }
    a\breve
    c'\longa
    \]

  \[
    a1^\markup { "SSBL" }
    b
    d'\breve
    c'\longa
    \]

  \bar "|" \break

				% some ligatures from Ockeghem: Missa De plus en plus

  \[
    c'\maxima^\markup {
      \column { { \bold "Ockeghem: Missa De plus en plus" } "MxMx" } }
    g
    \]

  \[
    d\longa^\markup { "LBBBB" }
    c\breve
    f
    e
    d
    \]

  \[
    c'\maxima^\markup { "MxL" }
    d'\longa
    \]

  \[
    e'\breve^\markup { "BBB" }
    d'
    c'
    \]

  \[
    b\longa^\markup { "LBBBBB" }
    c'\breve
    d'
    g
    f
    g
    \]

  \[
    g\breve^\markup { "BBBBL" }
    b
    c'
    e'
    d'\longa
    \]

  \[
    e'1^\markup { "SSB" }
    a
    g\breve
    \]

  \[
    g\longa^\markup { "LLLL" }
    b
    c'
    e'
    \]

  \bar "|" \break

				% some from the Requiem

  \[
    a1^\markup { \column { { \bold "Ockeghem: Requiem" } "SSBBBBBBBL" } }
    d
    e\breve
    f
    d
    f
    e
    f
    g
    e\longa
    \]

  \[
    c'\breve^\markup { "BBBBL" }
    c
    d
    c
    c'\longa
    \]

  \bar "|" \break

				% crazy ligatures

  \[
    c\breve^\markup { \column { { \bold "crazy ligatures" } "BBBBB" } }
    e
    f
    g
    bes
    \]

  \[
    bes\breve^\markup { "BB" }
    a
    \] % TODO: accidentals must be collected and printed before ligature

  \[
    a\breve.^\markup { "B.B.B.B.B.B.B.B.B." }
    g
    b
    a
    e
    g
    f
    a
    g
    \]

  \[
    b^\markup { "B.B." }
    a
    \] % TODO: dots within ligatures must be placed above heads

  \bar "|" \break

				% invalid ligatures (those commented out are rejected with explanation)

				%  \[
				%    a1^\markup { \column { { \bold "invalid ligatures" } "SS" } }
				%    as
				%  \]

  \[
    a\breve^\markup { "BBB" }
    g
    as
    \]

				%  \[
				%    f\longa^\markup { "LLB" }
				%    g
				%    f\breve
				%  \]

				%  \[
				%    f\breve^\markup { "BSLB" }
				%    a1
				%    g\longa
				%    a\breve
				%  \]
}


% Litterae:
%
% [1] Willi Apel: The Notation of Polyphonic Music. 900-1600.
% [2] Ulrich Michels: dtv-Altlas zur Musik, 1977.
%



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