\input opustex
\input opusgreg
\input eplain

\font\bigtype = hmin10 scaled \magstep2
\font\Bigtype = hmin17 scaled \magstep2

\font\musicaps = Priory scaled \magstep5
\font\textcaps = Priory scaled \magstep4

\musicinitialfont\musicaps
\textinitialfont\textcaps

\let\augmentum=\gobble
\let\augmentumduplex=\gobbletwo
\let\episem=\gobbletwo

\special{papersize=148mm,210mm}

\hoffset1.5mm
\voffset-7mm
\hsize100mm
\vsize173mm

\abovesystem1
\belowsystem8

\font\itlyrics = cmti9
\font\smallrm = cmr8
\font\smold = cmmi10 scaled 900

\def\source#1\par{\rightline{\smallrm #1}}


\def\ngl#1{\cchar{-6}{\itlyrics #1}}
\def\engl#1{\cchar{-7}{\itlyrics #1}}

\def\beginhymn #1.{\centerline{\bigtype {#1}}\par\bigskip}

\def\mycr{\par\vskip-\parskip}

\def\beginlyrics{\begingroup
                       \def\\{\mycr}
                       \pretolerance=10000
                       \raggedright
                       \parskip=5pt
                       \parindent-3mm}
\def\endlyrics{\endgroup}

\def\verse#1. {\hskip2mm\llap{{\oldstyle #1}. }}

\nopagenumbers


\newbox\linkbox
\newbox\wordbox
%\newdimen\boxwid

\def\lyrlink{%
  % Bogen erstellen: Put the smilie in the box:
  \setbox\linkbox=\hbox{$\smile$}%
  % In Box der Breite eines Wortzwischenraums einsetzen:
  % Make the box one space wide:
  \setbox\linkbox=\hbox to\the\fontdimen2\the\font{%
    \hss
    % Unter die Grundlinie druecken:
    % Lower the box under the word:
    \lower\ht\linkbox\hbox{%
      % Zusaetzlicher vertikaler Abstand zur Wortunterseite:
      % lower the smile a little bit more:
      \lower1pt\hbox{%
	\relax
	  \hbox{$\smile$}%
	}}%
    \hss}%
  % Keine zusaetzliche Tiefe fuer Bogen anrechnen:
  % Make the depth of the box zero:
  \dp\linkbox=0pt
  % Bogen setzen:
  \box\linkbox}

\def\intralink#1{%
  \setbox\linkbox=\hbox{$\smile$}%
  \setbox\wordbox=\hbox{#1}%
  \setbox\linkbox=\hbox to\wd\wordbox{%
    \hss
    % Unter die Grundlinie druecken:
    % Lower the box under the word:
    \lower\ht\linkbox\hbox{%
      % Zusaetzlicher vertikaler Abstand zur Wortunterseite:
      % lower the smile a little bit more:
      \lower1pt\hbox{%
	\relax
	  \hbox{$\smile$}%
	}}%
    \hss}%
  % Keine zusaetzliche Tiefe fuer Bogen anrechnen:
  % Make the depth of the box zero:
  \dp\linkbox=0pt
%  \let\boxwid=\the\wd\wordbox
%  \lower\ht\linkbox%
  \box\wordbox \llap{\box\linkbox}}


\beginhymn Crux fidelis.

\vskip-1mm

\setgregorian1
\setclef14
\musicindent14mm
\raisesong3\Internote
\nosolesmescustos
\initiumgregorianum
\musicinitial{1.}{C}%
\sgn Rux\punctum K\egn
\spatium
\sgn {fi}{}d\punctum L\egn
\sgn {}{\'e}-\engl{\idx{Faithful cross}, above all other,}\pes Na\egn
\sgn li{s,}\clivis aN\egn
\spatium
\sgn {}in\punctum a\egn
\sgn ter\ngl{}\punctum c\egn
\spatium
\sgn {}{o}{mn}\clivis cb\egn
\sgn {}es\episem b1\clivis aN\egn
\spatium
\divisiominima
\spatium
\sgn {}Ar\punctum b\egn
\sgn bor\punctum c\egn
\spatium
\sgn {}{\'u}n\pes de\egn
\sgn {}a{}\engl{One and only noble Tree,}\clivis aN\egn
\spatium
\sgn n{\'o}b\punctum c\egn
\sgn {}i-\clivis ba\egn
\sgn li{s:}\punctum a\augmentum b\egn
\spatium
\divisiomaior
\spatium
\custos a
\lineaproxima
\sgn N{u}l\punctum a\egn
\sgn la{}\torculus acb\egn
\spatium
\sgn s{i}l\punctum N\egn
\sgn va{}\engl{ None in foliage, none in blossom,}\clivis NL\egn
\spatium
\sgn t{a}-\punctum M\egn
\sgn lem\clivis KJ\egn
\spatium
\sgn {pr}{o}f\pes KL\egn
\sgn {}e{rt,}\torculus LML\augmentum L\egn
\spatium
\divisiominima
\spatium
\sgn {Fr}{o}n\punctum K\egn
\sgn de,\pes Ka\egn
\spatium
\sgn {fl}{o}-\clivis aN\egn
\sgn re,\engl{None in fruit thy peer may be.}\clivis LK\egn
\spatium
\sgn g{\'e}r\punctum M\egn
\sgn mi-\clivis LK\egn
\sgn ne:\punctum K\augmentum L\egn
\spatium
\divisiomaior
\spatium
\custos a
\lineaproxima
\asteriscus
\spatium
\sgn D{u}l\punctum a\egn
\sgn ce{}\torculus acb\egn
\spatium
\sgn l{i}g\punctum N\egn
\sgn nu{m,}\engl{Sweet the wood, and sweetest iron;}\clivis NL\egn
\spatium
\sgn d{u}l\punctum M\egn
\sgn ces\clivis KJ\egn
\spatium
\sgn {cl}{a}v\pes KL\egn
\sgn {}o{s,}\torculus LML\augmentum L\egn
\spatium
\divisiominima
\spatium
\sgn {D}{u}l\punctum K\egn
\sgn ce,\pes Ka\egn
\spatium
\sgn {p}{o}n\clivis aN\egn
\sgn dus\engl{Sweetest Weight is hung on thee.}\clivis LK\egn
\spatium
\sgn s{\'u}s\punctum M\egn
\sgn ti-\clivis LK\egn
\sgn ne{t.}\punctum K\augmentum L\egn
\spatium
\Finisgregoriana

\bigskip

\sidx{Pange lingua $\ldots$ Lauream}

\setgregorian1
\setclef14
\musicindent14mm
\raisesong3\Internote
\nosolesmescustos
\initiumgregorianum
\musicinitial{Hymn\\1.}{P}%
\sgn {}An\punctum K\egn
\sgn ge{}\punctum L\egn
\spatium
\sgn lin\engl{\idx{Sing, my tongue, the glorious battle},}\pes Na\egn
\sgn {gu}a{,}\clivis aN\egn
\spatium
\sgn {gl}or\punctum a\egn
\sgn {}i-\ngl{}\punctum c\egn
\sgn {}{\'o}{s}\clivis cb\egn
\sgn {}i{}\episem b1\clivis aN\egn
\spatium
\divisiominima
\spatium
\sgn L{\'a}u\punctum b\egn
\sgn re-\punctum c\egn
\sgn {}{a}m\pes de\egn
\spatium
\sgn cer\engl{Sing the last, the dread affray;}\clivis aN\egn
\sgn t{\'a}m\punctum c\egn
\sgn {}i-\clivis ba\egn
\sgn ni{s,}\punctum a\augmentum b\egn
\spatium
\divisiomaior
\spatium
\custos a
\lineaproxima
\sgn {}Et\punctum a\egn
\spatium
\sgn su-\torculus acb\egn
\sgn {p}er\punctum N\egn
\spatium
\sgn {Cr}u{-c}\engl{O'er the Cross, the Victor's trophy,}\clivis NL\egn
\sgn {}is\punctum M\egn
\spatium
\sgn {tr}o{ph}\clivis KJ\egn
\sgn {}{\'\ae}-\pes KL\egn
\sgn {}o{}\torculus LML\augmentum L\egn
\spatium
\divisiominima
\spatium
\sgn Dic\punctum K\egn
\spatium
\sgn {tr}i-\pes Ka\egn
\sgn {}{\'u}{mp}\clivis aN\egn
\sgn hum\engl{Sound the high triumphal lay,}\clivis LK\egn
\spatium
\sgn n{\'o}b\punctum M\egn
\sgn {}i-\clivis LK\egn
\sgn le{m:}\punctum K\augmentum L\egn
\spatium
\divisiomaior
\spatium
\custos a
\lineaproxima
\sgn {Qu}{\'a}l\punctum a\egn
\sgn {}i-\torculus acb\egn
\sgn ter\punctum N\egn
\spatium
\sgn Re{-d}\engl{How, the pains of death enduring,}\clivis NL\egn
\sgn {}{\'e}m\punctum M\egn
\sgn {pt}or\clivis KJ\egn
\spatium
\sgn {}or\pes KL\egn
\sgn bi{s,}\torculus LML\augmentum L\egn
\spatium
\divisiominima
\spatium
\sgn {}Im\punctum K\egn
\sgn mol\pes Ka\egn
\sgn {}{\'a}{-t}\clivis aN\egn
\sgn {}us\engl{~ Earth's Redeemer won the day.}\clivis LK\egn
\spatium
\sgn v{\'\i}c\punctum M\egn
\sgn {}e-\clivis LK\egn
\sgn ri{t.}\cchar{0}{~ ~ ~ ~ ~ ~ ~ ~ \punctum0}\cchar{-4}{~ ~ ~ ~ ~ ~ ~ ~ Crux.}\punctum K\augmentum L\egn
\spatium
\Finisgregoriana

\bigskip

\beginlyrics

\hbox{

\vtop{
\hsize47mm

\verse2. De par\'entis protopl\'asti\\
Fraude Factor c\'ondolens,\\
Quando pomi noxi\'alis\\
In necem morsu ruit:\\
Ipse lignum tunc not\'avit,\\
Damna ligni\lyrlink ut solveret. Dulce.


}
\hskip5mm
\vtop{
\hsize57mm

\it%lyrics


%\verse2. Eating of the tree forbidden,\\
%Man had sunk in satan's snare,\\
%When his pitying creator\\
%Did this second tree prepare,\\
%Destined, many ages later,\\
%The first evil to repair.

\verse2. He, our Maker, deeply grieving\\
That the first-made Adam fell,\\
When he ate the fruit forbidden\\
Whose reward was death and hell,\\
Marked e'en then this Tree the ruin\\
Of the first tree to dispel.


}
}


\hbox{

\vtop{
\hsize47mm

%\rmlyrics

%\verse1. P\'ange l\'\i ngua, glori\'osi\\
%L\'auream cert\'aminis,\\
%Et super Cr\'ucis troph\'\ae o\\
%Dic tri\'umphum n\'obilem:\\
%Qu\'aliter Red\'emptor \'orbis\\
%Immol\'atus v\'\i cerit. Crux.


\verse3. Hoc opus nostr\ae\ sal\'utis\\
Ordo depop\'oscerat:\\
Multif\'ormis prodit\'oris\\
Ars ut artem f\'alleret:\\
Et med\'elam ferret inde,\\
Hostis unde l\'\ae serat. Crux.

\verse4. Quando venit ergo sacri\\
Plenit\'udo t\'emporis,\\
Missus est ab arce Patris\\
Natus, orbis C\'onditor,\\
Atque ventre virgin\'ali\\
Carne\lyrlink am\'\i ctus pr\'odiit.\\
Dulce.

\verse5. Vagit infans inter arcta\\
C\'onditus pr\ae s\'epia:\\
Membra pannis invol\'uta\\
Virgo Mater \'alligat:\\
Et Dei manus ped\'esque\\
Stricta cingit f\'ascia. Crux.

\verse6. Lustra sex qui jam per\'egit,\\
Tempus implens c\'orporis,\\
Sponte l\'\i bera Red\'emptor\\
Passi\'oni d\'editus,\\
Agnus in Crucis lev\'atur\\
Immol\'andus st\'\i pite. Dulce.

\verse7. Felle potus ecce languet:\\
Spina, clavi, l\'ancea,\\
Mite corpus perfor\'arunt,\\
Unda manat et cruor:\\
Terra, pontus, astra, mundus,\\
Quo lav\'antur fl\'umine! Crux.

\verse8. Flecte ramos, arbor alta,\\
Tensa laxa v\'\i scera,\\
Et rigor lent\'escat ille,\\
Quem dedit nat\'\i vitas:\\
Et sup\'erni membra Regis\\
Tende miti st\'\i pite. Dulce.

}
\hskip5mm
\vtop{
\hsize57mm

\it%lyrics

\verse3. Thus the work for our salvation\\
He ordain\'ed to be done;\\
To the traitor's art opposing\\
Art yet deeper than his own;\\
Thence the remedy procuring\\
Whence the fatal wound begun.

\verse4. Therefore, when at a length the fulness\\
Of the appointed time was come,\\
He was sent, the world's Creator,\\
From the Father's heavenly home,\\
And was found in human fashion,\\
Offspring of the Virgin's Womb,

\verse5. Lo! He lies, an infant weeping,\\
Where the narrow manger stands,\\
While the Mother-Maid His members\\
Wraps in mean and lowly bands,\\
And the swaddling-clothes is winding\\
Round His helpless feet and hands.

\verse6.  Thirty years among us dwelling\\
His appointed time fulfilled,\\
Born for this, He meets His Passion\\
For that this He freely willed:\\
On the Cross the Lamb is lifted,\\
Where His life-blood shall be spilled.

\verse7. He endured the nails, the spitting,\\
Vinegar, and spear, and reed;\\
From that holy Body broken\\
Blood and water, forth proceed:\\
Earth and stars and sky and ocean\\
By that flood from stain are freed.

\verse8. Bend thy boughs, O Tree of Glory!\\
Thy too rigid sinews bend;\\
And awhile the stubborn hardness,\\
Which thy birth bestow'd, suspend;\\
And King of heavenly beauty\\
On thy bosom gently tend.


}
}


\hbox{
\vtop{
\hsize48mm


\verse9. Sola digna tu fu\'\i sti\\
Ferre mundi v\'\i ctimam:\\
Atque portum pr\ae par\'are\\
Arca mundo n\'aufrago:\\
Quam sacer cruor per\'unxit,\\
Fusus Agni c\'orpore. Crux.

\verse10. Sempit\'erna sit be\'at\ae\\
Trinit\'ati gl\'oria:\\
\AE qua Patri Fili\'oque;\\
Par decus Par\'aclito:\\
Un\'\i us Trin\'\i que nomen\\
Laudet univ\'ersitas. Amen. \\
Dulce.

}
\hskip5mm
\vtop{
\hsize58mm

\it

\verse9. Thou alone wast counted worthy\\
This world's ransom to uphold,\\
For a shipwrecked race preparing\\
Harbour, like the Ark of old;\\
With the sacred Blood anointed\\
From the smitten Lamb that rolled.

\verse10. To the Trinity be glory\\
Everlasting as is meet;\\
Equal to the Father, equal\\
To the Son and Paraclete;\\
Trinal Unity, whose praises\\
All created things repeat.\\
Amen.

}
}

\endlyrics

\medskip

\source Venantius Fortunatus  {\smold 530}--\smold 609

\source Translation by J.~M.~Neale and others

\end