\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.8)
#(ly:set-option 'point-and-click #f)
%mobile -s15.0 -i3.2

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
mtempo={\tempo 4 = 100}
mtempob={\tempo 4 = 50}
incipitwidth = 20
mt=#(define-music-function (parser location offset) (number?) ; move lyric text
      #{ \once \override LyricText.X-offset = -$offset #})


htitle="Let go, why do you stay me?"
hcomposer="Bennet"

\header {
	title=\markup{\fontsize #4 "4. Let go, why do you stay me?"}
	subtitle="Madrigals to four voices"
	subsubtitle=\markup{\null \vspace #2 }
	composer="John Bennet (c.1575-c.1614)"
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{"London 1599"} % Madrigalls to foure voyces newly published by Iohn Bennet his first works (1599)
	copyright=\markup{
		\fill-line {"Transcribed and edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={\key g \major \time 2/2
        \skip 1*12 \bar "||"
        \skip 1*12 \bar "||"
        \skip 1*22 \bar "||"
        \stopStaff
        \skip 1
        \startStaff
        \set Score.currentBarNumber=#59
        \skip 1*8 \bar "|."
}


cantus=\relative c''{
	a2 fis
	r4 d d'4. c8
	b4. a8 g2
	e4 e c'4. b8
	a4 g2 fis4
	g2 r4 b
	d2 r4 b
	d2 r4 d,
	fis4. g8 a2
	r4 a, cis4. d8
	e4 fis g2
	fis1 \break
	\once \override Script.padding = #1
	r4^\segno a a a
	d,8 e fis[ g] a4. b8
	cis2 d
	r2 r4 d
	d d g,8 a b8[ c]
	d4 d,8[ e fis g] a4
	b4 g fis b ~
	b8[ a g a] b[ c] d4
	c2 b
	a2 d,
	r4 d'2 c4 ~
	c b a2
	\mark \markup{\fontsize #-2 \center-column{"2ª vez" \line{"salta a" \raise #.5 \musicglyph #"scripts.coda"}}}
	b1
	R1
	r2 g ~
	g d
	fis e
	g2. fis8[ e]
	d2 r
	r a'
	a b
	c1
	b2 r4 d
	b4. c8 d4 a
	b b a4. a8
	b4 g fis4. fis8
	g2 e
	a fis
	b4. a8 g2
	fis2 fis4 fis8 fis
	e4 fis g2
	fis4 a b4. a8
	g4 a fis2
	e2 r4 e
	\override Score.RehearsalMark.self-alignment-X = #RIGHT
	\mark \markup{\center-column{"D.S." \fontsize #-3 "bar 13"}}
	s1
	\once \override Score.RehearsalMark.padding = #2
	\mark \markup{\musicglyph #"scripts.coda"}
	s4*0^\markup{\smaller "Cantus 1"}
	g4 b d2
	r4 b d2
	r4 d, fis4. g8
	a2 r4 a,
	cis4. d8 e2
	r4 a g fis
	b a a2
	a\breve*1/2
}

altus=\relative c''{
	r2 a
	fis r4 d
	d'4. c8 b4. a8
	g2 c,4 g'
	fis4 g a2
	b4 b d2
	r4 b d2
	r4 d, fis4. g8
	a2 r4 a,
	cis4. d8 e4 a,
	b8 c d2 cis4
	d2 d
	fis2 e4 fis ~
	fis8 e d4 e a
	a a d,8 e fis[ g]
	a4 fis b2
	a4 d, e8 fis g e
	fis4. g8 a4 fis
	g4 d' d d
	g,8 a b8[ c] d4 b
	e2 d4 g,
	c4 c b4. a8
	g8[ fis] g2 a4 ~
	a g2 fis4
	g1
	d'1
	a2 c
	b d ~
	d a
	c b ~
	b4 a g2
	fis2. d4
	e fis g2 ~
	g2 fis
	g4 d' b4. c8
	d4 g, a2
	r4 g fis4. fis8
	g4 b a4. a8
	b4 g2 c4 ~
	c a2 d4 ~
	d d b cis
	d2 a4 a8 a
	a4 a b2
	a4 fis g4. fis8
	e4 e d2
	s4*0^\markup{\fontsize #-2 \column{"se intercambian al" "repetir cantus 1 y 2"}}
	cis2 r
	s1
	s4*0^\markup{\smaller "Cantus 2"}
	b'2 r4 b
	d2 r4 b
	d2 r4 d,
	fis4. g8 a2
	r4 a, cis4. d8
	e2 r4 a
	g fis e2
	fis\breve*1/2
}

tenor=\relative c{
	r2 r4 d
	d'4. c8 b4. a8
	g2 g4 e
	c'4. b8 a4 g
	d'1
	g,
	g4 g'2 g,4
	b4. c8 d2
	r4 d, fis4. g8
	a2. fis4
	e d e2
	d1
	\phrasingSlurDashed
	d'4.\( d8\) cis4 a
	d2 cis4. d8
	e4 a, b a8[ g]
	fis8[ g] a4 g2
	fis4 b4. a8 g4
	a d d d
	g,8 a b8[ c] d4 b
	e2 d
	r4 g g g
	c,8 d e[ fis] g2
	d2 e
	\parenthesize a,4 d d2 % solo segunda vez
	d b ~
	b fis
	a g
	b1
	a2 c
	e2. d8[ c]
	b2. cis4
	d2 a4 b
	c2 d
	e2 a,
	r4 d, g2 ~
	g4 b a d
	b4. c8 d2 ~
	d d
	b g
	c a
	d4 b2 g4
	a2 d4 d8 d
	cis4 d g,8[ a b \ss c]
	d4 d d4. d8
	b4 a a2
	a2 cis
	s1
	d1
	g,4 g'2 g,4
	b4. c8 d2
	d d4 fis
	e2 a,
	r4 e g a
	b8 c d2 cis4
	d\breve*1/2
}

bassus=\relative c'{
	R1*11
	r4 a a a
	d,8 e fis[ g] a4 fis
	b2 a ~
	a r4 d,
	d4 d g,8 a b[ c]
	d4 b e2
	d1
	R1
	r4 g g g
	c,8 d e[ fis] g4 e
	a2 g4 g,
	b2 c
	d1
	g,2 g' ~
	g d
	fis e
	g1
	d2 a'
	e2. fis4
	g2. fis8[ e]
	d2 d
	c2 b
	a1
	g
	r4 g' fis4. fis8
	g2 r4 d
	b4. c8 d2
	g,2 c
	a d
	b e
	d1
	R1
	r4 d g4. d8
	e4 cis d2
	a4 a' a a
	s1
	g,1
	R1*2
	r4 d' fis4. g8
	a2 r4 a,
	cis4. d8 e4 fis
	g4 d a'2
	d,\breve*1/2
}

textocantus=\lyricmode{
Let go % goe
\italicas let go, \rectas why do you stay me,
\italicas let go, why do you stay me \rectas
let go
\italicas let go \rectas
let go, \italicas let go \rectas
let go, why do you stay me?
I will for spite go run __ _ and slay me
I will for spite go run __ _ % segunda vez italicas
and __ _ slay me, % 
go run __ _ _ and __ _ slay me
go \italicas run and slay me. \rectas
O new found tor -- ment -- _ ing
O strange dis -- dain -- ing
I die for love,
for love,
I die for love, % italicas una de las veces
I die for love,
yet fain'd is my com -- plain -- ing,
but you that say I fain -- ed,
now see what you have gain -- ed
\italicas now
me, \rectas
let go
let go
\italicas let go, let go
let go, let go \rectas
let go,
why do you stay me?
}

textoaltus=\lyricmode{
Let go
\italicas let go, \rectas why do you stay me,
why \italicas do you stay me, \rectas
let go
\italicas let go \rectas
let go,
let go
\italicas let go, let go, \rectas
why do you stay __ _ me?
why \italicas do you stay __ _ _ me, \rectas
I will for spite go run __ _ and slay
me,
I \italicas will for spite go run and slay __ _ me, \rectas % primera vez I italicas
I will for \mt #3 \italicas spite \mt #0 go run __ _ and slay me, \rectas
I \italicas will for spite go run __ _ and slay __ _ me. \rectas % primera vez I italicas
O new found tor -- ment -- ing,
new \italicas tor -- _ ment -- ing, \rectas
O strange dis -- dain -- _ ing,
I die for love, for love
I \italicas die for love, \rectas
I \italicas die for love, \rectas
yet fain'd is my com -- plain -- _ ing,
but you that say I fain -- ed,
now see what you have gain -- ed
\italicas me \rectas
let go
let go
\italicas let go, let go
let go, let go \rectas
why do you stay me?
}
textoaltusb=\lyricmode{
_ _ _ _ _ _ _ _ _ _ _ _ 
_ _ _ _ _ _ _ _ _ _ _ _ 
_ _ _ _ _ _ _ _ _ 
\set stanza = \markup{\fontsize #-6 "Cantus 1:"}
\italicas see what you have gain -- ed, \rectas
}

textotenor=\lyricmode{
Let go why do you stay me,
\italicas let go why do you stay me, \rectas
let go, \italicas let go, \rectas let go
\italicas let go, \rectas let go,
why do you stay me?
why __ _ \italicas do you stay me, \rectas
why do you stay __ _ _ _ \italicas me,
why do you stay \rectas me, % no hay ij
I will for spite go run __ _ and slay me
\italicas I will for sit go run __ _ and slay me, \rectas
and slay me.
O new found tor -- ment -- ing,
new found tor -- _ _ ment -- ing,
O strange dis -- dain -- ing
I die for love,
\italicas I die for love, \rectas
for love,
yet fain'd is my com -- plain -- ing,
but you that say I fain -- ed,
now see what you have gain -- ed,
now
me,
let go,
\italicas let go,
let go, \rectas
why do you stay me
let \italicas go, why do you stay __ _ me? 
}
textotenorb=\lyricmode{
_ _ _ _ _ _ _ _ _ 
_ _ _ _ _ _ _ _ _ 
_ _ _ _ _ _ _ _ _ _ _ 
\italicas \mt #0 see what you have gain -- ed,
now see what you have gain -- _ ed,
what you have gain -- ed, \rectas
}

textobassus=\lyricmode{
I will for spite go run __ _ and slay me
I \italicas will for spite go run __ _ and slay me \rectas % primera vez I italicas
I will for spite go run __ _ and slay me, % runne
go run and slay me.
O new found tor -- ment -- ing,
new found tor -- ment -- _ ing,
O strange dis -- dain -- ing
I die for love
\italicas I die for love, \rectas
yet fain'd is my com -- plain -- ing
now see what you have gain -- ed,
I will for
me
let go let go
\italicas let go,
let go, \rectas
why do you stay me?
}


incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Cantus 1 "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-g"
		\key c \major
		\time 2/2
                d''2
		} 

	\layout { line-width=\incipitwidth indent = 0 }
	}
}

incipitaltus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Cantus 2 "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-g"
		\key c \major
		\time 2/2
                d''2
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}


incipittenor=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tenor        "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c2"
		\key c \major
		\time 2/2
                g4
		} 
	\layout { line-width=\incipitwidth indent=0 }
	}
}

incipitbassus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Bass          "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c4"
		\key c \major
		\time 2/2
                d'4
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}

%\layout {
%       \context {\Voice
%               \remove Ligature_bracket_engraver
%               \consists Mensural_ligature_engraver
%       }
%       line-width=\incipitwidth
%       indent = 0
%}



\score {\transpose c' c'{
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName=\incipitcantus
		%\set Staff.instrumentName="Cantus 1 "
		\clef "treble"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	>>

	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName=\incipitaltus
		%\set Staff.instrumentName="Cantus 2 "
		\clef "treble"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	\new Lyrics \lyricsto "v2" {\textoaltusb }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName=\incipittenor
		%\set Staff.instrumentName="Tenor    "
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	\new Lyrics \lyricsto "v3" {\textotenorb }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName=\incipitbassus
		%\set Staff.instrumentName="Bass     "
		\clef "bass"
		\bassus }
	\new Lyrics \lyricsto "v4" {\textobassus }
	>>
	
>>

	} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.1
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		autoBeaming = ##f
	}
	\context {\Staff 
                %\RemoveEmptyStaves
                %\override VerticalAxisGroup.remove-first = ##t
		\override VerticalAxisGroup.staff-staff-spacing =
			#'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
		\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=6
	%page-count = 2
	ragged-last-bottom = ##f
	indent=3.6\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 8) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 12) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}