% \CheckSum{100}
% \iffalse meta-comment
% ======================================================================
% scrkernel-pseudolengths.dtx
% Copyright (c) Markus Kohm, 2006-2013
%
% This file is part of the LaTeX2e KOMA-Script bundle.
%
% This work may be distributed and/or modified under the conditions of
% the LaTeX Project Public License, version 1.3c of the license.
% The latest version of this license is in
%   http://www.latex-project.org/lppl.txt
% and version 1.3c or later is part of all distributions of LaTeX 
% version 2005/12/01 or later and of this work.
%
% This work has the LPPL maintenance status "author-maintained".
%
% The Current Maintainer and author of this work is Markus Kohm.
%
% This work consists of all files listed in manifest.txt.
% ----------------------------------------------------------------------
% scrkernel-pseudolengths.dtx
% Copyright (c) Markus Kohm, 2006-2013
%
% Dieses Werk darf nach den Bedingungen der LaTeX Project Public Lizenz,
% Version 1.3c, verteilt und/oder veraendert werden.
% Die neuste Version dieser Lizenz ist
%   http://www.latex-project.org/lppl.txt
% und Version 1.3c ist Teil aller Verteilungen von LaTeX
% Version 2005/12/01 oder spaeter und dieses Werks.
%
% Dieses Werk hat den LPPL-Verwaltungs-Status "author-maintained"
% (allein durch den Autor verwaltet).
%
% Der Aktuelle Verwalter und Autor dieses Werkes ist Markus Kohm.
% 
% Dieses Werk besteht aus den in manifest.txt aufgefuehrten Dateien.
% ======================================================================
% \fi
%
% \CharacterTable
%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%   Digits        \0\1\2\3\4\5\6\7\8\9
%   Exclamation   \!     Double quote  \"     Hash (number) \#
%   Dollar        \$     Percent       \%     Ampersand     \&
%   Acute accent  \'     Left paren    \(     Right paren   \)
%   Asterisk      \*     Plus          \+     Comma         \,
%   Minus         \-     Point         \.     Solidus       \/
%   Colon         \:     Semicolon     \;     Less than     \<
%   Equals        \=     Greater than  \>     Question mark \?
%   Commercial at \@     Left bracket  \[     Backslash     \\
%   Right bracket \]     Circumflex    \^     Underscore    \_
%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%   Right brace   \}     Tilde         \~}
%
% \iffalse
%%% From File: $Id: scrkernel-pseudolengths.dtx 1388 2013-10-01 16:03:42Z mjk $
%<*driver>
% \fi
\ProvidesFile{scrkernel-pseudolengths.dtx}[2011/03/20 v3.08b KOMA-Script
                                                         (pseudo length)]
% \iffalse
\documentclass{scrdoc}
\usepackage[english,ngerman]{babel}
\usepackage[latin1]{inputenc}
\CodelineIndex
\RecordChanges
\GetFileInfo{scrkernel-pseudolengths.dtx}
\title{\KOMAScript{} \partname\ \texttt{\filename}%
  \footnote{Dies ist Version \fileversion\ von Datei \texttt{\filename}.}}
\date{\filedate}
\author{Markus Kohm}

\begin{document}
  \maketitle
  \tableofcontents
  \DocInput{\filename}
\end{document}
%</driver>
% \fi
%
% \selectlanguage{ngerman}
%
% \changes{v2.95}{2006/03/22}{%
%   erste Version aus der Aufteilung von \textsf{scrclass.dtx}}
%
% \section{Pseudo-Lngen fr Briefe}
%
% Pseudo-Lngen wurden fr \textsf{scrlttr2} eingefhrt, um Lngenregister zu
% sparen. Tatschlich hat das \LaTeX-Team kurz darauf entschieden, dass
% knftig \eTeX{} die empfohlene Maschine fr \LaTeX{} sein soll, wodurch die
% Einfhrung von Pseudo-Lngen nachtrglich berflssig wurde. Es gibt sie nun
% aber einmal und aus Grnden der Kompatiblitt wird es sie fr Briefe auch
% weiterhin geben.
%
% \StopEventually{\PrintIndex\PrintChanges}
%
% \iffalse
%<*letter>
% \fi
%
% \iffalse
%<*option>
% \fi
%
% \subsection{Option}
% Das Prinzip der Pseudo-Lngen wird nicht durch Optionen beeinflusst.
%
%
% \iffalse
%</option>
%<*body>
% \fi
%
% \subsection{Anweisungen fr Pseudo-Lngen}
%
% Zu Berechnung der Feldpositionen werden verschiedene Dimensions-Variablen
% bentigt. Um jedoch nicht unntig viele Lngenregister zu verbrauchen, wird
% hier mit einer Pseudo-Lngen-Arithmetik gearbeitet.
%
% \begin{macro}{\@newplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
%   \changes{v2.8q}{2001/10/06}{Kompatibilitt zu \texttt{scrlettr.cls}
%     aufgegeben} 
% Dieses Makro definiert eine neue Pseude-Lnge und setzt sie auf den
% Wert 0. Eine Pseudo-Lnge ist ein Makro, das eine Lnge enthlt.
%    \begin{macrocode}
\newcommand*{\@newplength}[1]{%
  \@ifundefined{ltr@len@#1}{%
    \expandafter\let\csname ltr@len@#1\endcsname=\z@%
  }{%
    \ClassError{scrlttr2}{%
      pseudo-length \expandafter\string\csname ltr@len@#1\endcsname
      already defined%
      }{%
      You tried to define a new pseudo-length using
      \string\@newplength\MessageBreak
      which is already defined. Try another name or
      better\MessageBreak
      Don't use this KOMA-Script internal macro}%
    }%
  }
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\useplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
%   \changes{v2.97c}{2007/09/17}{\cs{dimexpr} statt \cs{number} verwendet,
%     wenn \eTeX{} verwendet wird}
% Natrlich muss auf eine solche Pseudo-Lnge auch wieder lesend
% zugeriffen werden knnen. Wir definieren dies hier so, dass es
% auerdem mglich ist, ein Vorzeichen oder einen Faktor zu verwenden. Dafr
% wird allerdings \eTeX{} bentigt.
%    \begin{macrocode}
\scr@ifundefinedorrelax{dimexpr}{%
  \newcommand*{\useplength}[1]{%
    \number \csname ltx@len@#1\endcsname\relax}%
}{%
  \newcommand*{\useplength}[1]{%
    \dimexpr \csname ltr@len@#1\endcsname\relax}%
}
%    \end{macrocode}
% \end{macro}
%
% \begin{macro}{\setlengthtoplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
% Eine echte Lnge soll auf das Vielfache einer Pseudo-Lnge gesetzt
% werden. Dabei wird der Faktor als optionaler Parameter bergeben.
% Der erste obligatorische Parameter ist die Lnge, der zweite
% obligatorische Parameter ist die Pseudo-Lnge.
%    \begin{macrocode}
\newcommand*{\setlengthtoplength}[3][]{%
  \setlength{#2}{\useplength{#3}}%
  \setlength{#2}{#1#2}}
%    \end{macrocode}
%
% \begin{macro}{\@setplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
% Natrlich wird ebenfalls eine Mglichkeit bentigt, einer
% Pseudo-Lnge einen Wert zuzuweisen. Dies geschieht unter lokaler
% Anwendung einer Lnge, damit sichergestellt ist, dass eine
% Lngenangabe bergeben wird. Dabei wird das zuvor definierte Makro
% \cs{setlengthtoplength} verwendet.
%    \begin{macrocode}
\newcommand*{\@setplength}[3][]{%
  \begingroup%
    \setlength{\@tempskipa}{#3}%
    \setlength{\@tempskipa}{#1\@tempskipa}%
    \edef\@tempa{\noexpand\endgroup%
      \noexpand\expandafter\noexpand\renewcommand\noexpand\expandafter*%
      \noexpand\csname ltr@len@#2\noexpand\endcsname{\the\@tempskipa}%
      }%
    \@tempa%
  }
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \begin{macro}{\addtolengthplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
% Wenn wir schon dabei sind, soll statt dem Setzen auch das Addieren
% funktionieren. Hier ist die Erschwernis, dass der Faktor nur fr
% die Pseudo-Lnge und nicht fr das Endergebnis gelten soll.
%    \begin{macrocode}
\newcommand*{\addtolengthplength}[3][]{%
  \begingroup%
    \setlengthtoplength[{#1}]{\@tempskipa}{#3}%
    \edef\@tempa{\endgroup%
      \noexpand\addtolength{#2}{\the\@tempskipa}}%
    \@tempa%
  }
%    \end{macrocode}
%
% \begin{macro}{\@addtoplength}
%   \changes{v2.8q}{2001/10/06}{Neu}
% Ebenso wird ein Makro bentigt, mit dem zu einer Pseudo-Lnge das
% Vielfache eines Wertes addiert werden kann.
%    \begin{macrocode}
\newcommand*{\@addtoplength}[3][]{%
  \begingroup%
    \setlength{\@tempskipa}{#3}%
    \setlength{\@tempskipa}{#1\@tempskipa}%
    \addtolengthplength{\@tempskipa}{#2}%
    \edef\@tempa{\noexpand\endgroup%
      \noexpand\expandafter\noexpand\renewcommand\noexpand\expandafter*%
      \noexpand\csname ltr@len@#2\noexpand\endcsname{\the\@tempskipa}%
      }%
    \@tempa%
  }
%    \end{macrocode}
% \end{macro}
% \end{macro}
%
% \iffalse
%</body>
% \fi
%
% \iffalse
%</letter>
% \fi
%
% \Finale
%
\endinput
%
% end of file `scrkernel-pseudolengths.dtx'
%%% Local Variables:
%%% mode: doctex
%%% TeX-master: t
%%% End: