\typeout{doc customizations. Released 4 March 1987.}

% This style defines some common macros I found useful at some point.

% \vv: a bit of vertical spacing
\def\vv{\vspace{3em}}


% \getvalue takes an argument of the form xxxpt and returns pt.
% It is intended to convert dimensions into (decimal) numbers.
%
% \valueof takes anything that expands to a dimension as argument and
% returns the dimensionless value. The main use of this function is in
% LaTeX pictures that require numbers; one can compute coordinates
% in dimension registers and then give the value to LaTeX by the \valueof
% these registers.

{\catcode`p=12\catcode`t=12 \gdef\@dummy#1pt{#1}}
\let\getvalue=\@dummy		% note that "dummy" does not have p or t in it.

\def\valueof{\expandafter\getvalue\the}


% \entre makes it simpler to mention the limits of an index

\def\entre#1#2#3{\ifmmode{#1 \leq #2\leq #3}\else{$#1 \leq #2\leq #3$}\fi}

% keywords: defines a macros that put some text in a given font. By default,
% the name of the macro is the keyword itself. There is no need for a \
% after this macro as is takes care of that. But there should be something
% in the current paragraph. In particular, if at the end of a title, it 
% should be followed by something like \relax

\def\sckeyword#1{\@ifnextchar[{\@keyword{{\sc #1}}}{\@keyword{{\sc #1}}[#1]}}
\def\sfkeyword#1{\@ifnextchar[{\@keyword{{\sf #1}}}{\@keyword{{\sf #1}}[#1]}}
\def\slkeyword#1{\@ifnextchar[{\@keyword{{\sl #1}}}{\@keyword{{\sl #1}}[#1]}}
\def\itkeyword#1{\@ifnextchar[{\@keyword{{\it #1}}}{\@keyword{{\it #1}}[#1]}}
\def\ttkeyword#1{\@ifnextchar[{\@keyword{{\tt #1}}}{\@keyword{{\tt #1}}[#1]}}
\def\rmkeyword#1{\@ifnextchar[{\@keyword{{\rm #1}}}{\@keyword{{\rm #1}}[#1]}}

\def\@keyword#1[#2]{\expandafter\def\csname#2\endcsname{#1\@finishkeyword}}
\def\@finishkeyword#1{\ifcat#1a\ #1\else #1\fi}

% define: introduces its argument in \em in the text and in the index.

\def\define#1{\@ifnextchar[{\@define#1}{\@define#1[#1]}}
\def\@define#1[#2]{{\em #1\index{#2}}}

% check: tells to the screen there is something to do around here.

\long\def\check#1{{\sf #1}\message{**** #1}}



% to make a small separation

\newcounter{piece}[section]
\renewcommand{\thepiece}{\underline{\thesection.\arabic{piece}}}
\newcommand{\apiece}[1]{{\setlength{\parindent}{0pt}\vspace{5mm}%
%$[${\it #1}$]$\refstepcounter{piece}\marginpar{\hfill\thepiece}}}
\hrule width 0pt height 0pt\marginpar{\it #1}}}

\renewcommand{\apiece}{\paragraph}
