path: root/Master/texmf-dist/source/latex/disser/disser.dtx

% \iffalse meta-comment
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% disser -- LaTeX document class for dissertations.
%%
%% Copyright (c) 2004-2009 Stanislav Kruchinin
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%%    http://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of LaTeX
%% version 2003/12/01 or later.
%%
%% This program is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%<*driver>
\ProvidesFile{disser.drv}[2009/06/11 1.1.2 Document class for dissertations]

\documentclass{ltxdoc}
\usepackage[a4paper, includeheadfoot, nohead, mag=1000,
            left=5cm, right=1cm, top=1.5cm, bottom=1.5cm]{geometry}
\usepackage{ifpdf,indentfirst,tabularx,doc}
\usepackage{makeidx,longtable,color}

\definecolor{darkblue}{rgb}{0,0,.6}

\ifpdf
  \usepackage[pdftex,hyperindex,unicode]{hyperref}
  \usepackage{cmap}
  \usepackage{hypdestopt}
\else
  \usepackage[hypertex]{hyperref}
\fi

\hypersetup{
  pdftitle           = {Documented source code of the disser package},
  pdfauthor          = {Stanislav Kruchinin},
  pdfsubject         = {disser},
  pdfstartview       = {FitH},
  pdfborder          = {0 0 0},
  bookmarksopen      = true,
  bookmarksnumbered  = true,
  bookmarksopenlevel = 2,
  colorlinks = true,     linkcolor  = darkblue,
  citecolor  = darkblue, filecolor  = darkblue,
  menucolor  = darkblue, urlcolor   = darkblue
}

\IfFileExists{pscyr.sty}{%
  \usepackage{pscyr}
  \renewcommand\ttdefault{cmtt}
  \renewcommand\rmdefault{ftm}
}{
  \IfFileExists{cyrtimes.sty}{%
    \renewcommand\ttdefault{cmtt}
    \renewcommand\rmdefault{ftm}
  }{}
}
\IfFileExists{url.sty}{\usepackage{url}}{\newcommand\url{\texttt}}

\usepackage[T2A]{fontenc}
\usepackage[cp1251]{inputenc}
\usepackage[english,russian]{babel}

\MakeShortVerb{\|}

\def\deflabel#1{\ttfamily #1\hfill}
\newenvironment{deflist}[1]{%
  \begin{list}{}{%
  \settowidth\labelwidth{\ttfamily #1}%
  \setlength\leftmargin\labelwidth
  \addtolength\leftmargin\labelsep
  \let\makelabel\deflabel}
}{\end{list}}

\let\DescribePackage=\DescribeEnv

\makeindex

\setlength\hfuzz{20pt}
\hbadness=10000

\makeatletter
  \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
    \columnseprule \z@  \columnsep 35\p@
    \twocolumn[\index@prologue]%
    \IndexParms \let\item\@idxitem \ignorespaces}
  \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
\makeatother

\begin{document}
\sloppy
  \PrintChanges
  \DocInput{disser.dtx}
  \DocInput{counters.dtx}
  \DocInput{part.dtx}
  \DocInput{chapter.dtx}
  \DocInput{sections.dtx}
  \DocInput{lists.dtx}
  \DocInput{floats.dtx}
  \DocInput{env.dtx}
  \DocInput{page.dtx}
  \DocInput{titlepage.dtx}
  \DocInput{bachelor.dtx}
  \DocInput{master.dtx}
  \DocInput{candidate.dtx}
  \DocInput{doctor.dtx}
  \DocInput{autoref.dtx}
  \DocInput{titledefs.dtx}
  \DocInput{toc.dtx}
  \DocInput{custom.dtx}
  \IndexPrologue{\section{Ïðåäìåòíûé óêàçàòåëü}}
  \printindex
\end{document}
%</driver>
% \fi
% \GetFileInfo{disser.drv}
%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%  \title{|disser| "--- ïàêåò äëÿ îôîðìëåíèÿ äèññåðòàöèé}
%  \date{Âåðñèÿ \fileversion\\[6pt]\filedate}
%  \author{Ñòàíèñëàâ Êðó÷èíèí\\[6pt]
%  \normalsize E-mail:
%  \href{mailto:stanislav.kruchinin@gmail.com}
%  {\texttt{stanislav.kruchinin@gmail.com}}}
%
%  \maketitle
%
%  \section*{Îáçîð äîêóìåíòàöèè}
%
%  Äîêóìåíòàöèÿ ïàêåòà |disser| ñîñòîèò èç ñëåäóþùèõ ôàéëîâ:
%
%  \begin{deflist}{README, README.ru}
%  \item[\href{file:manual.pdf}{manual.pdf}] Ðóêîâîäñòâî ïîëüçîâàòåëÿ.
%  \item[README, README.ru] Èíôîðìàöèÿ î ñáîðêå è óñòàíîâêå ïàêåòà
%  (òåêñòîâûå ôàéëû).
%  \item[ChangeLog] Èñòîðèÿ âåðñèé (òåêñòîâûé ôàéë).
%  \end{deflist}
%
%  Äîêóìåíòèðîâàííûå èñõîäíûå òåêñòû:
%  \begin{deflist}{disser-bst.dtx}
%  \item[\href{file:disser.pdf}{disser.dtx}] Èñõîäíûé òåêñò êëàññà |disser|
%  (äàííûé ôàéë).
%  \item[\href{file:gost732.pdf}{gost732.dtx}]
%    Èñõîäíûé òåêñò êëàññà êëàññà |gost732| äëÿ îôîðìëåíèÿ äîêóìåíòîâ â
%    ñîîòâåòñòâèè ñ ÃÎÑÒ 7.32-2001.
%  \item[\href{file:disser-bst.pdf}{disser-bst.dtx}]
%    Èñõîäíûé òåêñò ñòèëåé áèáëèîãðàôèè |disser.bst| è |disser-s.bst|.
%  \end{deflist}
%
%  \clearpage
%  \tableofcontents
%
%  \section{Èñõîäíûé òåêñò êëàññà}\parindent=0pt
%
%    \begin{macrocode}

%<*disser>
\NeedsTeXFormat{LaTeX2e}
\ProvidesClass{disser}[2009/06/11 1.1.2 Document class for dissertations]

%    \end{macrocode}
% Ðàñøèðåíèå ôàéëîâ, âêëþ÷àåìûõ â |disser.cls|.
%    \begin{macrocode}
\def\substyle@ext{.rtx}

%    \end{macrocode}
% Îïðåäåëåíèå îïåðàòîðîâ óñëîâíîãî âûïîëíåíèÿ.
% \begin{itemize}
% \item ïîäêëþ÷åíèå ïàêåòà, îïðåäåëÿþùåãî |\ifpdf|.
% \DescribePackage{ifpdf}\index{Ïàêåòû!\verb*+ifpdf+}
%    \begin{macrocode}
\RequirePackage{ifpdf}

%    \end{macrocode}
% \item Ðàçðåøåíî îñòàâëÿòü îäíó êîëîíêó ïðè äâóõêîëîííîì íàáîðå.
%    \begin{macrocode}
\newif\if@restonecol
%    \end{macrocode}
% \item Îòîáðàæåíèå òèòóëüíîãî ëèñòà (âêëþ÷åíî).
%    \begin{macrocode}
\newif\if@titlepage\@titlepagetrue
%    \end{macrocode}
% \item Ãëàâû íà÷èíàþòñÿ òîëüêî ñ íå÷åòíûõ ñòðàíèö (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\if@openright\@openrightfalse
%    \end{macrocode}
% \item Òèïû äîêóìåíòîâ (ïî óìîë÷àíèþ candidate).
%    \begin{macrocode}
\newif\ifDis@bachelor\Dis@bachelorfalse
\newif\ifDis@master\Dis@masterfalse
\newif\ifDis@candidate\Dis@candidatetrue
\newif\ifDis@doctor\Dis@doctorfalse
\newif\ifDis@autoref\Dis@autoreffalse
%    \end{macrocode}
% \item Îòîáðàæåíèå ÓÄÊ íà òèòóëüíîì ëèñòå (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@libcat\Dis@libcatfalse
%    \end{macrocode}
% \item Îòîáðàæåíèå ïîäïèñåé äèññåðòàíòà è ó÷åíîãî ñåêðåòàðÿ (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@facsimile\Dis@facsimilefalse
%    \end{macrocode}
% \item Ïîäêëþ÷åíèå ïàêåòîâ |amsmath|, |amsfonts|, |amssymb| (âêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@ams\Dis@amstrue
%    \end{macrocode}
% \item Ïîäêëþ÷åíèå |hyperref| (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@href\Dis@hreffalse
%    \end{macrocode}
% \item Ïîäêëþ÷åíèå |subfig| (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@subf\Dis@subffalse
%    \end{macrocode}
% \item Øðèôò Times êàê îñíîâíîé (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@times\Dis@timesfalse
%    \end{macrocode}
% \item Ïîääåðæêà ìàòåìàòè÷åñêèõ øðèôòîâ MathTime Pro (îòêëþ÷åíî).
%    \begin{macrocode}
\newif\ifDis@mtpro\Dis@mtprofalse

%    \end{macrocode}
% \end{itemize}
%
% \subsection{Îïöèè êëàññà}
%
% Ïîäêëþ÷åíèå ïàêåòà |kvoptions| äëÿ îáðàáîòêè îïöèé â ôîðìàòå
% |êëþ÷ = çíà÷åíèå|.
%    \begin{macrocode}
\RequirePackage{kvoptions}[2006/08/17]

%    \end{macrocode}
% Ïîäêëþ÷åíèå ïàêåòà |hyperref| è íåîáõîäèìûõ íàñòðîåê.
%    \begin{macrocode}
\DeclareOption{href}{\Dis@hreftrue}
%    \end{macrocode}
% Ïîäêëþ÷åíèå ïàêåòà |subfig| è íåîáõîäèìûõ íàñòðîåê.
%    \begin{macrocode}
\DeclareOption{subf}{\Dis@subftrue}
%    \end{macrocode}
% Îòîáðàæåíèå ÓÄÊ íà òèòóëüíîì ëèñòå.
%    \begin{macrocode}
\DeclareOption{libcat}{\Dis@libcattrue}
%    \end{macrocode}
% Îòîáðàæåíèå ïîäïèñåé äèññåðòàíòà è ó÷åíîãî ñåêðåòàðÿ.
%    \begin{macrocode}
\DeclareOption{facsimile}{\Dis@facsimiletrue}
%    \end{macrocode}
% Íå ïîäêëþ÷àòü ïàêåòû |amsmath|, |amsfonts|, |amssymb|.
%    \begin{macrocode}
\DeclareOption{noams}{\Dis@amsfalse}

%    \end{macrocode}
% Íàñòðîéêà îïöèé.
%    \begin{macrocode}
\SetupKeyvalOptions{
  family=Dis,
  prefix=Dis@
}

%    \end{macrocode}
% Èñïðàâëåíèå çíàêîâ èíòåãðàëîâ è ïðåäåëîâ èíòåãðèðîâàíèÿ íà áîëåå
% ïðèâû÷íûå.
%    \begin{macrocode}
\DeclareBoolOption[true]{fixint}

%    \end{macrocode}
%
% Ðàçìåðû ëèñòîâ.
%    \begin{macrocode}
\DeclareOption{a4paper}{%
  \setlength\paperheight{297mm}
  \setlength\paperwidth {210mm}
}
\DeclareOption{a5paper}{%
  \setlength\paperheight{210mm}
  \setlength\paperwidth {148mm}
}
\DeclareOption{b5paper}{%
  \setlength\paperheight{250mm}
  \setlength\paperwidth {176mm}
}
%    \end{macrocode}
% Àëüáîìíàÿ îðèåíòàöèÿ.
%    \begin{macrocode}
\DeclareOption{landscape}{%
  \setlength\@tempdima  {\paperheight}%
  \setlength\paperheight{\paperwidth}%
  \setlength\paperwidth {\@tempdima}
}

%    \end{macrocode}
% Ðàçìåð øðèôòà îñíîâíîãî òåêñòà.
%    \begin{macrocode}
\newcommand\@ptsize{}
\DeclareOption{8pt} {\renewcommand\@ptsize{8}}
\DeclareOption{9pt} {\renewcommand\@ptsize{9}}
\DeclareOption{10pt}{\renewcommand\@ptsize{10}}
\DeclareOption{11pt}{\renewcommand\@ptsize{11}}
\DeclareOption{12pt}{\renewcommand\@ptsize{12}}
\DeclareOption{14pt}{\renewcommand\@ptsize{14}}
\DeclareOption{16pt}{\renewcommand\@ptsize{16}}
\DeclareOption{18pt}{\renewcommand\@ptsize{18}}
\DeclareOption{20pt}{\renewcommand\@ptsize{20}}

%    \end{macrocode}
% Óñòàíîâêà ïîëåé äëÿ îäíîñòîðîííåé èëè äâóõñòîðîííåé ïå÷àòè.
%    \begin{macrocode}
\DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
\DeclareOption{twoside}{\@twosidetrue  \@mparswitchtrue}

%    \end{macrocode}
% Âêëþ÷åíèå ñîîáùåíèé î ñòðîêàõ, âûõîäÿùèõ çà ïîëÿ.
%    \begin{macrocode}
\DeclareOption{draft}{\setlength\overfullrule{5pt}}
\DeclareOption{final}{\setlength\overfullrule{0pt}}

%    \end{macrocode}
% Ïå÷àòàòü òèòóëüíûé ëèñò èëè íåò.
%    \begin{macrocode}
\DeclareOption{titlepage}  {\@titlepagetrue}
\DeclareOption{notitlepage}{\@titlepagefalse}

%    \end{macrocode}
% Ãëàâû áóäóò íà÷èíàòüñÿ òîëüêî íà íå÷åòíîé ñòðàíèöå (áóäåò âñåãäà ñïðàâà íà
% ðàçâîðîòå) èëè íà ïåðâîé äîñòóïíîé.
%    \begin{macrocode}
\DeclareOption{openright}{\@openrighttrue}
\DeclareOption{openany}{\@openrightfalse}

%    \end{macrocode}
% Âåðñòêà â îäèí èëè â äâà ñòîëáöà.
%    \begin{macrocode}
\DeclareOption{onecolumn}{\@twocolumnfalse}
\DeclareOption{twocolumn}{\@twocolumntrue}

%    \end{macrocode}
% Íîìåðà ðàçìåùàþòñÿ ñëåâà, à íå ñïðàâà îò ôîðìóë.
%    \begin{macrocode}
\DeclareOption{leqno}{\input{leqno.clo}}

%    \end{macrocode}
% Âûêëþ÷íûå ôîðìóëû áóäóò âûðàâíåíû ïî ëåâîìó êðàþ, à íå ïî öåíòðó.
%    \begin{macrocode}
\DeclareOption{fleqn}{\input{fleqn.clo}}
%    \end{macrocode}
% Èñïîëüçîâàòü â òåêñòå è ôîðìóëàõ øðèôò Times âìåñòî Computer Modern
% Roman.
%    \begin{macrocode}
\DeclareOption{times}{\Dis@timestrue}
%    \end{macrocode}
% Èñïîëüçîâàòü ìàòåìàòè÷åñêèå øðèôòû MathTime Pro.
%    \begin{macrocode}
\DeclareOption{mtpro}{\Dis@mtprotrue}
%    \end{macrocode}
% Åñëè óêàçàíà ýòà îïöèÿ, òî áëîêè òåêñòà â ñïèñêå ëèòåðàòóðû áóäóò
% ïå÷àòàòüñÿ íà íîâûõ ñòðîêàõ è ñ îòñòóïîì.
%    \begin{macrocode}
\DeclareOption{openbib}{%
  \AtEndOfPackage{%
    \renewcommand\@openbib@code{%
      \advance\leftmargin\bibindent
      \itemindent -\bibindent
      \listparindent \itemindent
      \parsep \z@
    }%
    \renewcommand\newblock{\par}
  }%
}

%    \end{macrocode}
% Òèï äèññåðòàöèè.
%    \begin{macrocode}
\DeclareOption{bachelor}{%
  \Dis@bachelortrue
  \Dis@masterfalse
  \Dis@candidatefalse
  \Dis@doctorfalse
  \Dis@autoreffalse
}
\DeclareOption{master}{%
  \Dis@bachelorfalse
  \Dis@mastertrue
  \Dis@candidatefalse
  \Dis@doctorfalse
  \Dis@autoreffalse
}
\DeclareOption{candidate}{%
  \Dis@bachelorfalse
  \Dis@masterfalse
  \Dis@candidatetrue
  \Dis@doctorfalse
  \Dis@autoreffalse
}
\DeclareOption{doctor}{%
  \Dis@bachelorfalse
  \Dis@masterfalse
  \Dis@candidatefalse
  \Dis@doctortrue
  \Dis@autoreffalse
}
\DeclareOption{autoref}{%
  \Dis@bachelorfalse
  \Dis@masterfalse
  \Dis@candidatefalse
  \Dis@doctorfalse
  \Dis@autoreftrue
}

%    \end{macrocode}
% Âûïîëíåíèå îïöèé ïî óìîë÷àíèþ.
%    \begin{macrocode}
\ExecuteOptions{a4paper,14pt,oneside,titlepage,onecolumn,final,openany,candidate}
%    \end{macrocode}
% Âûïîëíåíèå ïîëüçîâàòåëüñêèõ îïöèé.
%    \begin{macrocode}
\ProcessOptions
\ProcessKeyvalOptions{Dis}

%    \end{macrocode}
% Êîìàíäû èçìåíåíèÿ ðåãèñòðà. Èì ñàìîå ìåñòî â ÿäðå.
% \DescribeMacro{\MakeTextUppercase}\index{Ìàêðîñû!\verb*+\MakeTextUppercase+}
%    \begin{macrocode}
\DeclareRobustCommand\MakeTextUppercase{%
  \@uclcnotmath{\def\i{I}\def\j{J}}{##1##2}\uppercase}

\protected@edef\MakeTextUppercase#1{\MakeTextUppercase{#1}}

%    \end{macrocode}
% \DescribeMacro{\MakeTextLowercase}\index{Ìàêðîñû!\verb*+\MakeTextLowercase+}
%    \begin{macrocode}
\DeclareRobustCommand\MakeTextLowercase{%
  \@uclcnotmath{}{##2##1}\lowercase}

\protected@edef\MakeTextLowercase#1{\MakeTextLowercase{#1}}

%    \end{macrocode}
% \subsection{Íàñòðîéêà øðèôòîâ}
% \subsubsection{Îïðåäåëåíèå ðàçìåðîâ}
%
%    \begin{macrocode}
\def\EC@family#1#2#3#4#5{%
  \DeclareFontShape{#1}{#2}{#3}{#4}%
  {<5><6><7><8><9><10><10.95><12><14.4><17.28><20.74>%
  <24.88><29.86><35.83><42.99><51.59>genb*#5}{}}
\EC@family{T1}{cmr}{m}{n}{ecrm}
\EC@family{T1}{cmr}{m}{sl}{ecsl}
\EC@family{T1}{cmr}{m}{it}{ecti}
\EC@family{T1}{cmr}{m}{sc}{eccc}
\EC@family{T1}{cmr}{bx}{n}{ecbx}
\EC@family{T1}{cmr}{b}{n}{ecrb}
\EC@family{T1}{cmr}{bx}{it}{ecbi}
\EC@family{T1}{cmr}{bx}{sl}{ecbl}
\EC@family{T1}{cmr}{bx}{sc}{ecxc}
\EC@family{T1}{cmr}{m}{ui}{ecui}
\DeclareFontShape{OT1}{cmr}{m}{n}%
     {<5><6><7><8><9><10><12>gen*cmr%
      <10.95>cmr10%
      <14.4>cmr12%
      <17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmr17}{}
\DeclareFontShape{OT1}{cmr}{m}{sl}%
     {<5><6><7>cmsl8%
      <8><9>gen*cmsl%
      <10><10.95>cmsl10%
      <12><14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmsl12%
      }{}
\DeclareFontShape{OT1}{cmr}{m}{it}%
     {<5><6><7>cmti7%
      <8>cmti8%
      <9>cmti9%
      <10><10.95>cmti10%
      <12><14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmti12%
      }{}
\DeclareFontShape{OT1}{cmr}{m}{sc}%
     {<5><6><7><8><9><10><10.95><12>%
      <14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmcsc10%
      }{}
\DeclareFontShape{OT1}{cmr}{m}{ui}{
  <5><6><7><8><9><10><10.95><12>%
  <14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmu10%
}{}
\DeclareFontShape{OT1}{cmr}{b}{n}{
  <5><6><7><8><9><10><10.95><12>%
  <14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmb10%
}{}
\DeclareFontShape{OT1}{cmr}{bx}{n}{
  <5><6><7><8><9>gen*cmbx%
  <10><10.95>cmbx10%
  <12><14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmbx12%
}{}
\DeclareFontShape{OT1}{cmr}{bx}{sl}{<5><6><7><8><9>%
  <10><10.95><12><14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmbxsl10%
}{}
\DeclareFontShape{OT1}{cmr}{bx}{it}{<5><6><7><8><9>%
  <10><10.95><12><14.4><17.28><20.74><24.88><29.86><35.83><42.99><51.59>cmbxti10%
}{}
\input{size\@ptsize.clo}
\RequirePackage{exscale}

%    \end{macrocode}
%
% \subsubsection{Ñòàðûå êîìàíäû èçìåíåíèÿ íà÷åðòàíèÿ øðèôòîâ (áåç NFSS)}
%
% Èçìåíåíèå íà÷åðòàíèÿ â òåêñòîâîì ðåæèìå.
%    \begin{macrocode}
\DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
\DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
\DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
\DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
\DeclareOldFontCommand{\it}{\normalfont\itshape} {\mathit}
\DeclareOldFontCommand{\sl}{\normalfont\slshape} {\@nomath\sl}
\DeclareOldFontCommand{\sc}{\normalfont\scshape} {\@nomath\sc}
%    \end{macrocode}
%  ìàòåìàòè÷åñêîì ðåæèìå.
%    \begin{macrocode}
\DeclareRobustCommand*\cal{\@fontswitch\relax\mathcal}
\DeclareRobustCommand*\mit{\@fontswitch\relax\mathnormal}

%    \end{macrocode}
% Êîìàíäà, îáúåäèíÿþùàÿ |\newlength| è |\setlength|.
% \DescribeMacro{\deflength}\index{Ìàêðîñû!\verb*+\deflength+}
%    \begin{macrocode}
\providecommand\deflength[2]{\newlength{#1}\setlength{#1}{#2}}

%    \end{macrocode}
%
% \subsection{Ïàðàìåòðû òåêñòà}
%
% \DescribeMacro{\lineskip}\index{Ðàññòîÿíèÿ!\verb*+\lineskip+}
% \DescribeMacro{\normallineskip}\index{Ðàññòîÿíèÿ!\verb*+\normallineskip+}
% Âåðòèêàëüíûé èíòåðâàë ìåæäó ñòðîêàìè. Óïîìèíàåìûé çäåñü è äàëåå ìàêðîñ
% |\p@| îïðåäåëÿåò ñòàíäàðòíóþ åäèíèöó äëèíû. Ïî óìîë÷àíèþ îíà ðàâíà
% àíãëèéñêîìó ïóíêòó (pt).
%    \begin{macrocode}
\setlength\lineskip{1\p@}
\setlength\normallineskip{1\p@}

%    \end{macrocode}
% \DescribeMacro{\singlespacing} \index{Ìàêðîñû!\verb*+\singlespacing+}
% \DescribeMacro{\onehalfspacing}\index{Ìàêðîñû!\verb*+\onehalfspacing+}
% \DescribeMacro{\doublespacing} \index{Ìàêðîñû!\verb*+\doublespacing+}
% Õàðàêòåðíûå âåëè÷èíû ìåæñòðî÷íàõ èíòåðâàëîâ.
%    \begin{macrocode}
\newcommand\singlespacing {\renewcommand\baselinestretch{1}\normalsize}
\newcommand\onehalfspacing{\renewcommand\baselinestretch{1.5}\normalsize}
\newcommand\doublespacing {\renewcommand\baselinestretch{2}\normalsize}
%    \end{macrocode}
% Ìåæñòðî÷íûé èíòåðâàë ïî óìîë÷àíèþ.
%    \begin{macrocode}
\onehalfspacing

%    \end{macrocode}
% \DescribeMacro{\parindent}\index{Ðàññòîÿíèÿ!\verb*+\parindent+}
% Àáçàöíûé îòñòóï.
%    \begin{macrocode}
\setlength\parindent{1cm}

%    \end{macrocode}
% Èíòåðâàë ìåæäó àáçàöàìè (äîáàâëÿåòñÿ ê ìåæñòðî÷íîìó).
% \DescribeMacro{\parskip}\index{Ðàññòîÿíèÿ!\verb*+\parskip+}
%    \begin{macrocode}
\setlength\parskip{0\p@ \@plus \p@}

%    \end{macrocode}
%
% Èíòåðâàë ìåæäó êîëîíêàìè òåêñòà.
% \DescribeMacro{\columnsep}\index{Ðàññòîÿíèÿ!\verb*+\columnsep+}
%    \begin{macrocode}
\setlength\columnsep{10\p@}

%    \end{macrocode}
%
% Øèðèíà ðàçäåëèòåëÿ (ëèíèè) ìåæäó êîëîíêàìè òåêñòà (ïî óìîë÷àíèþ åãî íåò).
% \DescribeMacro{\columnseprule}\index{Ðàññòîÿíèÿ!\verb*+\columnseprule+}
%    \begin{macrocode}
\setlength\columnseprule{0\p@}

%    \end{macrocode}
% Õàðàêòåðíûå âåëè÷èíû øòðàôîâ. Øòðàô --- ìåðà <<êðàñîòû>> ðàçáèåíèÿ
% àáçàöà íà ñòðîêè. ×åì áîëüøå âåëè÷èíà, òåì ìåíåå êðàñèâî.
%    \begin{macrocode}
\@lowpenalty   51
\@medpenalty  151
\@highpenalty 301

%    \end{macrocode}
% Âñåãäà ñòàâèòü îòñòóï â ïåðâîé ñòðîêå ïåðâîãî àáçàöà.
%    \begin{macrocode}
\let\@afterindentfalse\@afterindenttrue
\@afterindenttrue

%    \end{macrocode}
% Ïåðåíîñ â ñëîâàõ ñ äåôèñîì.
%    \begin{macrocode}
\lccode`\-=`\-
\defaulthyphenchar=127

%</disser>
%    \end{macrocode}