%% %% This is file `epigraph.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% epigraph.dtx (with options: `usc') %% %% ----------------------------------------------------------------- %% Author: Peter Wilson, Herries Press %% Maintainer: Will Robertson (will dot robertson at latex-project dot org) %% Copyright 2001, 2002, 2003, 2004 Peter R. Wilson %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either %% version 1.3c of this license or (at your option) any %% later version: %% %% This work has the LPPL maintenance status "maintained". %% The Current Maintainer of this work is Will Robertson. %% %% This work consists of the files listed in the README file. %% ----------------------------------------------------------------- %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{epigraph}[2020/01/02 v1.5e typesetting epigraphs] \RequirePackage{nextpage} \newlength{\beforeepigraphskip} \setlength{\beforeepigraphskip}{.5\baselineskip} \newlength{\afterepigraphskip} \setlength{\afterepigraphskip}{.5\baselineskip} \newlength{\epigraphwidth} \setlength{\epigraphwidth}{.4\textwidth} \newlength{\epigraphrule} \setlength{\epigraphrule}{.4\p@} \newcommand{\epigraphsize}{\small} \newif\ifepigraphnoindent \newcommand\epigraphnoindent{\epigraphnoindenttrue} \newcommand{\epigraphflush}{flushright} \newcommand{\textflush}{flushleft} \newcommand{\sourceflush}{flushright} \AtBeginDocument{% \@ifundefined{flushleftright}{% \newenvironment{flushleftright}{% \PackageError{epigraph}% {The flushleftright environment has been removed.\MessageBreak Use the flushepinormal environment instead}{\@ehc}}{}}% {\PackageWarningNoLine{epigraph}% {flushleftright has been previously defined.\MessageBreak Use flushepinormal for epigraphs instead}}} \newenvironment{flushepinormal}{}{} \newcommand{\@epirule}{\rule[.5ex]{\epigraphwidth}{\epigraphrule}} \newcommand{\@epitext}[1]{% \begin{minipage}{\epigraphwidth}\begin{\textflush} #1\\ \ifdim\epigraphrule>\z@ \@epirule \else \vspace*{1ex} \fi \end{\textflush}\end{minipage}} \newcommand{\@episource}[1]{% \begin{minipage}{\epigraphwidth}\begin{\sourceflush} #1\end{\sourceflush} \end{minipage}} \newcommand{\epigraph}[2]{% \vspace{\beforeepigraphskip} \vbox{% \epigraphsize \begin{\epigraphflush} \begin{minipage}{\epigraphwidth} \@epitext{#1}\\ \@episource{#2}% \end{minipage}% \end{\epigraphflush}% }% \nointerlineskip \vspace*{\afterepigraphskip}% \ifepigraphnoindent\@afterheading\fi } \newcommand{\qitem}[2]{{\raggedright\item \begin{minipage}{\epigraphwidth} \@epitext{#1}\\ \@episource{#2} \end{minipage}}} \newcommand{\qitemlabel}[1]{\hfill} \newenvironment{epigraphs}{% \vspace{\beforeepigraphskip}\begin{\epigraphflush} \epigraphsize \begin{minipage}{\epigraphwidth} \list{}% {\itemindent\z@ \labelwidth\z@ \labelsep\z@ \leftmargin\z@ \rightmargin\z@ \let\makelabel\qitemlabel}}% {\endlist\end{minipage}\end{\epigraphflush} \vspace{\afterepigraphskip}% } \newcommand{\dropchapter}[1]{% \let\@epichapapp\@chapapp \renewcommand{\@chapapp}{\vspace*{#1}\@epichapapp}} \newcommand{\undodrop}{\let\@chapapp\@epichapapp} \newif\if@epirhs \@epirhstrue \newif\if@epicenter \@epicentertrue \newcommand{\@epipos}{ \long\def\@ept{flushleft} \ifx\epigraphflush\@ept \@epirhsfalse \@epicenterfalse \else \long\def\@ept{center} \ifx\epigraphflush\@ept \@epirhsfalse \@epicentertrue \else \@epirhstrue \@epicenterfalse \fi \fi} \newcommand{\epigraphhead}[2][95]{% \def\@epitemp{\begin{minipage}{\epigraphwidth}#2\end{minipage}} \def\ps@epigraph{\let\@mkboth\@gobbletwo \@epipos \if@epirhs \def\@oddhead{\hfil\begin{picture}(0,0) \put(0,-#1){\makebox(0,0)[r]{\@epitemp}} \end{picture}} \else \if@epicenter \def\@oddhead{\hfil\begin{picture}(0,0) \put(0,-#1){\makebox(0,0)[b]{\@epitemp}} \end{picture}\hfil} \else \def\@oddhead{\begin{picture}(0,0) \put(0,-#1){\makebox(0,0)[l]{\@epitemp}} \end{picture}\hfil} \fi \fi \let\@evenhead\@oddhead \def\@oddfoot{\reset@font\hfil\thepage\hfil} \let\@evenfoot\@oddfoot} \thispagestyle{epigraph}} \endinput %% %% End of file `epigraph.sty'.