diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-13 00:02:57 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-13 00:02:57 +0000 |
commit | 59d6f64add8d777784b3f0c5ea3fc8fb79723cd9 (patch) | |
tree | e1859a452020a1ac52c0539db064ee83d01fbad7 /Master/texmf-dist/tex/latex | |
parent | 360eba9a78e9d641caf2d1848f298cb3dbe0c67e (diff) |
poemscol
git-svn-id: svn://tug.org/texlive/trunk@1205 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex')
-rw-r--r-- | Master/texmf-dist/tex/latex/poemscol/poemscol.sty | 2394 |
1 files changed, 2394 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/poemscol/poemscol.sty b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty new file mode 100644 index 00000000000..791dd0e0375 --- /dev/null +++ b/Master/texmf-dist/tex/latex/poemscol/poemscol.sty @@ -0,0 +1,2394 @@ +%% +%% This is file `poemscol.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% poemscol.dtx (with options: `package') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from poemscol.sty. +%% +%% For distribution of the original source see the terms +%% for copying and modification in the file poemscol.dtx. +%% +%% This generated file may be distributed as long as the +%% original source files, as listed above, are part of the +%% same distribution. (The sources need not necessarily be +%% in the same archive or directory.) +\NeedsTeXFormat{LaTeX2e}[1997/12/01] +\ProvidesPackage{poemscol} + [2005/10/05 v2.391 poemscol file] + + + + + + + \newcommand{\tightgeometry}{\geometry{verbose, tmargin= 33pt, + textwidth=318.21pt,textheight=550pt, + marginparsep=7pt,marginparwidth=10pt, + headheight= 15pt, + headsep=19pt, + footskip=15pt, + lmargin=132pt} +\setlength{\oddsidemargin}{60pt} +\setlength{\evensidemargin}{65.41pt}} +\newcommand{\tightleading}{% +\makeatletter +\renewcommand\normalsize{% + \@setfontsize\normalsize\@xpt\@xipt + \abovedisplayskip 10\p@ \@plus2\p@ \@minus5\p@ + \abovedisplayshortskip \z@ \@plus3\p@ + \belowdisplayshortskip 6\p@ \@plus3\p@ \@minus3\p@ + \belowdisplayskip \abovedisplayskip + \let\@listi\@listI} +\makeatother +\normalsize +\makeatletter +\renewcommand\small{% + \@setfontsize\small\@ixpt{10}% + \abovedisplayskip 8.5\p@ \@plus3\p@ \@minus4\p@ + \abovedisplayshortskip \z@ \@plus2\p@ + \belowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ + \def\@listi{\leftmargin\leftmargini + \topsep 4\p@ \@plus2\p@ \@minus2\p@ + \parsep 2\p@ \@plus\p@ \@minus\p@ + \itemsep \parsep}% + \belowdisplayskip \abovedisplayskip +} +\makeatother} + + + +\newcommand{\volumetitlefont}{\fontsize{18}{23}\selectfont} +\newcommand{\volumesubtitlefont}{\fontsize{14}{18}\selectfont} +\newcommand{\poemtitlefont}{\fontsize{14}{18}\selectfont} +\newcommand{\sequencetitlefont}{\fontsize{16}{20}\selectfont} +\newcommand{\subsectiontitlefont}{\fontsize{12}{14.5}\selectfont} +\newcommand{\backmatterheaderfont}{\fontsize{16}{20}\selectfont} +\newcommand{\volumetitlesink}{\leavevmode\vspace{23.5pt}} +\newcommand{\backmattersink}{\leavevmode\vspace{21.5pt}} +\newcommand{\backmatterafterheadersink}{\leavevmode\vspace{11pt}} +\newcommand{\backmattertextfont}{\small} +\newcommand{\backmatterintrofont}{\normalsize} +\newcommand{\backmattervolumefont}{\fontsize{12}{14.5}\selectfont} +\newcommand{\backmattervolumesubtitlefont}{\fontsize{11}{13}\selectfont} +\newcommand{\contentsvolumefont}{\fontsize{14}{20}\selectfont} +\newcommand{\contentsvolumesubtitlefont}{\fontsize{12}{14.5}\selectfont} +\newcommand{\contentssequencetitlefont}{\fontsize{10}{14}\selectfont} +\newcommand{\contentspoemtitlefont}{\fontsize{10}{14}\selectfont} + +\widowpenalty=300 +\clubpenalty=300 +\newcommand{\notespoemclubpenalty}{\penalty-300} +\newcommand{\notessequenceclubpenalty}{\penalty-1500} +\newcommand{\notesvolumetitlepenalty}{\penalty-1500} +\hfuzz=2pt +\newcommand{\verseindent}{\hspace{2em}} +\newdimen\titleindentamount \titleindentamount=1pc +\newdimen\titleindenttwoamount \titleindenttwoamount=2pc +\newdimen\titleindentthreeamount \titleindentthreeamount=3pc +\newcommand{\titleindent}{\hspace{\titleindentamount}} +\setlength{\parindent}{\titleindentamount} +\newcommand{\afterpoemtitleskip}{\smallskip} +\newcommand{\afterpoemskip}{\bigskip} +\newcommand{\aftersequencetitleskip}{\medskip} +\newcommand{\stanzaskip}{\medskip} +\newdimen\volumetitleshiftamount \volumetitleshiftamount=1pc +\newcommand{\volumetitleshift}{\hbox{\hspace{\volumetitleshiftamount}}} +\newdimen\voladditionalamount \voladditionalamount=2pc +\newdimen\contentsindentoneamount \contentsindentoneamount=24pt +\newcommand{\contentsindentone}{\hspace{\contentsindentoneamount}} +\newdimen\contentsindenttwoamount \contentsindenttwoamount=42pt +\newcommand{\contentsindenttwo}{\hspace{\contentsindenttwoamount}} +\newdimen\contentsindentthreeamount \contentsindentthreeamount=60pt +\newcommand{\contentsindentthree}{\hspace{\contentsindentthreeamount}} +\newdimen\contentsindentfouramount \contentsindentfouramount=72pt +\newcommand{\contentsindentfour}{\hspace{\contentsindentfouramount}} +\newdimen\contentsindentfiveamount \contentsindentfiveamount=80pt +\newcommand{\contentsindentfive}{\hspace{\contentsindentfiveamount}} +\newcommand{\poemtitlepenalty}{\penalty-1000} +\newcommand{\multilinetitlepenalty}{\penalty-3000} +\newcommand{\sequencetitlepenalty}{\penalty-3000} +\newcommand{\multilinesequencepenalty}{\penalty-3500} + +\def\makeatletter{\catcode`\@=11} +\def\makeatother{\catcode`\@=12 } +\newcommand{\runoverindent}[1]{\global\edef\runoverindentvalue{#1} +} +\runoverindent{6em} +\newenvironment{pmclverse}{% +\let\\=\@centercr% +\list{}{\itemsep\z@ \itemindent -\runoverindentvalue\listparindent \itemindent + \rightmargin 1sp\leftmargin 1sp\advance\leftmargin + \runoverindentvalue}\item[]} +{\endlist} +\newif\ifrfv +\rfvfalse +\newcommand{\rightflushrunoververse}{\global\rfvtrue} +\newcommand{\indentrunoververse}{\global\rfvfalse} +\newenvironment{rfoverse}{\begin{pmclverse}}{\end{pmclverse}} +\renewenvironment{verse}{\ifrfv\begin{rfoverse}\else\begin{pmclverse}\fi} +{\ifrfv\end{rfoverse}\else\end{pmclverse}\fi} + +\newcounter{verselinenumber} +\newcounter{printlineindex} +\newcounter{verselinenumberscratch} +\newcounter{printlineindexscratch} +\newcounter{lineindexrepeat} \setcounter{lineindexrepeat}{9} +\newcounter{lemmalines} +\setcounter{lemmalines}{0} +\newcounter{lemmaend} +\setcounter{lemmaend}{0} +\newcounter{poemnumber} +\setcounter{poemnumber}{1} +\newcounter{notepageholdertitle} \setcounter{notepageholdertitle}{1} +\newcounter{notepageholdernote} \setcounter{notepageholdernote}{1} +\newtoks{\fulltitleholder} +\newtoks{\titlesofar} +\newtoks{\titleincrement} +\newif\ifinstanza +\newif\ifinpoem +\newif\ifpoemcontentson +\newif\iftextnoteson +\newif\ifverselinenumbers +\newif\ifexplanon +\newif\ifemendationson + \global\verselinenumberstrue +\newif\ifindexingon +\global\indexingontrue +\ifindexingon + \makeindex +\fi +\newif\ifincludeaccidentals +\global\includeaccidentalstrue +\newif\ifincludetypescripts +\global\includetypescriptstrue +\newif\ifredundantemendations +\global\redundantemendationsfalse +\newif\ifnoemendyet +\newif\ifnoexplainyet +\global\noemendyettrue +\global\noexplainyettrue +\newif{\ifmiddlecontentsline} +\middlecontentslinefalse +\newif{\iflastcontentsline} +\lastcontentslinefalse +\newif{\ifputpagenumberincontents} +\putpagenumberincontentstrue +\newif{\ifputpagenumberinnotes} +\putpagenumberinnotestrue +\newif{\ifsinglelinetitle} +\singlelinetitletrue +\newif{\iftitlefirstline} +\titlefirstlinefalse +\newif{\iftitlemiddleline} +\titlemiddlelinefalse +\newif{\iftitlelastline} +\titlelastlinefalse +\newif{\ifverserightflush} +\verserightflushfalse +\newif\ifrangelemma +\rangelemmafalse +\newcommand{\makeverselinenumbers}{\global\verselinenumberstrue} +\let\makelinenumbers=\makeverselinenumbers% for compatibility +\newif\iftextnotesatend +\textnotesatendtrue +\newif\ifemendationsatend +\emendationsatendtrue +\newif\ifexplanatend +\explanatendtrue +\newif\iftextfootnotespara +\textfootnotesparatrue +\newif\ifsourcesfootnotespara +\sourcesfootnotesparafalse +\newif\ifemendationfootnotespara +\emendationfootnotesparatrue +\newif\ifexplanfootnotespara +\explanfootnotesparafalse + +\newcommand{\volumeheader}[1]{\global\edef\volumeheadervalue{#1} +} +\newcommand{\leftheader}[1]{\global\edef\leftheadervalue{#1} +} +\leftheader{\relax} +\volumeheader{\relax} +\newcommand{\rightheader}[1]{\volumeheader{#1}} + +\newlength{\headoffsetlength} +\setlength{\headoffsetlength}{-1sp} +\raggedbottom +\pagestyle{fancy} +\fancyhead{} +\fancyfoot{} +\fancyhfoffset[RO,LE]{\headoffsetlength} +\fancyhead[RO]{{\small\textrm{\thepage}}} +\fancyhead[LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{\hfil{\small{\em \volumeheadervalue}}} +\fancyhead[CE]{{\small{\em \leftheadervalue}}\hfil} +\fancyfoot[CE]{{\small \botmark}\hfil} +\fancyfoot[CO]{\hfil{\small \botmark}} +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt} +\fancypagestyle{main}{% +\fancyhead{} +\fancyfoot{} +\fancyhfoffset[RO,LE]{\headoffsetlength} +\fancyhead[RO]{{\small\textrm{\thepage}}} +\fancyhead[LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{\hfil{\small{\em \volumeheadervalue}}} +\fancyhead[CE]{{\small{\em \leftheadervalue}}\hfil} +\fancyfoot[CE]{{\small \botmark}\hfil} +\fancyfoot[CO]{\hfil{\small \botmark}} +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt} +} + +\fancypagestyle{volumefirststyle}{% +\fancyhf{} +\fancyfoot[C]{\hfil{\small \botmark}} +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt} +} +\fancypagestyle{plain}{% +\fancyhf{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt} +} +\fancypagestyle{volumetitlestyle}{% +\fancyhf{} +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt} +} + + \newcommand{\resetpagestyle}{\pagestyle{main} +} + \newcommand{\clearemptydoublepage}{\newpage{\pagestyle{empty}\cleardoublepage}} +\newcommand{\mymarks}{% + \ifthenelse{\equal{\firstmark}{\botmark}}% + {\unskip to p.~\firstmark}% if equal + {\unskip to pp.~\firstmark--\botmark}}%if not equal +\newcommand{\poemdotfill}{\dotfill} +\newenvironment{stanza}{\penalty-100\instanzatrue\mark{\nostanzaatbottomvalue\ }} + {\nobreak\mark{\stanzaatbottomvalue\ }\nobreak\ifspeciallinelock% +\relax\else% +\nolinebreak\incrementverselinenumber% +\fi% +\speciallinelockfalse% +\nobreak + \instanzafalse + + \stanzaskip +} + +\newenvironment{marginenvironment}{}{} +\newcommand{\stanzalinestraddle} + {\begin{stanza}\addtocounter{verselinenumber}{-1}% + \addtocounter{printlineindex}{-1}% + } +\newlength{\contentsentryoverrun} +\setlength{\contentsentryoverrun}{\contentsindentoneamount} +\newenvironment{contentsentryenvironment}{% +\language=255%no hyphenation in contents +\let\\=\@centercr% +\list{}{\topsep\z@% +\partopsep\z@% +\itemsep\z@ \itemindent -\contentsentryoverrun\listparindent \itemindent + \rightmargin 1sp\leftmargin 1sp\advance\leftmargin + \contentsentryoverrun}\item[]}{\endlist} +\newlength{\titleentryoverrun} +\setlength{\titleentryoverrun}{\z@} +\newenvironment{titleentryenvironment}{% +\language=255%no hyphenation in poem titles +\let\\=\@centercr% +\list{}{\topsep\z@% +\partopsep\z@% +\itemsep\z@ \itemindent -\titleentryoverrun\listparindent \itemindent + \rightmargin 1sp\leftmargin 1sp\advance\leftmargin + \titleentryoverrun}\item[]}{\endlist} +\newenvironment{poem}{\raggedright% + \language=255%no hyphenation in verse + \noemendyettrue% + \noexplainyettrue% + \setcounter{verselinenumber}{0}\setcounter{printlineindex}{0}% + \nobreak\begin{verse}% + \inpoemtrue\nobreak\mark{\relax}% + }{\end{verse}% + \inpoemfalse\mark{\relax}% + \goodbreak\afterpoemskip%\bigskip + } +\newenvironment{rightflushverse}{\let\oldleftskip=\leftskip% +\leftskip=1 \leftskip\advance\leftskip by 0pt plus 1fill}% +{\let\leftskip=\oldleftskip} +\newenvironment{volumetitlepage} +{\par\clearpage{\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} + {\newpage\thispagestyle{volumetitlestyle} +\cleardoublepage\thispagestyle{volumefirststyle}} +\newenvironment{maintitlepage} +{\par\cleardoublepage\thispagestyle{volumetitlestyle} +}{\newpage\thispagestyle{volumetitlestyle}\cleardoublepage} +\newenvironment{booksectionpage} +{\par\newpage\thispagestyle{volumetitlestyle}}{\newpage} + \setlength{\marginparsep}{-18pt} + \setlength{\marginparwidth}{10pt} +\newif\ifnumbersswitch \numbersswitchfalse +\newif\ifnumbersright \numbersrighttrue +\providecommand{\sidepar}{\@dblarg{\@sidepar}} +\long\def\@sidepar[#1]#2{\@bsphack\leavevmode\vadjust{% % + \checkoddpage + \ifsideparswitch + \ifreversesidepar + \ifoddpage + \oddpagefalse + \else + \oddpagetrue + \fi + \fi + \else + \oddpagetrue + \ifreversesidepar + \oddpagefalse + \fi + \fi + \rlap{\kern-\parindent + \if@twocolumn + \if@firstcolumn % put at left + \kern -\marginparsep \kern -\marginparwidth % at left + \else % put at right + \kern \columnwidth \kern \marginparsep % at right + \fi + \else + \ifoddpage % put at right + \kern \textwidth \kern \marginparsep % at right + \else % put at left + \kern -\marginparsep \kern -\marginparwidth % at left + \fi + \fi + \vbox to 0pt{% + \kern \sideparvshift% % vertical shift to align top text lines + \begin{minipage}{\marginparwidth}% + \ifoddpage #2\else #1\fi% + \end{minipage}% + \vss}}}\@esphack} + +\gdef\thepmemc@@page{\the\c@page} + +\providecommand{\pmemlabel}[1]{\@bsphack + \pmemprotected@write\@auxout{}% + {\string\newpmemlabel{#1}{\thepmemc@@page}}% + \@esphack} +\long\def\pmemprotected@write#1#2#3{% + \begingroup + \let\thepmemc@@page\relax + #2% + \let\protect\@unexpandable@protect + \edef\reserved@a{\write#1{#3}}% + \reserved@a + \endgroup + \if@nobreak\ifvmode\nobreak\fi\fi} + +\providecommand{\newpmemlabel}[2]{{\global\@namedef{m@#1}{#2}}} +\providecommand{\pmemlabelref}[1]{% + \expandafter\ifx\csname m@#1\endcsname\relax + 0% + \else + \csname m@#1\endcsname + \fi} + +\newcount\@memcnta +\DeclareRobustCommand{\checkoddpage}{% + \oddpagefalse% + \ifstrictpagecheck% + \stepcounter{cp@cntr}\pmemlabel{\cplabel\thecp@cntr}% + \@memcnta=\pmemlabelref{\cplabel\thecp@cntr}\relax + \ifodd\@memcnta\oddpagetrue\fi + \else + \ifodd\c@page\oddpagetrue\fi + \fi} + +\newif\ifreversesidepar + \reversesidepartrue +\newif\ifsideparswitch + \sideparswitchfalse +\if@twoside \sideparswitchtrue \fi + +\newif\ifoddpage +\newif\ifstrictpagecheck + \strictpagecheckfalse +\newcounter{cp@cntr} +\newcommand{\cplabel}{^_} +\newlength{\sideparvshift} +\setlength{\sideparvshift}{-2.58ex} +\newcommand{\verselinenumberstoleft}{% + \setlength{\marginparsep}{18pt}% + \setlength{\marginparwidth}{10pt}% + \numbersswitchfalse\numbersrightfalse} +\newcommand{\verselinenumberstoright}{% + \setlength{\marginparsep}{-18pt}% + \setlength{\marginparwidth}{10pt}% + \numbersswitchfalse\numbersrighttrue} +\newcommand{\verselinenumbersswitch}{% + \strictpagechecktrue% + \setlength{\marginparsep}{18pt}% + \setlength{\marginparwidth}{10pt}% + \numbersswitchtrue\numbersrightfalse} +\newif\ifnumbersgutter \numbersgutterfalse +\newcommand{\verselinenumbersgutter}{\verselinenumbersswitch% +\reversesideparfalse\numbersguttertrue} +\newcommand{\verselinenumbersouter}{\verselinenumbersswitch% +\reversesidepartrue\numbersgutterfalse} +\newcommand{\putverselinenumber}{\nolinebreak\begin{marginenvironment}% + \nolinebreak + \ifnumbersswitch\sidepar{\hfil\textrm{\scriptsize\theverselinenumber}}% + \else + \ifnumbersright\rightsidepar{\hfil\textrm{\scriptsize\theverselinenumber}}% + \else + \leftsidepar{\textrm{\scriptsize\theverselinenumber}\hfil}% + \fi + \fi + \nolinebreak + \end{marginenvironment}% + \nolinebreak +} +\newif\ifspeciallinelock +\speciallinelockfalse +\newcommand{\verseline}{\ifspeciallinelock% +\relax\else% +\nolinebreak\incrementverselinenumber% +\fi% +\speciallinelockfalse% +\nolinebreak\\ +} +\newcommand{\incrementverselinenumber}{% +\nolinebreak\addtocounter{verselinenumber}{1}% + \addtocounter{printlineindex}{1}% + \ifnum\theprintlineindex>\thelineindexrepeat% + \ifverselinenumbers\nobreak% + \putverselinenumber\nobreak% + \fi\nobreak% + \setcounter{printlineindex}{0}% + \fi% +} +\newcommand{\setverselinemodulo}[1]{% +\setcounter{lineindexrepeat}{#1}% +\addtocounter{lineindexrepeat}{-1}% +} +\newcommand{\linebend}{\\ +\hspace{\runoverindentvalue}% + } +\newcommand{\saveverselinenumber}{\setcounter{verselinenumberscratch}% + {\value{verselinenumber}}% + \setcounter{printlineindexscratch}{\value{printlineindex}}} +\newcommand{\restoreverselinenumber}{\setcounter{verselinenumber}% + {\value{verselinenumberscratch}}% + \setcounter{printlineindex}{\value{printlineindexscratch}}} +\newcommand{\rightversebegin} +{\leavevmode\nobreak\hskip0pt plus -1fill\ignorespaces} +\newcommand{\hour}[1]{{{\textsc{#1}}\ $\!\!\!$} + } +\newcommand{\brokenline}{\\} +\newcommand{\versephantom}[1]{\leavevmode\phantom{#1}} +\newcommand{\tweakbrokenline}{% + \renewcommand{\brokenline}{\ifnumbersswitch\relax% + \ifnumbersgutter% shift on odd pages for gutter numbers + \ifodd\c@page \relax \else \speciallinelocktrue\incrementverselinenumber\fi + \else % shift on even pages for outer numbers + \ifodd\c@page \speciallinelocktrue\incrementverselinenumber \fi + \fi + \else \ifnumbersright \relax% + \else \speciallinelocktrue\incrementverselinenumber% + \fi% + \fi% +\\} +} +\newcommand{\brokenlineatbeginning}{% + \renewcommand{\brokenline}{% + \speciallinelocktrue\incrementverselinenumber% + \\ + } +} +\newcommand{\startverseline}{% +\speciallinelocktrue% +\leavevmode% +\incrementverselinenumber% +} +\newcommand{\tweakstartverseline}{% +\renewcommand{\startverseline}{% +\leavevmode% +\ifnumbersswitch% + \ifnumbersgutter% + \ifodd\c@page \relax \else \speciallinelocktrue\incrementverselinenumber\fi + \else + \ifodd\c@page \speciallinelocktrue\incrementverselinenumber \fi + \fi% end of ifnumbersgutter +\else \ifnumbersright \relax% numbers don't switch. Are they to the right? + \else \speciallinelocktrue\incrementverselinenumber% or to the left? + \fi% end of ifnumbersright +\fi% end of ifnumbersswitch +}% end of renewcommand +}% end of tweakverseline +\def\poemlinelabel#1{\@bsphack + \protected@write\@auxout{}% + {\string\newlabel{#1}{{\theverselinenumber}{\thepage}}}% +\@esphack +} +\newcommand{\makepoemcontents}[1][5]{\global\poemcontentsontrue + \newwrite\poemcontents + \immediate\openout\poemcontents=\jobname.ctn + \literalcontents{\flushbottom\normalfont +{\par\clearpage{\pagestyle{volumetitlestyle}\cleardoublepage} +\pagestyle{fancy}\thispagestyle{volumetitlestyle}} +\pagenumbering{roman} +\setcounter{page}{#1} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em Contents}}} +\fancyhead[CE]{{\small{\em Contents}}} +\fancyfoot{} +\backmattersink +\begin{center}{\normalfont \backmatterheaderfont +CONTENTS}\end{center} +\lefthyphenmin=2\backmatterafterheadersink\tolerance=500\language=0} +\literalcontents{ \relax}} + + +\newcommand{\maketextnotes}{\global\textnotesontrue + \global\verselinenumberstrue + \newwrite\textnotes + \immediate\openout\textnotes=\jobname.ent + \literaltextnote{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyfoot{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em Textual Notes~\mymarks}}} +\fancyhead[CE]{{\small{\em Textual Notes~\mymarks}}} +\fancyfoot[C]{} +\mark{3} +\backmattersink +\begin{center}{\normalfont \backmatterheaderfont TEXTUAL NOTES}\end{center} +\label{textualnotes} +\lefthyphenmin=2\backmatterafterheadersink\tolerance=500\language=0 +\normalfont \backmattertextfont} +} + +\newcommand{\makeemendations}{\global\emendationsontrue + \newwrite\emendations + \global\verselinenumberstrue + \immediate\openout\emendations=\jobname.emd + \literalemend{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em Emendations~\mymarks}}} +\fancyhead[CE]{{\small{\em Emendations~\mymarks}}} +\fancyfoot{} +\mark{3} +\backmattersink +\begin{center}{\normalfont \backmatterheaderfont +EMENDATIONS}\end{center} +\label{emendationnotes} +\lefthyphenmin=2\backmatterafterheadersink\tolerance=500\language=0 +\normalfont \backmattertextfont} +} + +\newcommand{\makeexplanatorynotes}{\global\explanontrue + \global\verselinenumberstrue + \newwrite\explanations + \immediate\openout\explanations=\jobname.enx + \literalexplain{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em Explanatory Notes~\mymarks}}} +\fancyhead[CE]{{\small{\em Explanatory Notes~\mymarks}}} +\fancyfoot{} +\mark{3} +\backmattersink +\begin{center}{\normalfont \backmatterheaderfont +EXPLANATORY NOTES}\end{center} +\label{explanatorynotes} +\lefthyphenmin=2\backmatterafterheadersink\tolerance=500\language=0 +\normalfont \backmattertextfont } +} + +\newcommand{\@pagemarktotextnotes}[1]{% +\immediate\write\textnotes{\string\setcounterfrompageref\string{notepageholdertitle\string}% +\string{#1\string}}% +\immediate\write\textnotes{\string\mark +\string{\string\thenotepageholdertitle\string}}% +} +\newcommand{\@poempagetotextnotes}[1]{% + \immediate\write\textnotes{\string\par\string\argpageref\string{#1\string}}% +\@pagemarktotextnotes{#1}} +\newcommand{\@poemtitletotextnotes}[1]{\literaltextnote{\textbf{#1}}} + +\newcommand{\wholebooktitle}[1]{{\Huge\begin{center} +\hbox{#1}\end{center}} +} +\newcommand{\booksection}[1]{\volumesection{#1}} +\newcommand{\volumetitle}[1]{% + \set@p@emtitle{#1}{\volumetitlesink\par}{\volumetitlefont} + {\relax}{\nobreak\par\nobreak}{\z@} + \putpagenumberincontentsfalse + \putpagenumberinnotesfalse + \literalcontents{\goodbreak} + \c@ntentsinfo{#1}{\relax}{\contentsvolumefont} + {\contentsindentoneamount} + \literalcontents{\vspace{5pt}\par\nobreak} + \literaltextnote{\notesvolumetitlepenalty\bigskip\goodbreak\par} + \t@xtnotesinfo{\backmattervolumefont #1 \backmattertextfont\nobreak} + \putpagenumberincontentstrue + \putpagenumberinnotestrue} +\newcommand{\volumetitlefirstline}[1]{\firstlinesettings% + \set@p@emtitle{#1}{\volumetitlesink\par} + {\volumetitlefont} + {\relax}{\nobreak\par\nobreak}{\z@} + \putpagenumberincontentsfalse + \putpagenumberinnotesfalse + \c@ntentsinfo{#1}{\relax}{\contentsvolumefont} + {\contentsindentoneamount} + \t@xtnotesinfo{\backmattervolumefont #1 \backmattertextfont\nobreak} + \putpagenumberincontentstrue + \putpagenumberinnotestrue} +\newcommand{\volumetitlemiddleline}[1]{\middlelinesettings% + \set@p@emtitle{#1}{\relax} + {\volumetitlefont} + {\relax}{\nobreak\par\nobreak}{\z@} + \putpagenumberincontentsfalse + \putpagenumberinnotesfalse + \c@ntentsinfo{#1}{\contentsindentone}{\contentsvolumefont} + {\contentsindenttwoamount} + \t@xtnotesinfo{\backmattervolumefont #1 \backmattertextfont\nobreak} + \putpagenumberincontentstrue + \putpagenumberinnotestrue} +\newcommand{\volumetitlelastline}[1]{\lastlinesettings% + \set@p@emtitle{#1}{\relax} + {\volumetitlefont} + {\relax}{\nobreak\par\nobreak}{\z@} + \putpagenumberincontentsfalse + \putpagenumberinnotesfalse + \c@ntentsinfo{#1}{\contentsindentone}{\contentsvolumefont} + {\contentsindenttwoamount} + \literalcontents{\vspace{5pt}\par\nobreak} + \t@xtnotesinfo{\backmattervolumefont #1 \backmattertextfont\nobreak} + \putpagenumberincontentstrue + \putpagenumberinnotestrue} +\newcommand{\volumesubtitle}[1]{{\volumesubtitlefont +\volumetitleshift #1 \par} + \ifpoemcontentson + \literalcontents{{\contentsvolumesubtitlefont +#1\vspace{3pt}\par\nobreak}} + \fi + \iftextnoteson\iftextnotesatend + \immediate\write\textnotes{\string\backmattervolumesubtitlefont\ #1} + \immediate\write\textnotes{\string\par \string\backmattertextfont} + \immediate\write\textnotes{\string\nobreak} + \fi\fi +} +\newcommand{\volumesectiontitle}[1] +{\clearpage\thispagestyle{volumefirststyle} +\begin{center} {\volumesubtitlefont\textbf{#1}} +\end{center} \bigskip\bigskip + \ifpoemcontentson + \literalcontents{\goodbreak{\contentsvolumesubtitlefont #1\par\nobreak}} + \fi + \iftextnoteson\iftextnotesatend + \immediate\write\textnotes{\string\notesvolumetitlepenalty} + \immediate\write\textnotes{\string\par \string\begin{bf}} + \immediate\write\textnotes{#1 \string\end{bf}} + \immediate\write\textnotes{\string\par} + \immediate\write\textnotes{\string\nobreak} + \fi\fi +} + +\newcommand{\makepoemlabel}[1]{\label{#1}} +\newcommand{\argpageref}[1]{\pageref{#1}} + +\newcommand{\m@kep@emlabel}{\ifsinglelinetitle% + \addtocounter{poemnumber}{1}% + \makepoemlabel{poem\thepoemnumber}% + \else\iftitlefirstline% + \addtocounter{poemnumber}{1}% + \makepoemlabel{poem\thepoemnumber}% + \else \relax +\fi +\fi +} + +\newcommand{\m@ken@teholder}[1]{% +\ifsinglelinetitle +\fulltitleholder={#1}% +\global\edef\@compoundlabelscratch{poem\thepoemnumber}% +\else\iftitlefirstline + \fulltitleholder={#1}% + \global\edef\@compoundlabelscratch{poem\thepoemnumber}% + \else\iftitlemiddleline + \titlesofar=\fulltitleholder + \titleincrement={~#1}% + \global\edef\titleconcat{\the\titlesofar \the\titleincrement}% + \fulltitleholder=\expandafter{\titleconcat}% + \global\edef\@compoundlabelscratch{poem\thepoemnumber}% + \else + \titlesofar=\fulltitleholder + \titleincrement={~#1}% + \global\edef\titleconcat{\the\titlesofar \the\titleincrement}% + \fulltitleholder=\expandafter{\titleconcat}% + \global\edef\@compoundlabelscratch{poem\thepoemnumber}% + \fi + \fi + \fi +} + +\newcommand{\set@p@emtitle}[6]{\setlength{\titleentryoverrun}{#6}% +{#2}% +{#3 \begin{titleentryenvironment}{#4 #1}\end{titleentryenvironment}}% +{#5}% +\m@kep@emlabel +\m@ken@teholder{#1}% +\setlength{\titleentryoverrun}{\z@}} + +\newcommand{\setcontentsleaders}[1]{% + \def\contentsleaders{#1\nobreak% +}} +\setcontentsleaders{~/~} +\newcommand{\c@ntentsinfo}[4]{\ifpoemcontentson +\immediate\write\poemcontents{\string\setlength\string\contentsentryoverrun\string{#4\string}}% +\immediate\write\poemcontents{\string\begin\string{contentsentryenvironment\string}}% +\literalcontents{#2{#3#1}}% + \ifputpagenumberincontents +\immediate\write\poemcontents{\string\contentsleaders}% +\immediate\write\poemcontents{\string\pageref +\string{poem\thepoemnumber\string}}% + \else + \literalcontents{\relax}% + \fi +\immediate\write\poemcontents{\string\end\string{contentsentryenvironment\string}}% +\immediate\write\poemcontents{\string\par}% +\immediate\write\poemcontents{\string\setlength\string\contentsentryoverrun +\string{\string\contentsindentoneamount\string}}% +\fi +} + +\newcommand{\t@xtnotesinfo}[1]{\iftextnoteson +\iftextnotesatend + \immediate\write\textnotes{\string\notespoemclubpenalty}% + \ifputpagenumberinnotes + \@poempagetotextnotes{poem\thepoemnumber}% + \fi + \@poemtitletotextnotes{#1}% + \fi\fi +} + +\newcommand{\poemtitle}[1]{% +\set@p@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont}% +{\relax}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}{\z@}% +\c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}% +{\contentsindenttwoamount}% +\t@xtnotesinfo{#1}% +} +\newcommand{\poemtitleitalic}[2]{% +\poemtitle{#1}} +\newcommand{\firstlinesettings}{\singlelinetitlefalse +\titlefirstlinetrue +\putpagenumberincontentsfalse +\putpagenumberinnotestrue} + +\newcommand{\middlelinesettings}{\singlelinetitlefalse +\titlemiddlelinetrue +\putpagenumberincontentsfalse +\putpagenumberinnotesfalse} + +\newcommand{\lastlinesettings}{\singlelinetitlefalse +\titlelastlinetrue +\putpagenumberincontentstrue +\putpagenumberinnotesfalse} + +\newcommand{\restoresinglelinesettings}{\putpagenumberinnotestrue +\putpagenumberincontentstrue +\titlefirstlinefalse +\titlemiddlelinefalse +\titlelastlinefalse +\singlelinetitletrue} + +\newcommand{\poemtitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\multilinetitlepenalty}{\poemtitlefont}% +{\relax}{\nobreak\par\nobreak}{\z@}% +\c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}% +{\contentsindenttwoamount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} + +\newcommand{\poemtitlemiddleline}[1]{% +\middlelinesettings +\set@p@emtitle{#1}{\par\nobreak}{\poemtitlefont}% +{\relax}{\nobreak\par\nobreak}{\z@}% +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}% +{\contentsindentthreeamount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} +\newcommand{\poemtitlelastline}[1]{% +\lastlinesettings +\set@p@emtitle{#1}{\par\nobreak}{\poemtitlefont}% +{\relax}{\nobreak\par\afterpoemtitleskip\nobreak}{\z@}% +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}% +{\contentsindentthreeamount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} +\newcommand{\poemsectiontitle}[1]{% +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}% +{\titleindentamount}% +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}% +{\contentsindentthreeamount}% +\t@xtnotesinfo{#1}% +} +\newcommand{\poemsectiontitlefirstline}[1]{% +\firstlinesettings +\set@p@emtitle{#1}{\multilinetitlepenalty}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\nobreak}{\titleindentamount}% +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont}% +{\contentsindentthreeamount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} +\newcommand{\poemsectiontitlemiddleline}[1]{% +\middlelinesettings +\set@p@emtitle{#1}{\relax}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\nobreak}{\titleindentamount}% +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont}% +{\contentsindentfouramount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} +\newcommand{\poemsectiontitlelastline}[1]{% +\lastlinesettings +\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\afterpoemtitleskip\nobreak}% +{\titleindentamount}% +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont}% +{\contentsindentfouramount}% +\t@xtnotesinfo{#1}% +\restoresinglelinesettings +} +\newcommand{\poemsectiontitlenocontents}[1]{% + \sequencesubsectiontitlenocontents{#1}}% +\newcommand{\poemfirstsectiontitlebaretitle}[1]{% +\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}% +{\titleindentamount}} +\newcommand{\poemsectiontitlebaretitle}[1]{% +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont}% +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}% +{\titleindentamount}% +} +\newcommand{\poemsubsectiontitle}[1]{% +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont}% +{\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}% +{\titleindenttwoamount}% +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont}% +{\contentsindentfouramount}% +\t@xtnotesinfo{#1}% +} +\newcommand{\poemtitlenotitle}[1]{% +\m@kep@emlabel +\m@ken@teholder{#1}% +\c@ntentsinfo{#1}{\contentsindentone}{\contentspoemtitlefont}% +{\contentsindenttwoamount}% +\t@xtnotesinfo{#1}% +} +\newcommand{\poemtitlenotitleitalic}[2]{% +\poemtitlenotitle{1}} +\newcommand{\sequencetitle}[1]{ +\set@p@emtitle{#1}{\sequencetitlepenalty}{\sequencetitlefont} +{\relax}{\nobreak\par\nobreak\aftersequencetitleskip\nobreak}{\z@} +\putpagenumberincontentsfalse +\c@ntentsinfo{#1}{\contentsindentone}{\contentssequencetitlefont} +{\contentsindenttwoamount} +\putpagenumberincontentstrue +\t@xtnotesinfo{#1} +} + +\newcommand{\sequencetitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\multilinesequencepenalty}{\sequencetitlefont} +{\relax}{\nobreak\par\nobreak}{\z@} +\c@ntentsinfo{#1}{\contentsindentone}{\contentssequencetitlefont} +{\contentsindenttwoamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencetitlemiddleline}[1]{ +\middlelinesettings +\set@p@emtitle{#1}{\par\nobreak}{\sequencetitlefont} +{\relax}{\nobreak\par\nobreak}{\z@} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentssequencetitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencetitlelastline}[1]{ +\lastlinesettings +\set@p@emtitle{#1}{\par\nobreak}{\sequencetitlefont} +{\relax}{\nobreak\par\aftersequencetitleskip\nobreak}{\z@} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentssequencetitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesectiontitle}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +} + +\newcommand{\sequencefirstsectiontitle}[1]{ +\set@p@emtitle{#1}{\par\nobreak\afterpoemtitleskip}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencetitlenonotes}[1]{ +\set@p@emtitle{#1}{\par\nobreak}{\sequencetitlefont} +{\relax}{\nobreak\par\aftersequencetitleskip\nobreak}{\z@} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentssequencetitlefont} +{\contentsindentthreeamount} +} +\newcommand{\sequencesectiontitlenonotes}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +} +\newcommand{\sequencesectiontitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\multilinetitlepenalty}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak}{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesectiontitlemiddleline}[1]{ +\middlelinesettings +\set@p@emtitle{#1}{\par\nobreak}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak}{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesectiontitlelastline}[1]{ +\lastlinesettings +\set@p@emtitle{#1}{\par\nobreak}{\poemtitlefont} +{\titleindent}{\nobreak\par\afterpoemtitleskip\nobreak}{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencefirstsectiontitlenocontents}[2]{ +\set@p@emtitle{#1}{\par\nobreak\afterpoemtitleskip}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencesectiontitlenocontents}[2]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencefirstsectiontitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\par\nobreak\afterpoemtitleskip}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencefirstsectiontitlemiddleline}[1]{ +\sequencesectiontitlemiddleline{#1}} + +\newcommand{\sequencefirstsectiontitlelastline}[1] +{\sequencesectiontitlelastline{#1}} + +\newcommand{\sequencefirstsectiontitlenonotes}[1]{ +\set@p@emtitle{#1}{\par\nobreak\afterpoemtitleskip}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentamount} +\c@ntentsinfo{#1}{\contentsindenttwo}{\contentspoemtitlefont} +{\contentsindentthreeamount} +} + +\newcommand{\sequencesectionsubtitle}[1]{{\subsectiontitlefont \hbox{\titleindent #1}} + \nobreak\par\nobreak\afterpoemtitleskip\nobreak +} +\newcommand{\poemsubtitle}[1]{\sequencesectionsubtitle{#1} +} +\newcommand{\sequencesectiontitleitalicnonotes}[2] +{\sequencesectiontitlenonotes{#1} +} +\newcommand{\sequencesectiontitleitalic}[2]{ +\sequencesectiontitle{#1}} +\newcommand{\sequencesectiontitlefirstlineitalic}[2] +{\sequencesectiontitlefirstline{#1}} +\newcommand{\sequencesectiontitlebaretitle}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\poemtitlefont} +{\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak}{\titleindentamount} +} + + +\newcommand{\sequencesubsectiontitle}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencesubsectiontitlenocontents}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindenttwoamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencefirstsubsectiontitle}[1] +{\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencefirstsubsectiontitlenocontents}[1] +{\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindenttwoamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencesubsectiontitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\multilinetitlepenalty}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak}{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesubsectiontitlemiddleline}[1]{ +\middlelinesettings +\set@p@emtitle{#1}{\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak}{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentfour}{\contentspoemtitlefont} +{\contentsindentfiveamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesubsectiontitlelastline}[1]{ +\lastlinesettings +\set@p@emtitle{#1}{\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\afterpoemtitleskip\nobreak} +{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentfour}{\contentspoemtitlefont} +{\contentsindentfiveamount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencesubsubsectiontitle}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont} +{\titleindent\titleindent\titleindent} +{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentthreeamount} +\c@ntentsinfo{#1}{\contentsindentfour}{\contentspoemtitlefont} +{\contentsindentfiveamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencesubsubsectiontitlenocontents}[1]{ +\set@p@emtitle{#1}{\poemtitlepenalty}{\subsectiontitlefont} +{\titleindent\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentthreeamount} +\t@xtnotesinfo{#1} +} +\newcommand{\sequencefirstsubsubsectiontitlenocontents}[1]{ +\set@p@emtitle{#1}{\nobreak\par\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent\titleindent}{\nobreak\par\nobreak\afterpoemtitleskip\nobreak} +{\titleindentthreeamount} +\t@xtnotesinfo{#1} +} + +\newcommand{\sequencefirstsubsectiontitlefirstline}[1]{ +\firstlinesettings +\set@p@emtitle{#1}{\par\nobreak}{\subsectiontitlefont} +{\titleindent\titleindent}{\nobreak\par\nobreak}{\titleindenttwoamount} +\c@ntentsinfo{#1}{\contentsindentthree}{\contentspoemtitlefont} +{\contentsindentfouramount} +\t@xtnotesinfo{#1} +\restoresinglelinesettings +} +\newcommand{\sequencefirstsubsectiontitlemiddleline}[1]{ +\sequencesubsectiontitlemiddleline{#1}} +\newcommand{\sequencefirstsubsectiontitlelastline}[1]{ +\sequencesubsectiontitlelastline{#1}} + +\newcommand{\interjectiontitlefirstline}[1]{ +\sequencefirstsubsectiontitlefirstline{#1}} +\newcommand{\interjectiontitlelastline}[1]{ +\sequencefirstsubsectiontitlelastline{#1} +} +\newcommand{\interjectiontitlemiddleline}[1]{ +\sequencefirstsubsectionmiddleline{#1} +} + +\newcommand{\epigraph}[1]{\nopagebreak\afterpoemtitleskip\begin{epigraphquote} + \emph{#1}\end{epigraphquote}\afterpoemtitleskip\nopagebreak} +\newcommand{\headnote}[1]{\epigraph{#1}} +\newcommand{\attribution}[1]{\nopagebreak\afterpoemtitleskip\begin{epigraphquote} + {\small\emph{#1}}\end{epigraphquote}\afterpoemtitleskip\nopagebreak} +\newcommand{\dedication}[1]{\nopagebreak\afterpoemtitleskip\begin{epigraphquote} + \emph{#1}\end{epigraphquote}\afterpoemtitleskip\nopagebreak} +\newcommand{\volumededication}[1]{\par\bigskip\begin{volumetitlepagequote} + \emph{#1}\end{volumetitlepagequote}} +\newcommand{\volumeepigraph}[1]{\par\bigskip\begin{volumetitlepagequote} + \emph{#1}\end{volumetitlepagequote}} +\newcommand{\volumeattribution}[1]{\par\smallskip\begin{volumetitlepagequote} + {\small \emph{#1}}\end{volumetitlepagequote}} +\def\strip#1>{} +\newcommand{\literaltextnote}[1]{\iftextnotesatend + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\textnotes{\expandafter\strip\meaning\next}% + \endgroup\fi + } +\newcommand{\literalemend}[1]{\ifemendationsatend + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\emendations{\expandafter\strip\meaning\next}% + \endgroup\fi +} +\newcommand{\literalexplain}[1]{\ifexplanatend + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\explanations{\expandafter\strip\meaning\next}% + \endgroup\fi +} +\newcommand{\literalcontents}[1]{\ifpoemcontentson + \begingroup + \def\next{#1}% + \newlinechar='40 + \immediate\write\poemcontents{\expandafter\strip\meaning\next}% + \endgroup\fi +} +\newcommand{\literaltextnoteshort}[1]{ +\iftextnotesatend + \begingroup + \def\next{#1}% + \immediate\write\textnotes{\expandafter\strip\meaning\next}% + \endgroup\fi} +\newcommand{\literalemendshort}[1]{\ifemendationsatend + \begingroup + \def\next{#1}% + \immediate\write\emendations{\expandafter\strip\meaning\next}% + \endgroup\fi} +\newcommand{\literalexplainshort}[1]{\ifexplanatend + \begingroup + \def\next{#1}% + \immediate\write\explanations{\expandafter\strip\meaning\next}% + \endgroup\fi} +\newcommand{\literalcontentsshort}[1]{\ifpoemcontentson + \begingroup + \immediate\write\poemcontents{\expandafter\strip\meaning\next}% + \endgroup\fi} +\newcommand{\sameword}{$\sim$} +\newcommand{\missingpunct}{${}_{\wedge}$} +\newcommand{\pmccheckifinteger}[1]{% + \protected@edef\@vsa{#1}% + \ifcat _\ifnum9<1\pmcgobm{#1} _\else A\fi + \integertrue% + \else + \integerfalse% + \fi% +} +\newif\ifinteger +\newcommand{\pmcgobm}[1]{#1} +\newcommand{\setlemmarange}[1]{% +\pmccheckifinteger{#1}% +\ifinteger +\setcounter{lemmalines}{#1}% +\ifthenelse{\equal{\value{lemmalines}}{0}}{\rangelemmafalse}{\rangelemmatrue}% +\setcounter{lemmaend}{\theverselinenumber}% +\addtocounter{lemmaend}{\thelemmalines}% +\else +\setcounterfromref{lemmaend}{#1}\rangelemmatrue +\fi +\makeatother} +\newcommand{\citerange}{% +\ifrangelemma +\theverselinenumber --\thelemmaend +\else +\theverselinenumber +\fi} +\newcommand{\resetlemmacounters}{\rangelemmafalse +\setcounter{lemmalines}{0}% +\setcounter{lemmaend}{0}% +} +\newcommand{\checknoteheaders}{\string\setcounter\string{notepageholdernote\string}% +\string{\thepage\string}\string\ifhmode\string\unskip\string\fi% +\string\ifthenelse\string{\string\value\string{notepageholdernote\string}>% +\string\value\string{notepageholdertitle\string}\string}% +\string{\string\mark\string{\string\thenotepageholdernote\string}\string}% +\string{\string\mark\string{\string\thenotepageholdertitle\string}\string}\string\unskip +\string\unskip\string\relax\ \citerange :\string~\string\nolinebreak}% + +\newcommand{\textnote}[2][0]{% +\iftextnoteson + \setlemmarange{#1}% +\immediate\write\textnotes{\checknoteheaders}% + \literaltextnote{#2}% + \fi +\resetlemmacounters +} +\newcommand{\accidental}[1]{% +\iftextnoteson% + \ifincludeaccidentals% + \iftextnotesatend\immediate\write\textnotes{\string\nobreak}\fi% +\textnote{#1}% +\iftextnotesatend\immediate\write\textnotes{\string\nobreak}\fi% + \fi\fi +} +\newcommand{\tsvariant}[2][0]{% +\iftextnoteson + \ifincludetypescripts% + \iftextnotesatend\immediate\write\textnotes{\string\nobreak}\fi% +\textnote[#1]{#2}% +\iftextnotesatend\immediate\write\textnotes{\string\nobreak}\fi% + \fi\fi +} +\newcommand{\tsaccidental}[1]{\iftextnoteson\ifincludetypescripts\accidental{#1}\fi\fi} +\newcommand{\tsentry}[1]{\iftextnoteson\ifincludetypescripts{\@ifnextchar,{\unskip}{% +Ê\@ifnextchar;{\unskip}{}% +}#1}\fi\fi\unskip} +\newcommand{\sources}[1]{% +\iftextnoteson + \begingroup + \newlinechar='40 + \def\next{#1}% + \immediate\write\textnotes{\expandafter\strip\meaning\next}% + \endgroup + \fi +} +\newcommand{\titletoothernotes}{\string\par +\string\argpageref\string{\@compoundlabelscratch\string}% +\string\setcounterfrompageref\string{notepageholdertitle\string}% +\string{\@compoundlabelscratch\string}% +\string\textbf\string{\ \the\fulltitleholder\string}}% +\newcommand{\emendation}[2][0]{ +\ifemendationson + \setlemmarange{#1}% + \ifredundantemendations + \iftextnoteson + \ifrangelemma + \textnote[#1]{#2}% + \else + \textnote{#2}% + \fi % ifrangelemma} + \fi %iftextnoteson + \fi % ifredundantemendations + \ifnoemendyet % firstemendation + \firstemendation + \fi %noemendyet + \global\noemendyetfalse +\immediate\write\emendations{\checknoteheaders}% + \literalemend{#2}% +\fi % ifemendationson +\resetlemmacounters +} +\newcommand{\firstemendation}{\ifemendationsatend +\immediate\write\emendations{\titletoothernotes}\fi +} +\newcommand{\explanatory}[2][0]{% +\ifexplanon + \setlemmarange{#1}% + \ifnoexplainyet % first explanation + \firstexplanatory + \fi %noexplainyet + \global\noexplainyetfalse +\immediate\write\explanations{\checknoteheaders}% + \literalexplain{#2}% +\fi % ifexplanon +\resetlemmacounters +} + +\newcommand{\firstexplanatory}{\ifexplanatend +\immediate\write\explanations{\titletoothernotes}\fi +} + +\makeatletter +\long\def\appendtomacro#1#2{% +\begingroup + \toks@\expandafter{#1#2}% + \xdef#1{\the\toks@}% + \endgroup} +\makeatother +\newcommand{\definenewnotetype}[4]{% +\expandafter\newif\csname if#1son\endcsname +\global\csname #1sontrue\endcsname +\expandafter\newif\csname ifno#1yet\endcsname +\csname no#1yettrue\endcsname +\expandafter\newwrite\csname #1s\endcsname +\immediate\expandafter\openout\csname #1s\endcsname=\expandafter\jobname .#2 + \expandafter\newcommand\csname literal#1\endcsname[1]{ +\begingroup +\def\next{##1}% +\newlinechar='40 +\immediate\write\expandafter\csname #1s\endcsname{\expandafter\strip\meaning\next}% +\endgroup} +\csname literal#1\endcsname{\flushbottom{\par\clearpage + {\pagestyle{volumetitlestyle}\cleardoublepage} +\thispagestyle{volumetitlestyle}} +\fancyhead{} +\fancyfoot{} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}}} +\immediate\write\csname #1s\endcsname{\string\fancyhead[CO]\string{\string{\string\small +\string{\string\em\ #3\string~\string\mymarks\string}\string}\string}} +\immediate\write\csname #1s\endcsname{\string\fancyhead[CE]\string{\string{\string\small +\string{\string\em\ #3\string~\string\mymarks\string}\string}\string}} +\csname literal#1\endcsname{\fancyfoot[C]{} +\mark{3} +\backmattersink} +\immediate\write\csname #1s\endcsname{ +\string\begin\string{center\string} +\string{\string\normalfont \string\backmatterheaderfont\ #4\string} +\string\end\string{center\string}} +\immediate\write\csname #1s\endcsname{ +\string\label\string{#1notes\string}} +\csname literal#1\endcsname{\lefthyphenmin=2\backmatterafterheadersink +\tolerance=500\language=0 +\normalfont \backmattertextfont} +\expandafter\newcommand\csname first#1\endcsname{ +\immediate\write\expandafter\csname#1s\endcsname{\titletoothernotes}} +\expandafter\newcommand\csname #1\endcsname[2][0]{ + \setlemmarange{##1} + \csname ifno#1yet\endcsname + \csname first#1\endcsname + \fi +\global\csname no#1yetfalse\endcsname +\immediate\write\expandafter\csname #1s\endcsname{\checknoteheaders} +\csname literal#1\endcsname{##2} +\resetlemmacounters} +\makeatletter +\appendtomacro{\poem}{\global\expandafter\csname no#1yettrue\endcsname} +\makeatother +\expandafter\newcommand\csname put#1s\endcsname{ +\newpage\hyphenationforsmall +\immediate\expandafter\closeout\csname #1s\endcsname +\expandafter\input \jobname.#2 +\ifpoemcontentson + \immediate\write\poemcontents{\string\contentspoemtitlefont\ #3} + \immediate\write\poemcontents{\string~ / \string~\ \string\pageref{#1notes} \string\par} + \immediate\write\poemcontents{\string\par \string\smallskip} +\fi + } +} +\newcounter{proselinenumber} +\setcounter{proselinenumber}{1} +\newcounter{prosemodulo} +\setcounter{prosemodulo}{\value{lineindexrepeat}} +\addtocounter{prosemodulo}{1} +\newcommand{\setprosemodulo}[1]{\modulolinenumbers[#1]} +\newcommand{\prosesectiontitle}[1]{\poemtitle{#1}} +\newcommand{\prosesectiontitlenotitle}[1]{\poemtitlenotitle{#1}} +\newenvironment{prosesection} +{\resetlinenumber\begin{linenumbers}% +\setcounter{prosemodulo}{\value{lineindexrepeat}}% +\addtocounter{prosemodulo}{1}% +\modulolinenumbers[\value{prosemodulo}]% +\renewcommand{\linenumberfont}{\scriptsize}% +\ifnumbersright\rightlinenumbers*\setlength{\linenumbersep}{-\marginparsep}% +\else\ifnumbersswitch\rightlinenumbers*\setlength{\linenumbersep}{-\marginparsep}% +\else\leftlinenumbers*\setlength{\linenumbersep}{\marginparsep}% +\addtolength{\linenumbersep}{5pt}% seems about right +\fi\fi} +{\end{linenumbers}} +\newenvironment{prosesectionnoreset} +{\begin{linenumbers}% +\setcounter{prosemodulo}{\value{lineindexrepeat}}% +\addtocounter{prosemodulo}{1}% +\modulolinenumbers[\value{prosemodulo}]% +\renewcommand{\linenumberfont}{\scriptsize}}{\end{linenumbers}} +\makeatletter +\newcommand*{\ifrefundefined}[1]{% + \expandafter\ifx\csname r@#1\endcsname\relax + \expandafter\@firstoftwo + \else + \expandafter\@secondoftwo + \fi +} +\newcommand*{\@extract@ref}[2]{% + \expandafter\expandafter\expandafter#1\csname +r@#2\endcsname{}{}\@nil +} + +\newcommand*{\@extractref}{% + \@extract@ref\@car +} + +\newcommand*{\@extractpageref}{% + \@extract@ref\@secondcar +} + +\long\def\@secondcar#1#2#3\@nil{#2} + +\newcommand*{\setcounterfromref}[2]{% + \ifrefundefined{#2}{% + \protect\G@refundefinedtrue + \@latex@warning{Reference `#2' on page \thepage \space + undefined}% + \setcounter{#1}{0}% + }{% + \setcounter{#1}{\@extractref{#2}}% + }% +} +\newcommand*{\setcounterfrompageref}[2]{% + \ifrefundefined{#2}{% + \protect\G@refundefinedtrue + \@latex@warning{Reference `#2' on page \thepage \space + undefined}% + \setcounter{#1}{0}% + }{% + \setcounter{#1}{\@extractpageref{#2}}% + }% +} +\makeatother +\newcommand{\setproselemmastart}[1]{% +\unskip +\setcounterfromref{proselinenumber}{#1}} +\newcommand{\setproselemmarange}[2]{% +\setproselemmastart{#1}% +\pmccheckifinteger{#2}% +\ifinteger +\setcounter{lemmalines}{#2}% +\ifthenelse{\equal{\value{lemmalines}}{0}}{\rangelemmafalse}{\rangelemmatrue}% +\setcounter{lemmaend}{\theproselinenumber}% +\addtocounter{lemmaend}{\thelemmalines}\unskip% +\else +\setcounterfromref{lemmaend}{#2}\rangelemmatrue +\fi\unskip +} +\newcommand{\proseciterange}{% +\ifrangelemma% +\theproselinenumber --\thelemmaend% +\else% +\theproselinenumber% +\fi} +\newcommand{\checkprosenoteheaders}{\string\setcounter\string{notepageholdernote\string}% +\string{\thepage\string}\string\ifhmode\string\unskip\string\fi +\string\ifthenelse\string{\string\value\string{notepageholdernote\string}> +\string\value\string{notepageholdertitle\string}\string}% +\string{\string\mark\string{\string\thenotepageholdernote\string}\string}% +\string{\string\mark\string{\string\thenotepageholdertitle\string}\string}\string\unskip +\string\unskip\string\relax\ \proseciterange :\string~\string\nolinebreak}% +\newcommand{\proselinelabel}[1]{\unskip\linelabel{#1}} +\newcommand{\prosetextnote}[3][0]{% +\iftextnoteson% +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% +\immediate\write\textnotes{\checkprosenoteheaders}% +\literaltextnote{#3}% +\resetlemmacounters% +\fi\unskip% +} +\newcommand{\proseemendation}[3][0]{% +\ifemendationson% +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifredundantemendations + \iftextnoteson + \ifrangelemma + \prosetextnote[#1]{#2}{#3}% + \else + \prosetextnote{#2}{#3}% + \fi % ifrangelemma} + \fi %iftextnoteson + \fi % ifredundantemendations + \ifnoemendyet % firstemendation + \firstemendation + \fi%noemendyet + \global\noemendyetfalse +\immediate\write\emendations{\checkprosenoteheaders}% + \literalemend{#3}% +\resetlemmacounters% +\fi\unskip% +} +\newcommand{\proseexplanatory}[3][0]{% +\ifexplanon% +\unskip\proselinelabel{#2}% +\setproselemmarange{#2}{#1}% + \ifnoexplainyet% firstexplanation + \firstexplanatory% + \fi%noexplainyet + \global\noexplainyetfalse% +\immediate\write\explanations{\checkprosenoteheaders}% + \literalexplain{#3}% +\resetlemmacounters% +\fi\unskip% +} +\newcommand{\proseaccidental}[2]{ +\iftextnoteson + \ifincludeaccidentals + \immediate\write\textnotes{\string\nobreak}% +\prosetextnote{#1}{#2}% +\immediate\write\textnotes{\string\nobreak}% + \fi\fi +} +\newcommand{\prosetsvariant}[3][0]{\iftextnoteson + \ifincludetypescripts + \immediate\write +\textnotes{\string\nobreak}% +\prosetextnote[#1]{#2}{#3}% +\immediate\write\textnotes{\string\nobreak}% + \fi\fi +} +\newcommand{\prosetsaccidental}[2]{\iftextnoteson +\ifincludetypescripts\proseaccidental{#1}{#2}\fi\fi} +\newif{\ifprosebysentence} +\newif{\ifrunningsentencenumbers}\runningsentencenumberstrue +\newif{\ifmarginsentencenumbers}\marginsentencenumberstrue + +\newtoks{\pmnoteheader} + +\newcounter{pmsentencenumber}\setcounter{pmsentencenumber}{0} +\newcounter{pmmodulo}\setcounter{pmmodulo}{3} +\newcounter{pmindexcount}\setcounter{pmindexcount}{0} +\newcommand{\setprosebysentence}{\prosebysentencetrue% +} +\newcommand{\runningsentencenumberformat}[1]{\nobreak% +\textsuperscript{\scriptsize{#1}}\unskip\nobreak} +\newcommand{\marginsentencenumberformat}[1]{\scriptsize{#1}} +\newcommand{\setpmmodulo}[1]{\setcounter{pmmodulo}{#1}% +\addtocounter{pmmodulo}{-1}% +} +\newcommand{\pmnumberstoleft}{\numbersswitchfalse\numbersrightfalse% +\setlength{\marginparsep}{18pt}% +} +\newcommand{\pmnumberstoright}{\numbersswitchfalse\numbersrighttrue% +\setlength{\marginparsep}{-18pt} +} +\newcommand{\pmnumbersswitch}{\strictpagechecktrue\numbersswitchtrue\numbersrightfalse% +\setlength{\marginparsep}{18pt}% +} +\newcommand{\pmnumbersgutter}{\pmnumbersswitch% +\reversesideparfalse\numbersguttertrue% +\setlength{\marginparsep}{18pt}% +} +\newcommand{\pmnumbersouter}{\pmnumbersswitch% +\reversesidepartrue\numbersgutterfalse% +\setlength{\marginparsep}{18pt}% +} +\newcommand{\putpmsentencenumber}{% +\putpmmarginnumber{\thepmsentencenumber}% +{\marginsentencenumberformat}} +\newcommand{\putpmmarginnumber}[2]{% +\nolinebreak\begin{marginenvironment}% + \nolinebreak + \ifnumbersswitch\sidepar{\hfil #2{#1}}% + \else + \ifnumbersright\rightsidepar{\hfil #2{#1}}% + \else \leftsidepar{#2{#1}\hfil}% + \fi + \fi + \nolinebreak + \end{marginenvironment}\nolinebreak +} +\newcommand{\pmsentence}{% +\addtocounter{pmsentencenumber}{1}% +\ifrunningsentencenumbers % add running number +\runningsentencenumberformat{\thepmsentencenumber}% +\fi% +\ifmarginsentencenumbers % add marginal number + \addtocounter{pmindexcount}{1}% + \leavevmode% + \ifnum\thepmindexcount>\thepmmodulo% + \putpmsentencenumber\nobreak% + \setcounter{pmindexcount}{0}% + \fi% +\fi% +\ifpmparas% +\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\else% +\global\edef\noteheaderconcat{\thepmsentencenumber:}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\fi% +} +\newcommand{\pmsentencetwo}{% +\addtocounter{pmsentencenumber}{1}% +\ifrunningsentencenumbers % add running number +\runningsentencenumberformat{\thepmsentencenumber}% +\fi% +\ifmarginsentencenumbers % add marginal number + \addtocounter{pmindexcount}{1}% + \leavevmode% + \ifnum\thepmindexcount>\thepmmodulo% + \putpmsentencenumbertwo\nobreak% + \setcounter{pmindexcount}{0}% + \fi% +\fi% +\ifpmparas% +\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\else% +\global\edef\noteheaderconcat{\thepmsentencenumber:}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\fi% +} + +\newcommand{\putpmsentencenumbertwo}{% +\putpmmarginnumber{\rlap{\phantom{1},~\thepmsentencenumber}}% +{\marginsentencenumberformat}} +\newcommand{\pmsentencethree}{ +\addtocounter{pmsentencenumber}{1}% +\ifrunningsentencenumbers % add running number +\runningsentencenumberformat{\thepmsentencenumber}% +\fi% +\ifmarginsentencenumbers % add marginal number + \addtocounter{pmindexcount}{1}% + \leavevmode% + \ifnum\thepmindexcount>\thepmmodulo% + \putpmsentencenumberthree\nobreak% + \setcounter{pmindexcount}{0}% + \fi% +\fi% +\ifpmparas% +\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\else% +\global\edef\noteheaderconcat{\thepmsentencenumber:}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\fi% +} + +\newcommand{\putpmsentencenumberthree}{% +\putpmmarginnumber{\rlap{\phantom{1,~2},~\thepmsentencenumber}}% +{\marginsentencenumberformat}} +\newcommand{\pmsentencefour}{ +\addtocounter{pmsentencenumber}{1}% +\ifrunningsentencenumbers % add running number +\runningsentencenumberformat{\thepmsentencenumber}% +\fi% +\ifmarginsentencenumbers % add marginal number + \addtocounter{pmindexcount}{1}% + \leavevmode% + \ifnum\thepmindexcount>\thepmmodulo% + \putpmsentencenumberfour\nobreak% + \setcounter{pmindexcount}{0}% + \fi% +\fi% +\ifpmparas% +\global\edef\noteheaderconcat{\thepmparagraph:\thepmsentencenumber}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\else% +\global\edef\noteheaderconcat{\thepmsentencenumber:}% +\pmnoteheader=\expandafter{\noteheaderconcat}% +\fi% +} + +\newcommand{\putpmsentencenumberfour}{% +\putpmmarginnumber{\rlap{\phantom{1,~2,~3},~\thepmsentencenumber}}% +{\marginsentencenumberformat}} + +\newcounter{pmparagraph} +\setcounter{pmparagraph}{0} +\newif{\ifpmparas}\pmparasfalse +\newif{\ifpmparainmar}\pmparainmartrue +\newif{\ifpmpararunning}\pmpararunningfalse +\newif{\ifpmsentencebypara}% reset sentence counter every paragraph +\pmsentencebyparatrue +\newcommand{\pmparmarformat}[1]{\textbf{{\small #1}}} +\newcommand{\pmpararunningformat}[1]{\textbf{\small #1}} +\newcommand{\putpmmarparanumber}{% +\putpmmarginnumber{\llap{\thepmparagraph~~}}{\pmparmarformat}} +\newcommand{\pmpara}{\leavevmode% +\pmparastrue\addtocounter{pmparagraph}{1}% +\ifpmparainmar% put in marginal paragraph number + \putpmmarparanumber +\fi +\ifpmpararunning% put in running number + \pmpararunningformat{\thepmparagraph}% +\fi +\ifpmsentencebypara% reset sentence counter + \setcounter{pmsentencenumber}{0}% + \setcounter{pmindexcount}{0}% +\fi} +\makeatletter +\def\sentencelabel#1{\@bsphack% +\ifpmparas% +\protected@write\@auxout{}% + {\string\newlabel{#1}{{\thepmparagraph :\thepmsentencenumber}{\thepage}}}% +\else% +\protected@write\@auxout{}% + {\string\newlabel{#1}{{\thepmsentencenumber}{\thepage}}}% +\fi% +\@esphack% +} +\makeatother +\newtoks{\pmrangeend} % for notes that refer to ranges +\newcommand{\setpmlemmarange}[1]{% +\pmccheckifinteger{#1}% +\ifinteger% +\setcounter{lemmalines}{#1}% +\ifthenelse{\equal{\value{lemmalines}}{0}}{\rangelemmafalse}{\rangelemmatrue}% +\setcounter{lemmaend}{\thepmsentencenumber}% +\addtocounter{lemmaend}{\thelemmalines}% +\pmrangeend={\thelemmaend}% +\else% +\pmrangeend={\ref{#1}}\rangelemmatrue% +\fi% +} +\newcommand{\pmciterange}{% +\ifrangelemma{\the\pmnoteheader --\the\pmrangeend:}% +\else% +\the\pmnoteheader:% +\fi} +\newcommand{\pmchecknoteheaders}{\string\setcounter\string{notepageholdernote\string}% +\string{\thepage\string}\string\ifhmode\string\unskip\string\fi +\string\ifthenelse\string{\string\value\string{notepageholdernote\string}> +\string\value\string{notepageholdertitle\string}\string}% +\string{\string\mark\string{\string\thenotepageholdernote\string}\string}% +\string{\string\mark\string{\string\thenotepageholdertitle\string}\string}\string\unskip} +\newcommand{\pmresetlemmacounters}{\rangelemmafalse% +\setcounter{lemmalines}{0}% +\setcounter{lemmaend}{0}% +\pmrangeend={\relax}% +} +\newcommand{\pmtextnote}[2][0]{% +\iftextnoteson% +\setpmlemmarange{#1}% +\immediate\write\textnotes{\pmchecknoteheaders\string~}% + \immediate\write\textnotes{\pmciterange}% + \literaltextnote{#2}% + \fi% +\pmresetlemmacounters% +\unskip} +\newcommand{\pmexplanatory}[2][0]{% +\ifexplanon% +\setpmlemmarange{#1}% + \ifnoexplainyet % first explanation + \firstexplanatory% + \fi %noexplainyet + \global\noexplainyetfalse% +\immediate\write\explanations{\pmchecknoteheaders\string~}% +\immediate\write\explanations{\pmciterange}% + \literalexplain{#2}% +\fi % ifexplanon +\pmresetlemmacounters% +\unskip% +} +\newcommand{\pmemendation}[2][0]{% +\ifemendationson% + \setpmlemmarange{#1}% + \ifredundantemendations% + \iftextnoteson% + \ifrangelemma% + \pmtextnote[#1]{#2}% + \else% + \pmtextnote{#2}% + \fi % ifrangelemma} + \fi %iftextnoteson + \fi % ifredundantemendations + \ifnoemendyet % firstemendation + \firstemendation% + \fi %noemendyet + \global\noemendyetfalse% +\immediate\write\emendations{\pmchecknoteheaders\string~}% +\immediate\write\emendations{\pmciterange}% + \literalemend{#2}% +\fi % ifemendationson +\pmresetlemmacounters% +} +\newcommand{\pmaccidental}[1]{% +\iftextnoteson% + \ifincludeaccidentals% + \immediate\write\textnotes{\string\nobreak}% +\pmtextnote{#1}% +\immediate\write\textnotes{\string\nobreak}% + \fi\fi% +} +\newcommand{\pmtsvariant}[2][0]{\iftextnoteson% + \ifincludetypescripts% + \immediate\write\textnotes{\string\nobreak}% +\pmtextnote[#1]{#2}% +\immediate\write\textnotes{\string\nobreak}% + \fi\fi% +} +\newcommand{\pmtsaccidental}[1]{\iftextnoteson\ifincludetypescripts\pmaccidental{#1}\fi\fi} +\newcommand{\textnotesatfoot}{% first redefine textnotes +\global\textnotesontrue% +\global\textnotesatendfalse% +\ifsourcesfootnotespara% +\DeclareNewFootnote[para]{A}% +\else% +\DeclareNewFootnote[plain]{A}% +\fi% +\iftextfootnotespara% +\DeclareNewFootnote[para]{B}% +\else% +\DeclareNewFootnote[plain]{B}% +\fi% +\renewcommand{\textnote}[2][0]{\setlemmarange{##1}% +\FootnotetextB{\relax}{\citerange:~##2}% +\resetlemmacounters}% +\renewcommand{\sources}[1]{\FootnotetextA{\relax}{##1}}% +\renewcommand{\prosetextnote}[3][0]{% +\unskip\proselinelabel{##2}% +\setproselemmarange{##2}{##1}% +\FootnotetextB{\relax}{\proseciterange:~##3}\resetlemmacounters}% +\renewcommand{\pmtextnote}[2][0]{\setpmlemmarange{##1}% +\FootnotetextB{\relax}{\pmciterange~##2}\pmresetlemmacounters} +} +\newcommand{\emendationsatfoot}{% +\global\emendationsontrue% +\global\emendationsatendfalse% +\ifemendationfootnotespara% +\DeclareNewFootnote[para]{C}% +\else% +\DeclareNewFootnote[plain]{C}% +\fi% +\renewcommand{\emendation}[2][0]{\setlemmarange{##1}% +\FootnotetextC{\relax}{\citerange:~##2}% +\resetlemmacounters}% +\renewcommand{\proseemendation}[3][0]{\unskip\proselinelabel{##2}% +\setproselemmarange{##2}{##1}% +\FootnotetextC{\relax}{\proseciterange:~##3}\resetlemmacounters}% +\renewcommand{\pmemendation}[2][0]{\setpmlemmarange{##1}% +\FootnotetextC{\relax}{\pmciterange~##2}\pmresetlemmacounters} +} +\newcommand{\explanationsatfoot}{% +\global\explanontrue% +\global\explanatendfalse% +\ifexplanfootnotespara% +\DeclareNewFootnote[para]{D}% +\else% +\DeclareNewFootnote[plain]{D}% +\fi% +\renewcommand{\explanatory}[2][0]{\setlemmarange{##1}% +\FootnotetextD{\relax}{\citerange:~##2}% +\resetlemmacounters}% +\renewcommand{\proseexplanatory}[3][0]{\unskip\proselinelabel{##2}% +\setproselemmarange{##2}{##1}% +\FootnotetextD{\relax}{\proseciterange:~##3}} +\renewcommand{\pmexplanatory}[2][0]{\setpmlemmarange{##1}% +\FootnotetextD{\relax}{\pmciterange~##2}\pmresetlemmacounters}% +} +\newcommand{\bibleverse}{\pmsentence} +\newcommand{\biblechapter}{\pmpara} +\newcommand{\quotedversecorrectiontextnote} +{\iftextnoteson\immediate\write +\textnotes{\string\par\string\noindent\string\kern-\parindent}\fi}% a bad kludge +\newcommand{\quotedversecorrectionemendation} +{\ifemendationson\immediate\write +\emendations{\string\par\string\noindent\string\kern-\parindent}\fi}% a bad kludge +\newcommand{\quotedversecorrectionexplanatory} +{\ifexplanon\immediate\write +\explanations{\string\par\string\noindent\string\kern-\parindent}\fi}% a bad kludge + + +\newcommand{\stanzaatbottom}[1]{\global\edef\stanzaatbottomvalue{#1}} +\stanzaatbottom{*} +\newcommand{\nostanzaatbottom}[1]{\global\edef\nostanzaatbottomvalue{#1}} +\nostanzaatbottom{\relax} +\def\cleartorecto{\clearpage\if@twoside \ifodd\c@page\else + \hbox{}\thispagestyle{empty}% + \newpage\if@twocolumn\hbox{}\newpage\fi\fi\fi} + +\def\cleartoverso{\clearpage\if@twoside + \ifodd\c@page\hbox{}\thispagestyle{empty}% + \newpage\if@twocolumn\hbox{}\newpage\fi\fi\fi} + +\newdimen\pmclsavsk +\newcount\pmclsavsf +\def\pmclbsphack{% + \relax + \ifhmode + \pmclsavsk\lastskip + \pmclsavsf\spacefactor + \fi} +\def\pmclesphack{% + \relax + \ifhmode + \spacefactor\pmclsavsf + \ifdim\pmclsavsk>0pt + \ignorespaces + \fi + \fi} +\newlength{\pmclsideparvshift} +\setlength{\pmclsideparvshift}{-2.58ex}% +\newcommand{\leftsidepar}[1]{% +\pmclbsphack\leavevmode\vadjust{% % + \rlap{\kern-\parindent% + \kern -\marginparsep \kern -\marginparwidth % at left + \vbox to 0pt{% + \kern \pmclsideparvshift% % vertical shift to align top text lines + \begin{minipage}{\marginparwidth}% +#1% +\end{minipage}% + \vss}}}\pmclesphack% +} +\newcommand{\rightsidepar}[1]{% +\pmclbsphack\leavevmode\vadjust{% % + \rlap{\kern-\parindent% + \kern \textwidth \kern -\marginparsep % at right + \vbox to 0pt{% + \kern \pmclsideparvshift% % vertical shift to align top text lines + \begin{minipage}{\marginparwidth}% +#1% +\end{minipage}% + \vss}}}\pmclesphack% +} + +\newif\ifparalleltexts +\paralleltextsfalse +\newif\ifrecto +\rectofalse +\newif\ifverso +\versofalse +\newif\ifrectopoempending +\rectopoempendingfalse +\newif\ifversopoempending +\versopoempendingfalse +\newif\ifrectostanzapending +\rectostanzapendingfalse +\newif\ifversostanzapending +\versostanzapendingfalse +\newif\ifrectostanzastillopen +\rectostanzastillopenfalse +\newif\ifversostanzastillopen +\versostanzastillopenfalse +\newif\ifrectopoemstillopen +\rectopoemstillopenfalse +\newif\ifversopoemstillopen +\versopoemstillopenfalse +\newif\ifrectoemendationspending +\rectoemendationspendingfalse +\newif\ifversoemendationspending +\versoemendationspendingfalse +\newif\ifrectoexplanationspending +\rectoexplanationspendingfalse +\newif\ifversoexplanationspending +\versoexplanationspendingfalse +\newcounter{rectolinecounter} +\setcounter{rectolinecounter}{1} +\newcounter{rectoindexscratch} +\setcounter{rectoindexscratch}{1} +\newcounter{versolinecounter} +\setcounter{versolinecounter}{1} +\newcounter{versoindexscratch} +\setcounter{versoindexscratch}{1} +\newcommand{\startparalleltexts}{% +\leavevmode +\cleartoverso +\paralleltextstrue +\renewenvironment{poem}{\raggedright + \language=255%no hyphenation in verse + \noemendyettrue + \noexplainyettrue + \setcounter{verselinenumber}{0}\setcounter{printlineindex}{0} + \nobreak\begin{verse} + \inpoemtrue\nobreak\mark{\relax}} + % must end poem if parallel text. Don't worry, + % begin recto page and begin verso page will + % reopen the poem and reset the line counter to the right value + % if it was finish recto page or finish verso page + % that closed the poem rather than your own declaration. +{\ifversopoemstillopen + \end{verse} +\inpoemfalse\mark{\relax} + \else + \ifrectopoemstillopen + \end{verse} + \inpoemfalse\mark{\relax} + \else +\end{verse} + \inpoemfalse\mark{\relax} + \goodbreak\afterpoemskip%\bigskip +\fi\fi } + +\renewenvironment{stanza}{\penalty-100\instanzatrue\mark{\nostanzaatbottomvalue\ }} +{\ifversostanzastillopen + \relax + \else + \ifrectostanzastillopen + \relax + \else + \nobreak\mark{\stanzaatbottomvalue\ }\nobreak +\ifspeciallinelock% +\relax\else% +\nolinebreak\incrementverselinenumber% +\fi% +\speciallinelockfalse% + \nobreak + \instanzafalse + + \stanzaskip +\fi\fi +} +\renewcommand{\putverselinenumber}{\nolinebreak\begin{marginenvironment}% + \nolinebreak + \leftsidepar{\textrm{\scriptsize\theverselinenumber}}% + \nolinebreak + \end{marginenvironment}% + \nolinebreak +} +} +\newcommand{\saveversoline}{\setcounter{versolinecounter}% + {\value{verselinenumber}}% +\setcounter{versoindexscratch}{\value{printlineindex}}} +\newcommand{\restoreversoline}{\setcounter{verselinenumber}% + {\value{versolinecounter}}% +\setcounter{printlineindex}{\value{versoindexscratch}}} +\newcommand{\saverectoline}{\setcounter{rectolinecounter}% + {\value{verselinenumber}}% +\setcounter{rectoindexscratch}{\value{printlineindex}}} +\newcommand{\restorerectoline}{\setcounter{verselinenumber}% + {\value{rectolinecounter}}% +\setcounter{printlineindex}{\value{rectoindexscratch}}} +\newtoks{\synchroflag} +\newcommand{\setsynchroflag}[1]{\synchroflag={#1}} +\setsynchroflag{\relax} +\newcommand{\synchrolabel}[1]{\poemlinelabel{#1}} +\newcommand{\hfilll}{\hskip 0pt plus 1 filll} +\newcommand{\synchroref}[1]{% +\rightsidepar{{\textrm{\scriptsize[\the\synchroflag\ref{#1}]}}}% + } +\newcommand{\startversopage}{ +\ifrectostanzastillopen + \end{stanza} + \rectostanzastillopenfalse + \end{poem} + \rectopoemstillopenfalse +\fi +\ifrectopoemstillopen % from previous page + \end{poem} + \rectopoemstillopenfalse +\fi +\ifversopoempending % from previous verso + \begin{poem} + \global\versopoempendingfalse +\fi +\ifversostanzapending % from previous verso + \begin{stanza} + \global\versostanzapendingfalse +\fi +\ifversoemendationspending + \noemendyetfalse + \global\versoemendationspendingfalse +\fi +\ifversoexplanationspending + \noexplainyetfalse + \global\versoexplanationspendingfalse +\fi +\versotrue\restoreversoline} +\newcommand{\finishversopage}{ +\saveversoline\versofalse\ +\ifinpoem + \global\versopoempendingtrue + \versopoemstillopentrue +\fi +\ifinstanza + \global\versostanzapendingtrue + \versostanzastillopentrue + \global\versopoempendingtrue + \versopoemstillopentrue +\fi +\ifnoemendyet + \relax + \else + \global\versoemendationspendingtrue + \noemendyetfalse +\fi +\ifnoexplainyet + \relax + \else + \global\versoexplanationspendingtrue + \noexplainyetfalse +\fi +} +\newcommand{\startrectopage}{ +\ifversostanzastillopen + \end{stanza} + \versostanzastillopenfalse + \end{poem} + \versopoemstillopenfalse +\fi +\ifversopoemstillopen + \end{poem} + \versopoemstillopenfalse +\fi +\ifrectopoempending + \begin{poem} + \global\rectopoempendingfalse +\fi +\ifrectostanzapending + \begin{stanza} + \global\rectostanzapendingfalse +\fi +\ifrectoemendationspending + \noemendyetfalse + \global\rectoemendationspendingfalse +\fi +\ifrectoexplanationspending + \noexplainyetfalse + \global\rectoexplanationspendingfalse +\fi +\rectotrue\restorerectoline} +\newcommand{\finishrectopage}{\saverectoline\rectofalse +\ifinpoem + \global\rectopoempendingtrue + \rectopoemstillopentrue +\fi +\ifinstanza + \global\rectostanzapendingtrue + \rectostanzastillopentrue + \global\rectopoempendingtrue + \rectopoemstillopentrue +\fi +\ifnoemendyet + \relax + \else + \global\rectoemendationspendingtrue + \noemendyetfalse +\fi +\ifnoexplainyet + \relax + \else + \global\versoexplanationspendingtrue + \noexplainyetfalse +\fi +} + +\newcommand{\finish}{ +\small\bf \hyphenchar\font=45 +\small\it \hyphenchar\font=45 +\small\rm \hyphenchar\font=45 + +\ifemendationson + \newpage + \immediate\closeout\emendations + \input \jobname.emd +\fi +\iftextnoteson + \newpage + \immediate\closeout\textnotes + \input \jobname.ent + \newpage + \fi + \ifexplanon + \immediate\closeout\explanations + \input \jobname.enx + \newpage + \fi + \ifindexingon + \printindex + \fi + \ifpoemcontentson + \ifemendationson + \immediate\write\poemcontents{\string\contentspoemtitlefont\ Emendations} + \immediate\write +\poemcontents{\string~ / \string~\ \string\pageref{emendationnotes} \string\par} + \immediate\write\poemcontents{\string\par \string\smallskip} + \fi + \iftextnoteson + \immediate\write\poemcontents{\string\contentspoemtitlefont\ Textual Notes} + \immediate\write +\poemcontents{\string~ / \string~\ \string\pageref{textualnotes} \string\par} + \immediate\write\poemcontents{\string\par \string\smallskip} + \fi + \ifexplanon + \immediate\write +\poemcontents{\string\contentspoemtitlefont\ Explanatory Notes} + \immediate\write +\poemcontents{\string~ / \string~\ \string\pageref{explanatorynotes}} + \fi + \ifindexingon + \immediate\write\poemcontents{\string\par \string\smallskip} + \immediate\write +\poemcontents{\string\contentspoemtitlefont\ Index of Titles and First Lines} + \immediate\write +\poemcontents{\string~ / \string~\ \string\pageref{indexpage}\string\par} + \fi + \immediate\closeout\poemcontents + \input \jobname.ctn + \fi + \clearpage +\thispagestyle{volumetitlestyle} +\vspace{106pt} +\begin{center} +{\poemtitlefont Note} +\end{center} + +\noindent The symbol \stanzaatbottomvalue\ is used to indicate +a space between sections of a poem +wherever such spaces are lost in pagination. +\cleardoublepage +} +\newcommand{\testforauxonfirstrun}{\IfFileExists{\jobname.aux}{\relax} +{\let\finish=\relax +\let\puttextnotes=\relax +\let\putexplanatory=\relax +\let\putemendations=\relax +\typeout{Run again to read in endnotes files}}} + +\newcommand{\putpoemcontents}{ +\IfFileExists{\jobname.ctn}{\input \jobname.ctn +\clearpage \resetpagestyle\normalsize} +{\typeout{Run again to input contents file here}} +} +\newcommand{\hyphenationforsmall}{\small\bf \hyphenchar\font=45 +\small\it \hyphenchar\font=45 +\small\rm \hyphenchar\font=45 +} +\newcommand{\putemendations}{ +\ifemendationson + \newpage + \hyphenationforsmall + \immediate\closeout\emendations + \input \jobname.emd + \ifpoemcontentson + \ifemendationson +\immediate\write\poemcontents{\string\contentspoemtitlefont\ Emendations} +\immediate\write + \poemcontents{\string~ / \string~\ \string\pageref{emendationnotes} \string\par} +\immediate\write\poemcontents{\string\par \string\smallskip} + \fi +\fi +\else + \relax +\fi} +\newcommand{\putexplanatory}{ +\ifexplanon + \newpage + \hyphenationforsmall + \immediate\closeout\explanations + \input \jobname.enx + \ifpoemcontentson + \ifexplanon +\immediate\write\poemcontents{\string\contentspoemtitlefont\ Explanatory Notes} +\immediate\write + \poemcontents{\string~ / \string~\ \string\pageref{explanatorynotes} \string\par} +\immediate\write\poemcontents{\string\par \string\smallskip} + \fi +\fi +\else + \relax +\fi} +\newcommand{\puttextnotes}{ +\iftextnoteson + \newpage + \hyphenationforsmall + \immediate\closeout\textnotes + \input \jobname.ent + \ifpoemcontentson + \iftextnoteson +\immediate\write\poemcontents{\string\contentspoemtitlefont\ Textual Notes} +\immediate\write + \poemcontents{\string~ / \string~\ \string\pageref{textualnotes} \string\par} +\immediate\write\poemcontents{\string\par \string\smallskip} + \fi +\fi +\else + \relax +\fi} +\newcommand{\putpoemindex}{\ifindexingon + \printindex + \fi + \ifpoemcontentson\ifindexingon + \immediate\write\poemcontents{\string\par \string\smallskip} + \immediate\write +\poemcontents{\string\contentspoemtitlefont\ Index of Titles and First Lines} + \immediate\write +\poemcontents{\string~ / \string~\ \string\pageref{indexpage}\string\par} + \fi\fi} + +\newcommand{\longpage}{\enlargethispage{\baselineskip}} +\newcommand{\shortpage}{\enlargethispage{-\baselineskip}} + +\newenvironment{cjquotation} + {\tolerance=2000% + \vspace{-\bigskipamount} + \restoreverselinenumber + \language=255 + \noindent\relax + \list{}{\listparindent 0em% + \itemindent 0em% + \rightmargin 2em% + \leftmargin 2em% + \topsep 0em% + \parskip 0em% + \itemindent \listparindent + \rightmargin \leftmargin + \parsep \z@ \@plus\p@}% + \item[] + } + {\endlist} +\renewenvironment{theindex} + {{\par\clearpage{\pagestyle{volumetitlestyle}\cleardoublepage} + \thispagestyle{volumetitlestyle}} + \makeatletter + \def\pmclidxitem{\par\hangindent 1em} +\fancyhead[RO,LE]{{\small\textrm{\thepage}}} +\fancyhead[CO]{{\small{\em Index of Titles and First Lines}}} +\fancyhead[CE]{{\small{\em Index of Titles and First Lines}}} +\fancyfoot{} + \label{indexpage} + \lefthyphenmin=2\tolerance=500\language=0 + \normalfont \backmattertextfont + \raggedright + \begin{multicols} +{2}[\backmattersink\begin{center}{\normalfont +\backmatterheaderfont INDEX OF TITLES AND FIRST LINES}\end{center} +\backmatterafterheadersink]% + \let\item\pmclidxitem} + {\end{multicols}\clearpage} +\makeatother +\newenvironment{epigraphquote}{\list{}{\rightmargin 1.5em% + \leftmargin 1.5em% + \topsep 0pt% + \partopsep 0pt% + \listparindent 0pt% + }% + \item\relax} + {\endlist} +\newenvironment{volumetitlepagequote}{\list{}{\rightmargin \voladditionalamount% + \leftmargin \voladditionalamount% + \topsep 0pt% + \partopsep 0pt% + \listparindent 0pt + }% + \item\relax} + {\endlist} +\endinput +%% +%% End of file `poemscol.sty'. |