%-----------------------------------------------------------------------
%! LaTeX2e AIPSletter package
%# Documentation LaTeX
%-----------------------------------------------------------------------
%;  Copyright (C) 1997
%;  Associated Universities, Inc. Washington DC, USA.
%;
%;  This program is free software; you can redistribute it and/or
%;  modify it under the terms of the GNU General Public License as
%;  published by the Free Software Foundation; either version 2 of
%;  the License, or (at your option) any later version.
%;
%;  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.  See the
%;  GNU General Public License for more details.
%;
%;  You should have received a copy of the GNU General Public
%;  License along with this program; if not, write to the Free
%;  Software Foundation, Inc., 675 Massachusetts Ave, Cambridge,
%;  MA 02139, USA.
%;
%;  Correspondence concerning AIPS should be addressed as follows:
%;          Internet email: aipsmail@nrao.edu.
%;          Postal address: AIPS Project Office
%;                          National Radio Astronomy Observatory
%;                          520 Edgemont Road
%;                          Charlottesville, VA 22903-2475 USA
%-----------------------------------------------------------------------
% Basic settings
%
% Sizes
%
\parskip 	4.0mm
\linewidth 	6.5in
\textwidth	6.5in
\textheight	9.4in
\marginparsep	0.0in
\oddsidemargin	0.25in
\evensidemargin	-0.25in
\topmargin	-0.5in
\headsep	0.25in
\headheight	0.25in
\parindent	0.0in
\listparindent	0.0cm
\labelsep	0.0cm
%
% Settings
%
\pretolerance	10000
\setcounter{secnumdepth}{0}	% no section numbers

%-----------------------------------------------------------------------
%
% \AIPS prints the word AIPS in caligraphic script
%
\newcommand{\AIPS}{{$\mathcal{AIPS}$}}
%
% \AIPSletter prints the word AIPSLetter with the capital letters
% in caligraphic script.
\newcommand{\AIPSLetter}{{$\mathcal{AIPSL}etter\/$}}

% \right@heading is the header for right-hand (odd-numbered) pages.
% This has 3 arguments:
% 1 - The AIPS release (eg. October 15 1997)
% 2 - The AIPSLetter volume
% 3 - The AIPSLetter issue number
\newcommand{\right@heading}[3]{\AIPSLetter:~#1, Volume~#2, Number~#3\hfill}

% \left@heading is the header for left-hand (even-numbered) pages.
% This has 3 arguments:
% 1 - The AIPS release (eg. October 15 1997)
% 2 - The AIPSLetter volume
% 3 - The AIPSLetter issue number
\newcommand{\left@heading}[3]{\hfill \AIPSLetter:~#1, Volume~#2, Number~#3}

% \address formats its single argument as an net address
\newcommand{\address}[1]{\texttt{#1}}

% \task formats its single argument as an AIPS task name
\newcommand{\task}[1]{\texttt{#1}}

% \AIPSmark produces the AIPSmark^93 text
\newcommand{\AIPSmark}{AIPSMark$^{(93)}$}

%
% The aipsletter environment encloses the AIPSLetter test with the
% appropriate beginning and end material.
%
% The beginning material is the title and credits.
%
% The endind materianl is the order form and mailing label.
%
% There are 5 arguments:
% 1 - The AIPS release date(eg. October 15 1997)
% 2 - The AIPS release name (eg. 15OCT97); this will be available as
%     \thisrelease in the aipsletter environment
% 2 - The AIPSLetter volume number (eg. XVII)
% 3 - The AIPSLetter issue number (eg. 2)
% 4 - The name of the editor of the AIPSLetter
\newenvironment{aipsletter}[5]{
    \pagestyle{myheadings}
    \thispagestyle{empty}
    \markboth{\left@heading{#1}{#3}{#4}}{\right@heading{#1}{#3}{#4}}

    \newcommand{\thisrelease}[0]{\texttt{#2}}

    \hphantom{...}
    \vskip -12.0mm
    \centerline{\Huge A{ }I{ }P{ }S{ }L{ }E{ }T{ }T{ }E{ }R}
    \vskip 0.2in
    \centerline{\Large Volume~#3, Number~#4: #1}
    \vskip 0.2in
    \centerline{\Large A newsletter for users of the NRAO}
    \vskip 5.0pt
    \centerline{\Large {$\mathcal{A}$}stronomical~~
        {$\mathcal{I}$}mage~~ {$\mathcal{P}$}rocessing~~
        {$\mathcal{S}$}ystem}
    \vskip 0.2in
    \normalsize
    \vskip 5.0pt
    \centerline{\Large Written by a cast of \AIPS}
    \vskip 0.2 in
    \normalsize
    \centerline { Edited by}
    \vskip 4.0pt
    \centerline {\large #5}
    \vskip 3.0pt
    \centerline {National Radio Astronomy Observatory}
    \vskip 2.0pt
    \centerline {P.\ O.\ Box 0, Socorro, NM 87801}
    \vskip 2.0pt
    \centerline {505--835--7396;  Fax 505--835--7027}
    \vskip 4.0pt
    \centerline {\texttt{aipsmail@nrao.edu}}
    \vskip 0.08in
}{
    \cleardoublepage\pagestyle{empty}
    \centerline{\hss\psfig{figure=AIPSORDER.PS,height=23.3cm}\hss}
    \vfill\eject
    \phantom{...}
    \vskip 4.4in
    \centerline{\hss\psfig{figure=AIPSLETM.PS,width=\linewidth}\hss}
}

% End of aipsletter.sty