mutopia/N.W.Gade/global.tex

   1 %\def\fetdef#1#2{%
   2 %  \def#1{\hbox{\fetchar{#2}}}}
   3 %\font\fetasixteen = feta16
   4 %\def\fetchar#1{{\fetasixteen\char#1}}
   5 %\input{feta20}         %%% Add lilypond-xxx/mf/out/ to TEXINPUTS
   6
   7 \newcommand{\okt}{$8^{va}$}
   8
   9 \newcommand{\thecopyright}{
  10   \begin{tabular}{l}
  11     \copyright{} mats.bengtsson@s3.kth.se, 1999. Free circulation permitted and
  12     encouraged.\\ Typeset from handwritten parts at Statens
  13     Musikbibliotek, Stockholm, Sweden
  14   \end{tabular}
  15 }
  16
  17 % Modified from lilypond/tex/headers.tex:
  18 \advance\topmargin-5mm
  19 \advance\headsep-4mm
  20 \addtolength{\textheight}{17mm}
  21 \advance\footskip-5mm
  22
  23 \usepackage{fancyheadings}
  24 \lhead{\textbf{\large\theinstrument}}
  25 \chead{}
  26 \lfoot{}
  27 \cfoot{\ifnum\thepage=1{\thecopyright\hfill\mudelatagline}\fi}
  28 \rfoot{\ifnum\thepage>1{\hfill\thepage\hfill}\fi}
  29 \headrulewidth0mm
  30 \pagestyle{fancy}
  31
  32 % Modified from lilypond/tex/titledefs.tex:
  33 \def\makelilytitle{%
  34   \vspace*{-10mm}%
  35   \begin{center}
  36         \bfseries
  37         \ifx\mudelanull\thetitle\else{\huge\thetitle}\\ \fi
  38         \ifx\mudelanull\thesubtitle\else{\Large\thesubtitle}\\ \fi
  39   \end{center}
  40   \bigskip
  41   % urg
  42   \edef\saveparskip{\parskip}\parskip-5mm
  43   \begin{minipage}[t]{0.45\textwidth}
  44         \ifx\mudelanull\thepoet\else{\thepoet}\\ \fi
  45         \ifx\mudelanull\themetre\else{\themetre}\\ \fi
  46   \end{minipage}\hspace*{\fill}
  47   \begin{minipage}[t]{0.45\textwidth}
  48       \begin{flushright}
  49           \ifx\mudelanull\thecomposer\else{\large\normalfont\scshape\thecomposer}\\ \fi
  50           \ifx\mudelanull\theopus\else{\theopus}\\ \fi
  51           \ifx\mudelanull\thearranger\else{\thearranger}\\ \fi
  52         \end{flushright}%
  53   \end{minipage}\par
  54   \parskip\saveparskip
  55   {\flushleft{\Large\textbf\thepiece}\\}%
  56 %  \leavevmode%
  57 %  \enlargethispage*{7mm}%
  58 }