% de naeste seks makroer anvendes internt
% de kan uden problemer fjernes i hele filen
\let\START\relax
\let\STOP\relax
\let\SPECEXTSTART\relax
\let\SPECEXTSTOP\relax
\let\DCBEGIN\relax
\let\DCEND\relax
 \DCBEGIN
\documentclass[a4paper]{article}
 \DCEND

 \usepackage [latin1]{inputenc}
 \usepackage [T1]{fontenc}
 \usepackage [danish]{babel}
 \usepackage {felineekssupp}
 \usepackage {kpfonts}
 \usepackage [scaled=0.8]{beramono}
 \usepackage [scaled=0.85]{berasans}

% al anvendelse af geometry i eksemplerne boer man slette,
% dette anvendes mht. at stoerrelsen skal passe til brug i bogen
\usepackage{geometry}
\geometry{textwidth=183.29863pt}
% vil ikke have sidetal med, fjern selv
\pagestyle{empty}
% forfatteren snyder maaske, fjern kode fra HER -->

% <-- til HER.
 \START
\usepackage{amsmath,amssymb}
\usepackage[amsmath,thmmarks]{ntheorem}
\theoremsymbol{\rule{4pt}{4pt}}
\newtheorem{thm}{Sætning}
\theoremstyle{break}
\theoremsymbol{%
 \ensuremath{\scriptstyle\blacktriangle}}
\newtheorem{lemma}[thm]{Lemma}
 \STOP

\begin{document}
\begin{thm} tekst \end{thm}
\begin{lemma} \begin{enumerate}
\item tekst \item tekst
\end{enumerate} \end{lemma}
\end{document}