%\def\fetdef#1#2{%
%  \def#1{\hbox{\fetchar{#2}}}}
%\font\fetasixteen = feta16
%\def\fetchar#1{{\fetasixteen\char#1}}
%\input{feta20}         %%% Add lilypond-xxx/mf/out/ to TEXINPUTS

\newcommand{\okt}{$8^{va}$}

\newcommand{\thecopyright}{
  \begin{tabular}{l}
    \copyright{} mats.bengtsson@s3.kth.se, 1999. Free circulation permitted and
    encouraged.\\ Typeset from handwritten parts at Statens
    Musikbibliotek, Stockholm, Sweden
  \end{tabular}
}

% Modified from lilypond/tex/headers.tex:
\advance\topmargin-5mm
\advance\headsep-4mm
\addtolength{\textheight}{17mm}
\advance\footskip-5mm

\usepackage{fancyheadings}
\lhead{\textbf{\large\theinstrument}}
\chead{}
\lfoot{}
\cfoot{\ifnum\thepage=1{\thecopyright\hfill\mudelatagline}\fi}
\rfoot{\ifnum\thepage>1{\hfill\thepage\hfill}\fi}
\headrulewidth0mm
\pagestyle{fancy}

% Modified from lilypond/tex/titledefs.tex:
\def\makelilytitle{%
  \vspace*{-10mm}%
  \begin{center}
        \bfseries
        \ifx\mudelanull\thetitle\else{\huge\thetitle}\\ \fi
        \ifx\mudelanull\thesubtitle\else{\Large\thesubtitle}\\ \fi
  \end{center}
  \bigskip
  % urg
  \edef\saveparskip{\parskip}\parskip-5mm
  \begin{minipage}[t]{0.45\textwidth}
        \ifx\mudelanull\thepoet\else{\thepoet}\\ \fi
        \ifx\mudelanull\themetre\else{\themetre}\\ \fi
  \end{minipage}\hspace*{\fill}
  \begin{minipage}[t]{0.45\textwidth}
      \begin{flushright}
          \ifx\mudelanull\thecomposer\else{\large\normalfont\scshape\thecomposer}\\ \fi
          \ifx\mudelanull\theopus\else{\theopus}\\ \fi
          \ifx\mudelanull\thearranger\else{\thearranger}\\ \fi
        \end{flushright}%
  \end{minipage}\par
  \parskip\saveparskip
  {\flushleft{\Large\textbf\thepiece}\\}%
%  \leavevmode%
%  \enlargethispage*{7mm}%
}
