%  FTANGLE v1.40, created with UNIX on "Thursday, November 4, 1993 at 12:10." 
%  COMMAND LINE: "ftangle -v -# ltugboat lgust"
%  RUN TIME: "Monday, November 22, 1993 at 14:38."
%  WEB FILE:    "ltugboat.web"
%  CHANGE FILE: "lgust.ch"
%
%  (This file was continued via @O from ltugboat.sty.)
%  ====================================================================
%  CHANGES: 
%      \baselines fixed by TP (20.02.95)
%      QZDR as marginal and list dingbat font (SW 6.12.95)
%  ====================================================================

\def\thisstyle{latex}
\def\fileversion{v1.0}
\def\filedate{2 November 1993}

\ifx\styloaded@\thisstyle \styinit
 \endinput\else\let\styloaded@\thisstyle\fi

\typeout{Document Style `LGUST.STY' \fileversion \space\space <\filedate>}

\ifx\c@section\undefined \input iarticle.sty \fi

\input cmn.sty

%\font \bdingbatfont=zd10 scaled \magstep1  % marginal dingbats
\font\dingbatfont=QZDR                     % dingbats for lists  (StaW)
\font\bdingbatfont=QZDR at15pt             % marginal dingbats   (StaW)

\ifx\selectfont\undefined                       % old \LaTeX
  \font\sevbf=plbx7
  \font \svtnsfb=plssbx10 scaled \magstep3      % for section titles;
  \font \tenssf=plss10
  \font \twlsf=plss10 scaled \magstep1
  \font \tenssfb=plssbx10
  \def\tenss{\def\bf{\tenssfb}\def\ss{\tenssf}\ss}
  \font\elvnsf=plss10 scaled \magstephalf % was \def\elvnsf horrible.. (tp)
  \font\elvnsfb=plssbx10 scaled \magstephalf % was \def\elvnsf..
  \def\elevenss{\def\bf{\elvnsfb}\def\ss{\elvnsf}\ss}
%%
  \font \twlsfb=plssbx10 scaled \magstep1       % definition of \LaTeX
  \newfam\sectitlefam                           % requires a family
  \textfont\sectitlefam=\svtnsfb
  \scriptfont\sectitlefam=\twlsfb
  \def\sectitlefont{\fam\sectitlefam\svtnsfb\baselineskip\stbaselineskip}
%%
  \font\egtsl=plsl8
  \font\tenuit=plu10                            % for Editor's Note
%%
%%  redo definition of 10pt from latex (lfonts), to install |\sevbf| as
%%    |\*scriptfont| of |\bffam| and |\egtsl| in |\slfam|
%%    |\*scriptfont| of |\bffam| for 9pt
  \toks0=\expandafter{\xpt\scriptfont\bffam\sevbf \scriptscriptfont\bffam\sevbf
          \scriptfont\slfam\egtsl \scriptscriptfont\slfam\egtsl}
  \xdef\xpt{\the\toks0}
  \toks0=\expandafter{\ixpt\scriptfont\bffam\sevbf
          \scriptscriptfont\bffam\sevbf}
  \xdef\ixpt{\the\toks0}
\else % {\NFSS} in effect
%%    for section titles; include explicit definition of |\La| (for |\LaTeX|)
  \def\sectitlefont{\def\La{\leavevmode L\raise.42ex
                    \hbox{\fontsize{12}{12pt}\selectfont\kern-.4em A}}%
          \fontfamily{plss}\fontseries{bx}\fontshape{n}%
          \fontsize{17}{\stbaselineskip}\selectfont}
  \def\tensl{\fontfamily{plr}\fontseries{m}\fontshape{sl}\fontsize{10}{12pt}%
          \selectfont}
  \def\tenss{\fontfamily{plss}\fontseries{m}\fontshape{n}\fontsize{10}{12pt}%
          \selectfont}
  \def\tubfont{\shape{sl}\selectfont}
  \def\gustfont{\shape{sl}\selectfont}
  \def\tenuit{\fontfamily{plr}\fontseries{m}\fontshape{u}\fontsize{10}{12pt}%
          \selectfont}
  \def\elevenss{\fontfamily{plss}\fontseries{m}\fontshape{n}\fontsize{11}{13pt}%
          \selectfont}
\fi

\@twosidetrue           % for odd/even asymmetry in running heads
\twocolumn              % two columns
\sloppy                 % make those columns justify but ensure they line up
\columnsep 1.5pc        % space between columns
\columnwidth 18.75pc    % width of each column
\parindent \normalparindent     % paragraph indent
\parskip 0pt            % no inter-paragraph space
\leftmargini 2em        % unchanged
\leftmarginv .5em       % unchanged
\leftmarginvi .5em      % unchanged
\oddsidemargin 0pt      % was 42pt
\evensidemargin 0pt     % was 84pt
\topmargin -2.5pc       % was 0pt
\headheight 12pt        % height of running head, unchanged
\headsep 20pt           % distance between header and text
\marginparwidth 48pt    % don't use marginal notes
\marginparsep 10pt      %  in TUGboat
\textheight 54pc        % height of text on page
\textwidth 39pc         % total width of a page

\partopsep=\z@
\topsep=3pt plus1pt minus1pt
\parsep=3pt plus 1pt minus 1pt
\itemsep=\parsep

\def\@normalsize{\@setsize\normalsize{13pt}\xpt\@xpt %<--- TPadd {12pt}
\abovedisplayskip=3pt plus 3pt minus 1pt \belowdisplayskip=\abovedisplayskip
\abovedisplayshortskip=\z@ plus3pt \belowdisplayshortskip=1pt plus3pt minus1pt}

\def\small{\@setsize\small{11pt}\ixpt\@ixpt%
\abovedisplayskip=2.5pt plus2.5pt minus1pt\belowdisplayskip=\abovedisplayskip
\abovedisplayshortskip=\z@ plus2pt \belowdisplayshortskip=1pt plus2pt minus1pt}

\def\SMC{\small}

\def\footnotesize{\@setsize\footnotesize{13pt}\xpt\@xpt %<--- TPadd {12pt}
\abovedisplayskip=3pt plus 3pt minus 1pt \belowdisplayskip=\abovedisplayskip
\abovedisplayshortskip=\z@ plus3pt \belowdisplayshortskip=1pt plus3pt minus1pt}

\def\@listi{\leftmargin\leftmargini\parsep=1pt plus 1pt minus 1pt
  \itemsep=\parsep
  \listparindent=1em
  }

\def\@listii{\leftmargin\leftmarginii
  \labelwidth=\leftmarginii \advance\labelwidth-\labelsep
  \topsep=2pt plus 1pt minus 1pt
  \parsep=1pt plus 1pt minus 1pt
  \itemsep=\parsep
  \listparindent=1em
  }

\def\@listiii{\leftmargin=\leftmarginiii
  \labelwidth=\leftmarginiii \advance\labelwidth-\labelsep
  \topsep=1pt plus 1pt minus 1pt
  \parsep=\z@
  \itemsep=\topsep
  \listparindent=1em
  }

\setbox\T@stBox=\hbox{\sectitlefont O}
\newdimen\stfontheight          \stfontheight=\ht\T@stBox
\newdimen\stfontwidth           \stfontwidth=\wd\T@stBox
\def\sectitle#1#2{\SecTitletrue \def\s@ctitle{#1}\def\s@clogo{#2}}

\newcount\authornumber
\authornumber=0

\def\author#1{%
  \global\advance\authornumber\@ne
  \expandafter\def\csname theauthor\number\authornumber\endcsname
      {\ignorespaces#1\unskip}%
  \expandafter\let\csname theaddress\number\authornumber\endcsname\relax
  \expandafter\let\csname thenetaddress\number\authornumber\endcsname\relax
  }

\def\address#1{%
  \expandafter\def\csname theaddress\number\authornumber\endcsname
      {\ignorespaces#1\unskip}}

\def\authorlist#1{\def\@author{#1}}
\def\@author{\@defaultauthorlist}

\def\maketitle{\par
 \ifdim\PreTitleDrop > 0pt
   \loop
   \ifdim \PreTitleDrop > \textheight
     \vbox{}\vfil\eject
     \advance\PreTitleDrop by -\textheight
   \repeat
   \vbox to \PreTitleDrop{}
   \global\PreTitleDrop=0pt
 \fi
 \begingroup
 \setcounter{footnote}{0}
 \def\thefootnote{\fnsymbol{footnote}}
%% |\def\@makefnmark{\hbox to 0pt{$^{\@thefnmark}$\hss}}|
 \@maketitle
 \@thanks
 \endgroup
 \setcounter{footnote}{0}
%% |\let\maketitle\relax|
%% |\let\@maketitle\relax|
 \gdef\@thanks{}%
%% |\let\thanks\relax|
 }

\newif\ifWideSecTitle
\def\@maketitle{\ifSecTitle \global\SecTitlefalse
		\T@stDimen=\hsize
		\ifWideSecTitle \hsize=\textwidth \global\WideSecTitlefalse \fi
                \SectionTitle{\s@ctitle}{{\bdingbatfont\s@clogo}}%
		\hsize=\T@stDimen
        \else \vskip\AboveTitleSkip
                \kern\topskip
                \hrule height\z@ depth\z@ width 10pt
                \kern-\topskip
                \kern-\strulethickness
                \hrule height\strulethickness depth\z@
                \kern\medskipamount
                \nobreak
        \fi
        {\nohyphens \interlinepenalty\@M
        \setbox0=
          \hbox{\let\thanks\@gobble
                \let\\=\quad
                \let\and=\quad
                \ignorespaces\@author}%
        {\noindent\elevenss\bf\raggedright\ignorespaces\@title\endgraf}%
        \ifdim \wd0 < 5pt               % omit if author is null
        \else \nobreak \vskip 4pt       % 4pt + |\BelowTitleSkip| = |%
%\baselineskip|
                {\leftskip=\normalparindent
                 \raggedright
                 \def\and{\unskip\\}%
                 \noindent\elevenss\@author\endgraf}%
        \fi \nobreak \vskip\BelowTitleSkip }}

\def\dedication{\bgroup\raggedright\let\MF=\slMF\noindent\it\ignorespaces}
\def\enddedication{\endgraf\egroup\medskip}

\def\abstract{
\section*{Abstract}
}
\def\endabstract{}

\def\longabstract{
  \section*{Abstract}
  \bgroup\small}
\def\endlongabstract{\endgraf\egroup
  \vspace{.25\baselineskip}
  \begin{center}
    {$--*--$}
  \end{center}
  \vspace{.5\baselineskip}}

\def\section{\@startsection {section}{1}{\z@}{-8pt}{4pt}%
        {\normalsize\elevenss\bf\raggedright\hyphenpenalty=\@M}}

\def\subsection{\@startsection{subsection}{2}{\z@}{-8pt}{4pt}%
        {\normalsize\tenss\bf\raggedright\hyphenpenalty=\@M}}

\def\subsubsection{\@startsection{subsubsection}{3}{\z@}{-8pt}{4pt}%
        {\normalsize\tenss\bf\raggedright\hyphenpenalty=\@M}}

\def\paragraph{\@startsection
 {paragraph}{4}{\z@}{2.5ex plus 1ex}{-1em}{\normalsize\tennss\bf}}

\def\subparagraph{\@startsection
 {subparagraph}{4}{\parindent}{2.5ex plus 1ex}{-1em}{\normalsize\tenss\bf}}

%%Modify |\appendix| from |art10.sty|, to add ``Appendix''
%%1 May 89 Mittelbach comments that we need to put ``Appendix''
%%somewhere other than |\thesection| if |\tableofcontents| is used.

%%|\def\appendix{\par|

%%|\setcounter{section}{0}|
%%|\setcounter{subsection}{0}|

%%|\def\thesection{Appendix \Alph{section}}}|

\def\l@part#1#2{\addpenalty{\@secpenalty}
 \addvspace{2.25em plus 1pt} \begingroup
 \@tempdima 3em \parindent \z@ \rightskip \z@ \parfillskip \z@
 {\large \bf \leavevmode #1\hfil \hbox to\@pnumwidth{\hss #2}}\par
 \nobreak \endgroup}
\def\l@section#1#2{\addpenalty{\@secpenalty} \addvspace{1.0em plus 1pt}
\@tempdima 1.5em \begingroup
 \parindent \z@ \rightskip \z@  % article style makes |\rightskip > 0|
 \parfillskip \z@
 \bf \leavevmode \advance\leftskip\@tempdima \hskip -\leftskip #1\nobreak\hfil
\nobreak\hbox to\@pnumwidth{\hss #2}\par
 \endgroup}

\def \EdNote{{\tenuit Od redakcji:\enspace }}

\long\def\@makefntext#1{\parindent 1em\noindent\hbox to 2em{}%
  \llap{\@makefnmark}\null$\mskip5mu$#1}

\ifnum\number\language=\english
\def\fnum@figure{{\bf Figure \thefigure}}
\else
\def\fnum@figure{{\bf Rycina \thefigure}}
\fi


\def\quote{\list{}{\rightmargin.5\leftmargin}\item[]}

%% From Dominik Wujastyk's font article.  First paragraph of a quotation
%% will not be indented, and right margin is decreased for narrow columns.

\renewcommand{\quotation}{\list{}{\listparindent 1.5em
        \rightmargin.5\leftmargin\parsep 0pt plus 1pt}\item[]}

\def\bibliography#1{%
  \if@filesw\immediate\write\@auxout{\string\bibdata{\@tubfilename{#1}}}\fi
  \@input{\jobname.bbl}}

\def\bibliographystyle#1{\if@filesw\immediate\write\@auxout
    {\string\bibstyle{\@tubfilename{#1}}}\fi}

%% Replace |\sloppy| by something not quite as sloppy

\def\thebibliography#1{\section*{References\@mkboth
  {REFERENCES}{REFERENCES}}\list
  {[\arabic{enumi}]}{\settowidth\labelwidth{[#1]}\leftmargin\labelwidth
    \advance\leftmargin\labelsep
    \usecounter{enumi}}
    \def\newblock{\hskip .11em plus .33em minus .07em}
%%    |\sloppy|
    \tolerance 8000 \hfuzz .5\p@ \vfuzz .5\p@
    \clubpenalty4000\widowpenalty4000
    \sfcode`\.=1000\relax}

%%|\def\sloppy{\tolerance 10000 \hfuzz .5\p@ \vfuzz .5\p@}|

\def\enddocument{\@checkend{document}\clearpage\begingroup
\if@filesw \immediate\closeout\@mainaux
\def\global\@namedef##1##2{}\def\newlabel{\@testdef r}%
\def\bibcite{\@testdef b}\@tempswafalse \makeatletter\@@input \jobname.aux
\if@tempswa \@warning{Label(s) may have changed.  Rerun to get
cross-references right}\fi\fi\endgroup\deadcycles\z@\@@end}

\def\rtitlex{\def\gustfont{\normalsize\rm}\GUSTB, \volx }

\def\PrelimDraftfooter{%
  \dlap{\kern\textheight\kern3pc
        \rlap{\hbox to \pagewd{\midrtitle\hfil\midrtitle}}
  }}

\def\MakeRegistrationMarks{}
\def\MakeRegistrationMarks{}
\def\UseTrimMarks{%
  \def\MakeRegistrationMarks{%
    \ulap{\rlap{%
       \vbox{\dlap{\vbox to\trimlgt{\vfil\botregister}}%
             \topregister\vskip \headmargin \vskip 10pt}}}}%
  }

\def\@oddhead{\MakeRegistrationMarks\PrelimDraftfooter
  \normalsize\csname normalshape\endcsname\rm
  \volyr\hfil\rtitlex\hfil\thepage}
\def\@evenhead{\MakeRegistrationMarks\PrelimDraftfooter
  \normalsize\csname normalshape\endcsname\rm
  \thepage\hfil\rtitlex\hfil\volyr}
\def\@oddfoot{}
\def\@evenfoot{}

\def\ps@headings{}
\pagestyle{headings}

\def\@outputdblcol{\if@firstcolumn \global\@firstcolumnfalse
    \global\setbox\@leftcolumn\box\@outputbox
    \global\brokenpenalty10000
  \else \global\@firstcolumntrue
    \global\brokenpenalty100
    \setbox\@outputbox\vbox{\hbox to\textwidth{\hbox to\columnwidth
      {\box\@leftcolumn \hss}\hfil \vrule width\columnseprule\hfil
       \hbox to\columnwidth{\box\@outputbox \hss}}}\@combinedblfloats
       \@outputpage \begingroup \@dblfloatplacement \@startdblcolumn
       \@whilesw\if@fcolmade \fi{\@outputpage\@startdblcolumn}\endgroup
    \fi}




\def\SelfDocumenting{%
  \setlength\textwidth{31pc}
  \onecolumn
  \parindent 0pt
  \parskip 2pt plus 1pt minus 1pt
  \oddsidemargin 8pc
  \evensidemargin 8pc
  \marginparwidth 8pc
  \toks@\expandafter{\@oddhead}%
  \xdef\@oddhead{\hss\hbox to \pagewd{\the\toks@}}%
  \toks@\expandafter{\@evenhead}%
  \xdef\@evenhead{\hss\hbox to \pagewd{\the\toks@}}%
  \def\ps@titlepage{}%
}

\def\ps@titlepage{}

\newif\ifFirstPar       \FirstParfalse

\newdimen\pagewd        \pagewd=39pc
\newdimen\trimwd        \trimwd=\pagewd
\newdimen\trimlgt       \trimlgt=11in
\newdimen\headmargin    \headmargin=3.5pc
\def\smc{\sc}
\def\ninepoint{\small}
\newdimen\colwd         \colwd=18.75pc  % for compatibility with |gust.sty|
\countdef\xcol=1        \xcol=1




\setcounter{page}{1001}
\PrelimDrafttrue

\def\gstyinit{%
  \everypar{\@nodocument}%
  \authornumber\z@
  \let\@signature\@defaultsignature
  }

\endinput

