% texrep.sty					14 Nov 90
%------------------------------------------------------------
% (c) 1990 by J.Schrod (TeXsys).

%
% markups for my articles about TeX
%
% ILaTeX style option
%     testet with: article
%
% ATTENTION:
%     After loading ^ can not be used for exponents any more, use \sp !


\input names.sty        % Logos


% abbrevations

\chardef\bs=`\\                % backslash

\def\dh{d.\,h.\spacefactor\@m} % kerning!  (Spatium)
\def\zb{z.\,B.}
\def\ZB{Z.\,B.}

\def\eg{e.\,g.\spacefactor\@m}
\def\ie{i.\,e.\spacefactor\@m}


%
% consistent formatting
%

% first time a file type is mentioned it is marked with \ftype.
\def\ftype#1{{\tt \marginpar{\uppercase{#1}}\uppercase{#1}\/}}

% split ligatures with \| (if not in math mode)
%	is already defined in local.tex but this is often not used!
\def\allowhyphens{\penalty\@M \hskip\z@skip}
\def\|{%                
   \relax
   \ifmmode  \Vert
   \else  \allowhyphens\-\allowhyphens
   \fi
   }


%
% pictures
%

\unitlength=5mm           % may be changed for DINA5
\let\w=\@wholewidth       % width of a rule
\let\k=\unitlength        % a box (in German: Kasten) on my drawing-paper...


%
% title notes are footnotes on the title page without any marker
%

\def\titlenote#1{%
   \begingroup
      \def\@makefntext##1{\noindent ##1}%
      \footnotetext{#1}%
   \endgroup
   }


% marginal notes, for easier input
%		(idea taken from manmac.tex)
%
% usage:
%       ^|rem1|  for remark rem1, which is also printed (loud).
%       ^^|rem2| for remark rem2, which is not printed (silent).
% implementation:
%	look at next char; if ^, then do not print it.
%	with this char determin macro to expand
%	   macro is defined accordingly
%	marginal note is created by \marginpar.
% attention:
%       ^ can not be used for creating an exponent any more (but \sp!)

\catcode`\^=\active
\def^{\futurelet\next \check@silent}
\def\check@silent{%
   \ifx \next^%
      \let\next\silent@margin
   \else  \let\next\print@margin
   \fi
   \next
   }

\def\silent@margin^|#1|{\marginpar{\rm #1}}
\def\print@margin|#1|{#1\marginpar{\rm #1}}


\endinput
