\version "2.18.0" #(set-default-paper-size "a4") #(set-global-staff-size 16.4) #(ly:set-option 'point-and-click #f) %mobile -s14.5 -i3.3 italicas=\override LyricText.font-shape = #'italic rectas=\override LyricText.font-shape = #'upright ss=\once \set suggestAccidentals = ##t incipitwidth = 19 mtempo={\tempo 4 = 100} mtempob={\tempo 4 = 50} mt=#(define-music-function (parser location offset) (number?) ; move lyric text #{ \once \override LyricText.X-offset = -$offset #}) htitle="Introduxit me rex" hcomposer="Ceballos" \header { title=\markup{\fontsize #3 "Introduxit me rex"} %subtitle="" subsubtitle=\markup{\null \vspace #1 } composer="Rodrigo de Ceballos (c.1525-1581)" pdfauthor=\composer %opus="(-)" poet=\markup{"Ms. 3 capilla real de Granada"} copyright=\markup{ \fill-line {"Edited by Nancho Alvarez upon a transcription by Robert J. Snow" \typewriter "http://tomasluisdevictoria.org"} } % tagline="" } global={\key c \major \time 2/2 \skip 1*97 \bar "|." } cantus=\relative c''{ R1*3 b2. b4 b2 g a2 b r4 b b b c a4. g8 e8[ f] g2 r R1 r2 r4 b b2 g a4 c2 b4 ~ b8 a a2 g4 ~ g8 f d4 f2 ~ f4 d e2 r4 e e e ~ e d e2 c4 c' a b a2 r4 e e e g a g2 r4 g ~ g4 f e2 e r4 e f f e2 r4 a b b c2 b4 a ~ a8 \ss gis gis4 a4 c c4. b8 a4. g8 f4 f e g g4 g e8 f g a b g a2 \ss gis4 a4 c c c b g8[ a b c] d4 ~ d8 c b a b4 e, a2. f4 ~ f4 a g2 f4 e8d e4 a g c b a ~ a \ss gis a2 r4 a2 g4 g a a e g4 d r4 d' ~ d c c e d a c2 b r4 e, ~ e c c'4. b8 a4 f a8 g a b c4 g c b a c4. b8 a4 ~ a \ss gis8 \ss fis gis4 b b b c2 b b a4 g g2 r4 g g g a2 d,4 d' d4. d8 d4 c ~ c e2 d4 e2 r4 e, ~ e e f2 e4 a g a b b a2 b r r2 r4 b g4 a2 g4 ~ g g g d' d4 c d a ~ % Snow \ss cis a c b a \ss gis4 a2 gis4 a4 c c c a b g4. a8 b2 r R1 r4 a a a a4. g8 f2 e2 a4 a g2 g4 g e e'2 e4 d2 d4 d ~ d8 b \ss cis4 d2 d4 d c4. b8 a g a b c4 c,8 d e f g2 g4 e2 e f2 d4 a' ~ a8 g e4 f2 e4 a c4. b8 a4 a g2 e4 b' b b a4 a b d ~ d8 c b4 a2 R1*2 r2 r4 a a c2 b4 a c4. b8 a4 ~ a \ss gis8 \ss fis \mtempob gis\breve*1/4 } cantusdos=\relative c'{ s4*0^\markup{"Canon ad quartam"} R1*6 e2. e4 e2 c \once \override TextScript.X-offset=#1 d2^\markup{\musicglyph #"scripts.usignumcongruentiae" } e2 r4 e e e f4 a2 g4 ~ g8 f d4 e2 r4 c g'2 f4 d e e d2 r R1 r4 a' a a ~ a g a4. g8 f4 e8 d c4 g' e4 a2 g4 a g e f e2 r r r4 a b b c2 b4 a4. \ss gis8 gis4 a2 r r2 r4 a, b b c4. d8 e f g4 f e ~ e d e2 d2 r r2 r4 e e2 e4 f g2 d r4 d g2 ~ g4 f8 e f4 a ~ a4 c b2 a1 R1*2 c2. b4 b d c a b2 a ~ a r r2 r4 a ~ a g g g c4. b8 a4 g f1 e2 r R1 r4 e e e g g a2 ~ a4 \ss gis8 \ss fis gis4 gis a b c2 ~ c4 b8 a b4 d c a b2 a1 R1 r4 a2 a4 a2 a4 a a4 c b a ~ a8 \ss gis gis4 a2 r2 r4 g e4 a2 g4 b c2 b4 d4 c2 b4 a4 g a2 R1 r2 r4 e e e c2 d e d4 g g g f4 a4. \ss gis8 gis4 a2 r R1 c2. c4 c2 b c b R1 r2 r4 a ~ a a a g f2 e g4. a8[ b c] b4 ~ b8 a a2 \ss gis4 a2 r r r4 a c4. b8 a4 g f2 e r4 g g g e f g2 d2 r r4 g2 f4 f4. g8 a4 g ~ g f8 e f2 \once \override TextScript.X-offset=#1 e2^\markup{\musicglyph #"scripts.usignumcongruentiae" } r2 e1 ~ e\breve*1/2 } altus=\relative c'{ s4*0^\markup{"Resolutio"} R1*8 b2. b4 b2 g a b r4 b b b c4 e2 d4 ~ d8 c a4 b2 r4 g d'2 c4 a b b a2 r % falta el silencio R1 r4 e' e e ~ e d e4. d8 c4 b8 a g4 d' b4 e2 d4 e d b c b2 r r2 r4 e f f g2 f4 e4. d8 d4 e2 r r2 r4 e, f f g4. a8 b8 c d4 c b ~ b a b2 a r r2 r4 b b2 b4 c d2 a r4 a d2 ~ d4 c8 b c4 e ~ e g f2 e1 R1*2 g2. f4 f a g e f2 e ~ e r r2 r4 e ~ e d d d g4. f8 e4 d c1 b2 r R1 r4 b b b d d e2 ~ e4 d8 c d4 d e f g2 ~ g4 f8 e f4 a g e f2 e1 R1 r4 e2 e4 e2 e4 e e g f e ~ e8 d d4 e2 r2 r4 d b e2 d4 f4 g2 f4 a4 g2 f4 e d e2 R1 r2 r4 b b b g2 a2 b a4 d d d c4 e4. d8 d4 e2 r R1 g2. g4 g2 f g f R1 r2 r4 e ~ e e e d c2 b d4. e8[ f g] f4 ~ f8 e e2 d4 e2 r r2 r4 e g4. f8 e4 d c2 b r4 d d d b c d2 a r r4 d2 c4 c4. d8 e4 d ~ d c8 b c2 b\breve*1/2 } tenor=\relative c'{ b2. b4 b2 g a b r4 e e e d8 c b a b4 c ~ c8 b a4 \ss gis a ~ % Snow g a4 \ss gis8 \ss fis gis2 a2 r r2 r4 g g g b c ~ c d e2 r2 r4 e, a4 a g4. f8 d4 f e2 r2 r4 a a4 a2 g4 a c2 a4 c b a c c4 c2 b4 c a b b a b r2 r4 c c b c a g a ~ a8 \noBeam \ss gis8 gis4 a c d4 d b2 d2. d4 c2 r r4 e, a a g e f a ~ a8 g a b c4 b b4 b c e d2 e r4 a, a a g4 e g2 R1 r2 r4 d f2 g4 g a2 a4 c c e d2 b2 a4 e' ~ e e e2 ~ e4 f e c d2 d a4 a c4. b8 a4 f g a b2 b4 b a2 r r4 a2 d,4 e4 e g2 e e' e r e2 e4 e e2 e r2 r4 g, g4 g g b a2 g8 a b c d4 a a a c4. b8 a4 a a2 r4 a ~ a a d2 c4 a b c b2 c b4 e d b c a b e e c d2 g,2 r r2 r4 d' c e d4. c8 b4 a b2 a2 r R1 r4 e' e d c d e2 c4 f f f e8 d c b a2 a r4 e' ~ e e d d c2 g4 b ~ b4 b a a g2 a4 d d f2 e4 ~ e d e2 e,4 e g g a2 e d2 a'4. a8 a4 c a2 a4 a a e f8 g a b c4 b8 a b2 r r2 r4 g g g f a g2 a4 d ~ d c c e d2 a r4 a g2 e4 e e2 e\breve*1/2 } bassus=\relative c{ r2 e ~ e4 e e2 c d e r4 e g4. f8 e4 c f2 e4 d e1 r4 a4 a2 g4 g e2 ~ e4 e e c f2 e4 e g4. f8 e2 R1 r2 r4 e g2 f4 d f2 e a,1 r2 r4 a' a4 a2 g4 a f e2 a,4 e'2 d4 e4 c8[ d e f] g4 c,4 d e a, e'2 a, r4 d e e d2 g4 g a a g f e2 r4 a, c c d a d2 c8 d e f g4 g a g ~ g f e e a,2 r r2 r4 g' g g e2 d d R1 r2 r4 a c2 d4 d e2 a, a'2. e4 e d a' a g2 d d4 f c c d2 c4 a e'1 r4 f2 c4 d2 d c2. g4 a2 c4. d8 e2 e e4 e a,2 e'2. e4 f g c,2 g1 R1 d'2 d4 f c c d d a1 R1 r2 e' ~ e4 e a2 g4 e f g a f e2 r4 a f g ~ g c, g'2 f4 e d4. e8 f4 c g'4 d e f e2 r4 a a a f4 g e4. f8 g4 e e e f4 f e2 f4 d d8[ e] f[ g] a4 a, d2 a4 a'2 a4 c c g2 c,2 e4 e g2 d e d d4 d f c d2 a R1*2 r4 d2 d4 d c d2 a r4 c d4 d e2 ~ e4 e \[g2 a\] g r4 g, d' d e e d2 d4 f2 e4 g4 d4. e8 f g a4 a, c g a1 e'\breve*1/2 } textocantus=\lyricmode{ In -- tro -- du -- xit me rex in cel -- lam vi -- na -- _ ri -- _ am in cel -- lam vi -- na -- _ _ _ ri -- _ _ _ _ am: or -- di -- na -- vit in me ca -- ri -- ta -- tem or -- di -- na -- vit in me ca -- ri -- ta -- tem. Ful -- ci -- te me ful -- ci -- te me flo -- _ _ ri -- bus, ful -- ci -- te me __ _ flo -- ri -- bus, ful -- ci -- te me __ _ _ _ _ _ flo -- ri -- bus: sti -- pa -- te me ma -- _ _ _ _ _ _ _ lis, sti -- pa -- te me ma -- _ _ _ lis, sti -- pa -- te me ma -- _ lis: di -- ci -- te di -- le -- cto me -- o \mt #.5 di -- ci -- te di -- le -- cto me -- o di -- ci -- te di -- le -- cto me -- _ _ _ o, di -- le -- cto me -- _ _ _ _ _ o, qui -- a a -- mo -- re lan -- _ gue -- o qui -- a a -- mo -- re, qui -- a a -- mo -- re lan -- gue -- o. Læ -- va e -- ius sub ca -- _ pi -- te me -- o læ -- va e -- ius sub ca -- pi -- te me -- o, sub ca -- pi -- te me -- _ _ o: et de -- xte -- ra il -- li -- _ us et de -- xte -- ra il -- li -- us am -- ple -- xa -- bi -- tur me, am -- ple -- xa -- bi -- tur __ _ _ me, am -- ple -- xa -- _ _ _ _ _ _ bi -- _ _ _ tur me, am -- ple -- xa -- bi -- tur __ _ _ _ me, et de -- xte -- ra il -- li -- us am -- ple -- xa -- bi -- \mt #.5 tur __ _ _ _ _ me am -- ple -- xa -- bi -- tur me. __ _ _ _ _ _ } textocantusdos=\lyricmode{ In -- tro -- du -- xit me rex in cel -- lam vi -- na -- ri -- _ _ am in cel -- lam vi -- na -- ri -- am: or -- di -- na -- vit in __ _ _ _ _ me ca -- ri -- ta -- _ tem, \italicas ca -- ri -- ta -- tem. \rectas Ful -- ci -- te me flo -- _ _ ri -- bus % in flo -- _ ful -- ci -- te me __ _ _ _ _ flo -- _ _ ri -- bus: sti -- pa -- te me ma -- lis sti -- pa -- _ _ te me ma -- _ lis: di -- ci -- te di -- le -- cto me -- o di -- ci -- te di -- le -- _ _ cto me -- o qui -- a a -- mo -- re lan -- \mt #.5 gue -- _ o, qui -- a a -- mo -- _ _ re lan -- _ _ gue -- o. Læ -- va e -- ius sub ca -- pi -- te me -- _ _ o læ -- va e -- ius sub ca -- pi -- te me -- _ _ _ o: et de -- xte -- ra il -- li -- us, et de -- xte -- ra il -- _ li -- us am -- ple -- xa -- bi -- tur me am -- ple -- xa -- _ bi -- tur me __ _ _ _ _ _ _ _ _ et de -- xte -- ra il -- li -- us et de -- xte -- ra il -- li -- us am -- ple -- xa -- _ _ bi -- _ _ tur me me. } textoaltus=\lyricmode{ In -- tro -- du -- xit me rex in cel -- lam vi -- na -- ri -- _ _ am in cel -- lam vi -- na -- ri -- am: or -- di -- na -- vit in __ _ _ _ _ me ca -- ri -- ta -- _ tem, \italicas ca -- ri -- ta -- tem. \rectas Ful -- ci -- te me flo -- _ _ ri -- bus ful -- ci -- te me __ _ _ _ _ flo -- _ _ ri -- bus: sti -- pa -- te me ma -- lis sti -- pa -- _ _ te me ma -- _ lis: di -- ci -- te di -- le -- cto me -- o di -- ci -- te di -- le -- _ _ cto me -- o qui -- a a -- mo -- re lan -- \mt #.5 gue -- _ o, qui -- a a -- mo -- _ _ re \mt #.5 lan -- _ _ gue -- o. Læ -- va e -- ius sub ca -- pi -- te me -- _ _ o læ -- va e -- ius sub ca -- pi -- te me -- _ _ _ o: et de -- xte -- ra il -- li -- us, et de -- xte -- ra il -- _ li -- us am -- ple -- xa -- bi -- tur me am -- ple -- xa -- _ bi -- tur me __ _ _ _ _ _ _ _ _ et de -- xte -- ra il -- li -- us et de -- xte -- ra il -- li -- us am -- ple -- xa -- _ _ bi -- _ _ tur me. } textotenor=\lyricmode{ In -- tro -- du -- xit me rex in cel -- lam vi -- _ _ _ _ na -- _ _ ri -- _ _ _ _ am in cel -- lam vi -- na -- ri -- am in cel -- lam vi -- _ na -- ri -- am: or -- di -- na -- vit in me ca -- ri -- ta -- tem, or -- di -- na -- vit in me ca -- ri -- ta -- tem or -- di -- na -- vit in me ca -- ri -- ta -- tem. Ful -- ci -- te me flo -- ri -- bus ful -- ci -- te me flo -- ri -- bus, __ _ _ _ _ ful -- ci -- te me flo -- ri -- bus: sti -- pa -- te me ma -- lis sti -- pa -- te me ma -- lis, sti -- pa -- te me ma -- lis: di -- ci -- te di -- le -- cto me -- o, di -- ci -- te di -- le -- cto me -- _ o, di -- ci -- te di -- ci -- te di -- le -- cto me -- o qui -- a a -- mo -- re qui -- a a -- mo -- re lan -- gue -- _ _ _ o, qui -- a a -- mo -- re lan -- gue -- o. Læ -- va e -- ius sub ca -- pi -- te me -- o, sub ca -- pi -- te me -- o: læ -- \mt #.4 va __ _ e -- ius sub ca -- _ pi -- _ te __ _ me -- o et de -- xte -- ra il -- li -- us, de -- xte -- ra il -- _ _ _ li -- us % et ? am -- ple -- xa -- bi -- tur me, \mt #.5 am -- ple -- xa -- bi -- tur me, am -- ple -- xa -- bi -- tur me, am -- ple -- xa -- bi -- tur __ _ me, am -- ple -- xa -- bi -- tur me, et de -- xte -- ra __ _ _ _ il -- li -- _ us et de -- xte -- ra il -- li -- us am -- ple -- xa -- bi -- tur me am -- ple -- xa -- bi -- tur me. } textobassus=\lyricmode{ In -- tro -- du -- xit me rex in cel -- _ lam vi -- na -- ri -- _ am in cel -- lam vi -- na -- ri -- am, in cel -- lam vi -- na -- ri -- am in cel -- lam vi -- na -- ri -- am: or -- di -- na -- vit in me ca -- ri -- ta -- _ tem, ca -- _ _ _ _ ri -- ta -- _ _ _ tem. Ful -- ci -- te me flo -- ri -- bus, flo -- _ ri -- bus ful -- ci -- te \mt #.5 me __ _ flo -- ri -- _ _ _ bus, ful -- ci -- te me flo -- ri -- bus: sti -- pa -- te me ma -- lis sti -- pa -- te me ma -- lis: di -- ci -- te di -- le -- cto me -- o, di -- ci -- te di -- le -- cto me -- o di -- ci -- te di -- le -- cto me -- o, __ _ _ qui -- a a -- mo -- re lan -- _ _ gue -- o qui -- a a -- mo -- re lan -- gue -- o. Læ -- va e -- ius sub ca -- pi -- te me -- o læ -- va e -- ius sub ca -- pi -- te __ _ me -- _ o, me -- _ _ o: et de -- xte -- ra il -- li -- _ us, et de -- xte -- ra il -- li -- us, et de -- _ xte -- _ ra il -- li -- us am -- ple -- xa -- bi -- tur me, am -- ple -- xa -- bi -- tur me, am -- ple -- xa -- bi -- tur me am -- ple -- xa -- bi -- tur me et de -- xte -- ra il -- li -- _ us et de -- xte -- ra il -- li -- us am -- ple -- xa -- bi -- _ _ _ _ \mt #.5 tur __ _ _ _ me. } incipitcantus=\markup{ \score{ { \set Staff.instrumentName="Cantus I " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c1" \key c \major \time 4/4 b'1. } \layout { line-width=\incipitwidth indent = 0 } } } incipitcantusdos=\markup{ \score{ { \set Staff.instrumentName="Cantus II " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c1" \key c \major \time 4/4 e'1. } \layout { line-width=\incipitwidth indent = 0 } } } incipitaltus=\markup{ \score{ { \set Staff.instrumentName="Altus " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c3" \key c \major \time 4/4 b1. } \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-c4" \key c \major \time 4/4 b1. } \layout { line-width=\incipitwidth indent=0 } } } incipitbassus=\markup{ \score{ { \set Staff.instrumentName="Bassus " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-f4" \key c \major \time 4/4 e1. } \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 StaffGroup \with {systemStartDelimiter = #'SystemStartBrace } << \new Staff <<\global \new Voice="v1" { \set Staff.instrumentName=\incipitcantus \clef "treble" \cantus } \new Lyrics \lyricsto "v1" {\textocantus } >> \new Staff <<\global \new Voice="v5" { \set Staff.instrumentName=\incipitcantusdos \clef "treble" \cantusdos } \new Lyrics \lyricsto "v5" {\textocantusdos } >> >> \override Score.BarLine.allow-span-bar=##f \new Staff <<\global \new Voice="v2" { \set Staff.instrumentName=\incipitaltus \clef "G_8" \altus } \new Lyrics \lyricsto "v2" {\textoaltus } >> \new Staff <<\global \new Voice="v3" { \set Staff.instrumentName=\incipittenor \clef "G_8" \tenor } \new Lyrics \lyricsto "v3" {\textotenor } >> \new Staff <<\global \new Voice="v4" { \set Staff.instrumentName=\incipitbassus \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.2 \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=20 %page-count = 8 ragged-last-bottom = ##f indent=3.6\cm system-system-spacing = #'((basic-distance . 19) (minimum-distance . 0) (padding . 5)) top-system-spacing = % header #'((basic-distance . 9) (minimum-distance . 0) (padding . 0)) last-bottom-spacing = % footer #'((basic-distance . 12) (minimum-distance . 0) (padding . 0)) markup-system-spacing.padding = #1.5 }