% This is a LaTeX style file to prepare IRAM 30m and interferometer proposals.
% [R. Lucas Jan 27th, 1998]
% 
% This should be edited for each deadline ...
%
\def \deadline {March 5th, 1998}
\def \period {May. 15 1998 - Nov. 15 1998}
%
%
%\input article.sty
%\input art11.sty
%
% modifications to the standard LaTeX styles
\textheight 275mm
\textwidth 186 mm
\oddsidemargin -12mm
\evensidemargin -12mm
\marginparwidth 50pt
%\topmargin -26mm
\topmargin -22mm
\brokenpenalty=10000
\sloppy
%
% Some commands taken from A&A and elsewhere...
%
\newcommand {\msun}{\mbox{M$_\odot$}}
\newcommand {\sun}{\odot}
\newcommand {\kms}{\mbox{km~s$^{-1}$}}
\newcommand {\micron}{\mbox{$\mu$m}}
\newcommand{\twelveco}{\mbox{$^{12}$CO}} 
\newcommand{\thirteenco}{\mbox{$^{13}$CO}}
\newcommand{\htwo}{\mbox{H$_2$}}
\newcommand{\htwoo}{\mbox{H$_2$O}}
\newcommand{\htwos}{\mbox{H$_2$S}}
\newcommand{\hcoplus}{\mbox{HCO$^+$}}
\newcommand{\sotwo}{\mbox{SO$_2$}}
\newcommand{\etal}{{\it et~al.\/}}
\pagestyle{headings}
%
% Table of contents : redefine box size for numbers (default is too small)
\def\l@subsection{\@dottedtocline{2}{1.5em}{4.3em}}
\def\l@subsubsection{\@dottedtocline{3}{3.8em}{6.2em}}
\def\l@paragraph{\@dottedtocline{4}{7.0em}{8.1em}}
\def\l@subparagraph{\@dottedtocline{5}{10em}{10em}}
%
% \list parameters have been adjusted in the `thebibliography'
% environment to the match A&A layout of References.
\def\thebibliography#1{\section*{References\markboth
 {REFERENCES}{REFERENCES}}\list
% The \arabic{enumi} command has been removed because we don't use
% numbered citations in astronomical journals.
 {}{\setlength\labelwidth{1.4em}\leftmargin\labelwidth
 \setlength\parsep{0pt}\setlength\itemsep{0pt}
 \setlength{\itemindent}{-\leftmargin}
 \usecounter{enumi}}
 \def\newblock{\hskip .11em plus .33em minus -.07em}
 \sloppy
 \sfcode`\.=1000\relax}
\let\endthebibliography=\endlist
%
%\newenvironment{captions}
\def \captions    {\newcounter{fign}\section*{Figure Captions}
        \begin{list}{\bf Fig. \Arabic{fign}.}
        {\usecounter{fign}\setlength{\leftmargin}{0mm}
        \setlength{\itemindent}{0mm}}
        \small}
\def \endcaptions    {\end{list}\normalsize}
%
% Redefine \@cite so no square brackets are output.
% Redefine \@biblabel so the label is not output in the bibliography.
\def\@cite#1#2{{#1\if@tempswa , #2\fi}}
\def\@biblabel#1{}
% \vx reserves a fixed vertical space #1
    \def \vx#1{\rule[-#1]{0mm}{#1}}
% no page headings or numbers whatsoever
    \pagestyle{empty}
%
% Specific commands
%
% \blank will produce the proposal form.
%
\newif\if@noblank\@noblanktrue \def \blank{\@noblankfalse}
%
\def\full{~\raisebox{1mm}{\circle*{3.5}}}
\def\checkoff{~\raisebox{1mm}{\circle{3.5}}}
\def\checkon{\if@noblank\full\else\checkoff\fi}
\def\check#1{#1\checkon\else\checkoff\fi}
\def\nocheck#1{#1\checkoff\else\checkon\fi}
\newif\if@pico\@picotrue
\def\picoveleta{\@picotrue}\def\plateaudebure{\@picofalse}
\newif\if@onemmcat \@onemmcatfalse\def\onemmcat{\@onemmcattrue}
\newif\if@threemmcat \@threemmcatfalse\def\threemmcat{\@threemmcattrue}
\newif\if@dualfrcat \@dualfrcatfalse\def\dualfrcat{\@dualfrcattrue}
\newif\if@specialcat \@specialcatfalse\def\specialcat{\@specialcattrue}

\newif\if@exgalcont \@exgalcontfalse\def\exgalcont{\@exgalconttrue}
\newif\if@exgalco \@exgalcofalse\def\exgalco{\@exgalcotrue}
\newif\if@exgalother \@exgalotherfalse\def\exgalother{\@exgalothertrue}
\newif\if@galcont \@galcontfalse\def\galcont{\@galconttrue}
\newif\if@gallines \@gallinesfalse\def\gallines{\@gallinestrue}
\newif\if@galcloud \@galcloudfalse\def\galcloud{\@galcloudtrue}
\newif\if@galcse \@galcsefalse\def\galcse{\@galcsetrue}
\newif\if@galyse \@galysefalse\def\galyse{\@galysetrue}
\newif\if@galcloud \@galcloudfalse\def\galcloud{\@galcloudtrue}
\newif\if@galchem \@galchemfalse\def\galchem{\@galchemtrue}
\newif\if@galother \@galotherfalse\def\galother{\@galothertrue}
\newif\if@mapping \@mappingfalse\def\mapping{\@mappingtrue}
\newif\if@detection \@detectionfalse\def\detection{\@detectiontrue}
\newif\if@sizemeasure \@sizemeasurefalse\def\sizemeasure{\@sizemeasuretrue}
\newif\if@snapshot \@snapshotfalse\def\snapshot{\@snapshottrue}
\newif\if@mosaic \@mosaicfalse\def\mosaic{\@mosaictrue}
\newif\if@othertype \@othertypefalse\def\othertype{\@othertypetrue}
%
\def\first#1{\gdef\@first{#1}}
\def\others#1{\gdef\@others{#1}}
\def\sourcelist#1{\gdef\@sourcelist{#1}}
\def\epoch#1{\gdef\@epoch{#1}}
\def\techsourcelist#1{\gdef\@techsourcelist{#1}}
\def\abstract#1{\gdef\@abstract{#1}}
\newif\if@resubmit \@resubmitfalse
\def\resubmit#1{\@resubmittrue\gdef\@resubmitn{#1}}
\newif\if@continue \@continuefalse
\def\continue#1{\@continuetrue\gdef\@continuen{#1}}
%
\def\@hours{}
\def\hours#1{\gdef\@hours{#1}}
\def\@lstaa{}\def\@lstab{}\def\@lstac{}
\def\@lstba{}\def\@lstbb{}\def\@lstbc{}
\def\lsta#1#2#3{\gdef\@lstaa{#1}\gdef\@lstab{#2}\gdef\@lstac{#3}}
\def\lstb#1#2#3{\gdef\@lstba{#1}\gdef\@lstbb{#2}\gdef\@lstbc{#3}}
\def\@totalhoursa{}
\def\@totalhoursb{}
\def\totalhours#1#2{\gdef\@totalhoursa{#1}\gdef\@totalhoursb{#2}}
\def\specials#1{\gdef\@specials{#1}}\def\@specials{}
\def\frequencies#1#2{\gdef\@frequenciesone{#1}\gdef\@frequenciestwo{#2}}
\def\@frequenciesone{}\def\@frequenciestwo{}
\def\abstract#1{\gdef\@abstract{#1}}\def\@abstract{}
\def\observer#1{\gdef\@observer{#1}}\def\@observer{}
\def\reducer#1{\gdef\@reducer{#1}}\def\@reducer{}
\newif\if@threemmone \@threemmonefalse\def\threemmone{\@threemmonetrue}
\newif\if@threemmtwo \@threemmtwofalse\def\threemmtwo{\@threemmtwotrue}
\newif\if@twomm \@twommfalse\def\twomm{\@twommtrue}
\newif\if@onemmone \@onemmonefalse\def\onemmone{\@onemmonetrue}
\newif\if@onemmtwo \@onemmtwofalse\def\onemmtwo{\@onemmtwotrue}
\newif\if@pointeightmm \@pointeightmmfalse\def\pointeightmm{\@pointeightmmtrue}
\newif\if@bolo \@bolofalse\def\bolo{\@bolotrue}
\newif\if@confd \@confdfalse\def\confd{\@confdtrue}
\newif\if@confcone \@confconefalse\def\confcone{\@confconetrue}
\newif\if@confctwo \@confctwofalse\def\confctwo{\@confctwotrue}
\newif\if@confbone \@confbonefalse\def\confbone{\@confbonetrue}
\newif\if@confbtwo \@confbtwofalse\def\confbtwo{\@confbtwotrue}
\newif\if@confa \@confafalse\def\confa{\@confatrue}
% for compatibility:
\def\confaone{\@confatrue} \def\confatwo{\@confatrue}
\def\confdone{\@confdtrue} \def\confdtwo{\@confdtrue}
%
\def\position#1{\gdef\@position{#1}}\def\@position{}
\def\structuresize#1{\gdef\@structuresize{#1}}\def\@structuresize{}
\def\continuumflux#1{\gdef\@continuumflux{#1}}\def\@continuumflux{}
\def\continuumsize#1{\gdef\@continuumsize{#1}}\def\@continuumsize{}
\def\continuumfreq#1{\gdef\@continuumfreq{#1}}\def\@continuumfreq{}
\def\contamination#1{\gdef\@contamination{#1}}\def\@contamination{}
\def\avoidfreq#1{\gdef\@avoidfreq{#1}}\def\@avoidfreq{}
\def\bandres#1{\gdef\@bandres{#1}}\def\@bandres{}
\def\linezerowidth#1{\gdef\@linezerowidth{#1}}\def\@linezerowidth{}
\def\numberlines#1{\gdef\@numberlines{#1}}\def\@numberlines{}
\def\linefreq#1{\gdef\@linefreq{#1}}\def\@linefreq{}
\def\linesize#1{\gdef\@linesize{#1}}\def\@linesize{}
\def\linestrength#1{\gdef\@linestrength{#1}}\def\@linestrength{}
\def\configuration#1{\gdef\@configuration{#1}}\def\@configuration{}
\def\observingtime#1{\gdef\@observingtime{#1}}\def\@observingtime{}
\def\baselinerange#1{\gdef\@baselinerange{#1}}\def\@baselinerange{}
\def\configlist#1{\gdef\@configlist{#1}}\def\@configlist{}
\def\hourangles#1{\gdef\@hourangles{#1}}\def\@hourangles{}
\def\hourangletime#1{\gdef\@hourangletime{#1}}\def\@hourangletime{}
\def\phasecalibrators#1{\gdef\@phasecalibrators{#1}}\def\@phasecalibrators{}
\def\ampcalibrator#1{\gdef\@ampcalibrator{#1}}\def\@ampcalibrator{}
\def\bandpass#1{\gdef\@bandpass{#1}}\def\@bandpass{}
\def\particulars#1{\gdef\@particulars{#1}}\def\@particulars{}
\def\recone#1#2#3{\gdef\@reconeline{#1}\gdef\@reconefr{#2}
   \gdef\@reconeband{#3}}
\def\@reconeline{}\def\@reconefr{}\def\@reconeband{}
\def\rectwo#1#2#3{\gdef\@rectwoline{#1}\gdef\@rectwofr{#2}
   \gdef\@rectwoband{#3}}
\def\@rectwoline{}\def\@rectwofr{}\def\@rectwoband{}
\def\specone#1#2#3{\gdef\@speconewid{#1}\gdef\@speconefr{#2}
  \gdef\@speconerec{#3}}
\def\@speconewid{}\def\@speconefr{}\def\@speconerec{}
\def\spectwo#1#2#3{\gdef\@spectwowid{#1}\gdef\@spectwofr{#2}
   \gdef\@spectworec{#3}}
\def\@spectwowid{}\def\@spectwofr{}\def\@spectworec{}
\def\specthree#1#2#3{\gdef\@specthreewid{#1}\gdef\@specthreefr{#2}
   \gdef\@specthreerec{#3}}
\def\@specthreewid{}\def\@specthreefr{}\def\@specthreerec{}
\def\specfour#1#2#3{\gdef\@specfourwid{#1}\gdef\@specfourfr{#2}
   \gdef\@specfourrec{#3}}
\def\@specfourwid{}\def\@specfourfr{}\def\@specfourrec{}
\def\specfive#1#2#3{\gdef\@specfivewid{#1}\gdef\@specfivefr{#2}
   \gdef\@specfiverec{#3}}
\def\@specfivewid{}\def\@specfivefr{}\def\@specfiverec{}
\def\specsix#1#2#3{\gdef\@specsixwid{#1}\gdef\@specsixfr{#2}
   \gdef\@specsixrec{#3}}
\def\@specsixwid{}\def\@specsixfr{}\def\@specsixrec{}
%
% Define title and authors format (\frontpage)
%
\def\frontpage{ \if@pico \picofront \else \pdbifront \fi \normalsize}
%
% Pico Veleta first page
%
\def \picofront {
\small
\setlength{\unitlength}{1mm}
\noindent\begin{picture}(185,275)(0,0)
%
\put(0,269){\Huge IRAM}
%
\put(25,275){\makebox(0,0)[tl]{\parbox[t]{100mm}
{ 
\begin{raggedright}
{\bf 300, rue de la Piscine\\
38406 ST. MARTIN d'HERES (France)\\
Fax: 76 51 59 38\\
\vspace{3mm}
{\large \bf PROPOSAL FOR 30m RADIOTELESCOPE}}\\
Deadline: \deadline\ -- Period: \period
\end{raggedright} 
}}} 
%
% Box for Proposal number
\put(127,252){\framebox(56,23){ } }
\put(155,271){\makebox(0,0)[b]{\bf For IRAM use}}
\put(127,269){\line(1,0){56}}
\put(128,262){Registration N$^\circ$:}
\put(128,255){Date: }
%
% Title box:
\thicklines\put(0,230){\framebox(183,18){}}
\thinlines
\put(3,243){{\bf TITLE} {\em (self-explanatory)}}
\if@noblank
\put(92,240){\makebox(0,0){\parbox[t]{170mm}
{\begin{center}\large\bf\@title\end{center}}}}
\fi
%
% Proposal type:
\put(0,226){{\bf Type:} 
extragalactic: continuum \check{\if@exgalcont} 
~CO lines \check{\if@exgalco} 
other \check{\if@exgalother} }
%
\put(0,220){galactic: continuum \check{\if@galcont}
lines \check{\if@gallines} ~circumstel. env. \check{\if@galcse}
young stel. obj. \check{\if@galyse}
cloud struct. \check{\if@galcloud} ~chem. \check{\if@galchem}
other \check{\if@galother} }
%
% Abstract box:
\thicklines\put(0,174){\framebox(183,43){}}
\thinlines
\put(3,211){\bf ABSTRACT}
\put(3,176){\em (max. 8 lines)}
\if@noblank
\put(7,209){\makebox(0,0)[tl]{\parbox[t]{170mm}{\@abstract}}}
\fi
% 
% Resubmission ?
\put(0,169){  Is this a resubmission of a previous proposal ?}
\put(81,169){  no \nocheck{\if@resubmit} }
\put(93,169){  yes \check{\if@resubmit} ;}
\put(108,169){  proposal number: \ldots}
\if@noblank\if@resubmit\put(150,169){\@resubmitn}\fi \fi
%
% Continuation ?
\put(0,161){  Is this a continuation  of (a) previous proposal(s) ?}
\put(81,161){  no \nocheck{\if@continue} }
\put(93,161){  yes \check{\if@continue} ;}
\put(108,161){  proposal number(s): \ldots}
\if@noblank\if@continue\put(150,161){\@continuen}\fi\fi
%
\put(0,159){\line(1,0){185}}
% Hours requested
\put(0,156){  {\bf hours} requested for this period:}
\thicklines
\if@noblank\put(26,146){\framebox(16,7){\bf \@hours} }
\else\put(26,146){\framebox(16,7){} }
\fi
\thinlines
\put(53,152){  LST range(s):}
\if@noblank\put(85,152){  from: \@lstaa}\else\put(85,152){  from:}\fi
\if@noblank\put(112,152){  to: \@lstab}\else\put(112,152){  to:}\fi
\if@noblank\put(132,152){  number of intervals: \@lstac}
\else\put(132,152){  number of intervals:}\fi
\if@noblank\put( 85,146){  from: \@lstba}\else\put( 85,146){  from:}\fi
\if@noblank\put(112,146){  to: \@lstbb}\else\put(112,146){  to:}\fi
\if@noblank\put(132,146){  number of intervals: \@lstbc}
\else\put(132,146){  number of intervals:}\fi
%
\put(0,144){\line(1,0){185}}
%
\put(0,138){  {\bf Number of hours} foreseen 
for full completion of this proposal:}
\if@noblank\put(102,135.5){\framebox(15,7){\@totalhoursa}}
\else\put(102,135.5){\framebox(15,7){ }}\fi
\put(117,138){  of which}
\if@noblank\put(135,135.5){\framebox(15,7){\@totalhoursb}}
\else\put(135,135.5){\framebox(15,7){}}\fi
\put(150,138){  were already allocated}
\put(0,134){\line(1,0){185}}
\put(0,130){  Special requirements {\em(dates, etc...)}:}
\if@noblank\put(60,130){\@specials}\fi
\put(0,128){\line(1,0){185}}
%
% Receivers
\put(0,121) {\normalsize\bf Receivers:} 
\put(22,124) {3mm1  \check{\if@threemmone}}
\put(22,119) {3mm2  \check{\if@threemmtwo}}
\put(42,124) {2mm   \check{\if@twomm}}
\put(62,124) {230G1 \check{\if@onemmone}}
\put(62,119) {230G2 \check{\if@onemmtwo}}
\put(82,124) {0.8mm \check{\if@pointeightmm}}
\put(102,124) {bolometer  \check{\if@bolo}}
\put(102,119) {(\em see Table of Compatibilities)}

%
% Frequencies
\put(0,115){{\normalsize\bf Frequencies$^*$:} (to 0.1 GHz and corrected
for redshift) }
\put(90,114){\makebox(95,10)[b]{\dotfill} }
\put(0,109){\makebox(185,10)[b]{\dotfill} } 
\if@noblank\put(90,115){\@frequenciesone}\fi
\if@noblank\put(0,110){\@frequenciestwo}\fi
%
% Source list
\thicklines
\put(0,6){\framebox(185,101) { } }
\thinlines
\put(92,6){\line(0,1){101}}
\put(2,99){{\normalsize \bf List of Objects} (give most common names)}
\put(2,95){with equatorial coordinates}
\put(2,12){(continue on next page, if needed)}
%no more%\put(2,8){please send also be e-mail if list is long)} 
\put(29,91){EPOCH:}
\if@noblank\put(43,91){\@epoch}\fi
\put(5,87){Source}
\put(32,87){RA}
\put(54,87){DEC}
\put(1,85){\line(1,0){90}}
\put(1,18){\line(1,0){90}}
\put(23,85){\line(0,-1){66}}
\put(47,85){\line(0,-1){66}}
\put(70,85){\line(0,-1){66}}
\if@noblank\put(0,84){\makebox(0,0)[tl]{\parbox[t]{86mm}{
\begin{tabular}{p{20mm}p{20mm}p{20mm}p{20mm}}\@sourcelist \end{tabular}} } }\fi
%
% Investigators
\put(94,103) {{\bf Principal Investigator:}} 
\put(94,99) {name, institution, address, fax, e-mail:}
\if@noblank\put(94,96){\makebox(0,0)[tl]{\parbox[t]{85mm}{\@first}}} \fi
\put(94,55){{\bf Other Investigators} (name, institution,fax):}
\if@noblank\put(94,53){\makebox(0,0)[tl]{\parbox[t]{80mm}{\@others}}}\fi
\if@noblank\put(94,12){{\bf Expected observer(s)} \@observer}
\else\put(94,12){\bf Expected observer(s)}\fi
%
\put(0,1){\em join to this form: scientific aims($\leq 2$ typed pages
+ 1 page Figs., Tables) and list of related publications}
\put(165,1){\em $^*$imperatively}
\end{picture}  }
%
%Plateau de Bure first page
\def\pdbifront {
\small
\setlength{\unitlength}{1mm}
\noindent\begin{picture}(185,275)(0,0)
%
\put(0,269){\Huge IRAM}
%
\put(25,275){\makebox(0,0)[tl]{\parbox[t]{100mm}
{ 
\begin{raggedright}
{\bf 300, rue de la Piscine\\
38406 ST. MARTIN d'HERES (France)\\
Fax: 76 51 59 38\\
\vspace{3mm}
{\large \bf PROPOSAL FOR INTERFEROMETER}}\\
Deadline: \deadline - Period: \period
\end{raggedright} 
}}} 
%
% Box for Proposal number
\put(127,252){\framebox(58,23){ } }
\put(155,271){\makebox(0,0)[b]{\bf For IRAM use}}
\put(127,269){\line(1,0){58}}
\put(128,262){Registration N$^\circ$:}
\put(128,255){Date: }
%
%
% Title box:
\thicklines\put(0,235){\framebox(185,15){}}
\thinlines
\put(3,245){\bf TITLE}
\if@noblank
\put(92,242){\makebox(0,0){\parbox[t]{170mm}
{\begin{center}\large\bf\@title\end{center}}}}
\fi
%
%
% Proposal type:
\put(  0,230){\bf CATEGORY:} 
\put( 55,230){\makebox(0,0)[br]{1.3mm: \check{\if@onemmcat} }}
\put( 85,230){\makebox(0,0)[br]{3mm: \check{\if@threemmcat} }}
\put(117,230){\makebox(0,0)[br]{dual freq.: \check{\if@dualfrcat} }}
\put(145,230){\makebox(0,0)[br]{special: \check{\if@specialcat} }}
\put(0,227)  {\line(1,0){185}}
\put(  0,223){{\bf Scientific type:} - {\em extragalactic}: }
\put( 85,223){\makebox(0,0)[br]{continuum \check{\if@exgalcont} }}
\put(117,223){\makebox(0,0)[br]{CO lines \check{\if@exgalco} }}
\put(145,223){\makebox(0,0)[br]{other \check{\if@exgalother} }}
\put(  0,218){- {\em galactic}: continuum \check{\if@galcont} }
\put( 55,218){\makebox(0,0)[br]{lines \check{\if@gallines} }}
\put( 85,218){\makebox(0,0)[br]{circumstel. env. \check{\if@galcse} }}
\put(117,218){\makebox(0,0)[br]{young stel. obj. \check{\if@galyse} }}
\put(145,218){\makebox(0,0)[br]{cloud struct. \check{\if@galcloud} }}
\put(165,218){\makebox(0,0)[br]{chem. \check{\if@galchem} }}
\put(185,218){\makebox(0,0)[br]{other \check{\if@galother} }}
\put(  0,213){\bf Observing type:}
\put( 55,213){\makebox(0,0)[br]{mapping \check{\if@mapping} }}
\put( 85,213){\makebox(0,0)[br]{detection \check{\if@detection} }}
\put(117,213){\makebox(0,0)[br]{size measure \check{\if@sizemeasure} }}
\put(145,213){\makebox(0,0)[br]{snapshot \check{\if@snapshot} }}
\put(165,213){\makebox(0,0)[br]{mosaic \check{\if@mosaic} }}
\put(185,213){\makebox(0,0)[br]{other \check{\if@othertype} }}
%
% Abstract box:
\thicklines\put(0,162){\framebox(185,48){}}
\thinlines
\put(3,204){\bf ABSTRACT}
\if@noblank
\put(7,202){\makebox(0,0)[tl]{\parbox[t]{170mm}{\@abstract}}}
\fi
% 
% Resubmission ?
\put(  0,157){  Is this a resubmission of a previous proposal ?}
\put( 81,157){  no \nocheck{\if@resubmit} }
\put( 93,157){  yes \check{\if@resubmit} ;}
\put(108,157){\makebox(70,20)[br]{  proposal number(s): \dotfill}}
\if@noblank\if@resubmit\put(140,157){\@resubmitn}\fi \fi
%
% Continuation ?
\put(  0,152){  Is this a continuation  of (a) previous proposal(s) ?}
\put( 81,152){  no \nocheck{\if@continue} }
\put( 93,152){  yes \check{\if@continue} ;}
\put(108,152){\makebox(70,20)[br]{  proposal number(s): \dotfill}}
\if@noblank\if@continue\put(140,152){\@continuen}\fi\fi
%
\put(0,147){\line(1,0){185}}
% Hours requested
\put(0,143){  LST range(s) per configuration}
\if@noblank\put( 72,143){  from: \@lstaa}\else\put(72,143){  from:}\fi
\if@noblank\put(100,143){  to: \@lstab}\else\put(100,143){  to:}\fi
\if@noblank\put(120,143){  number of intervals: \@lstac}
\else\put(120,143){  number of intervals:}\fi
\if@noblank\put( 72,135){  from: \@lstba}\else\put( 72,135){  from:}\fi
\if@noblank\put(100,135){  to: \@lstbb}\else\put(100,135){  to:}\fi
\if@noblank\put(120,135){  number of intervals: \@lstbc}
\else\put(120,135){  number of intervals:}\fi
%
\put(0,134){\line(1,0){185}}
%\put(0,134){  Special requirements {\em(dates, etc...)}:}
%\if@noblank\put(60,134){\@specials}\fi
%\put(0,131){\line(1,0){185}}
%
\put(0,126){\normalsize\bf Configurations:
%\put(0,118){\normalsize\bf 
%% ~~~A1 \check{\if@confaone} ~~~A2 \check{\if@confatwo} 
~~~A \check{\if@confa}
~~~B1 \check{\if@confbone} ~~~B2 \check{\if@confbtwo} 
~~~C1 \check{\if@confcone} ~~~C2 \check{\if@confctwo} 
%%~~~D1 \check{\if@confdone} ~~~D2 \check{\if@confdtwo} 
~~~D \check{\if@confd}
}
%
%
% Frequencies
\put(0,119){\normalsize{\bf Frequencies} (exact)  3mm:}
\if@noblank\put(60,119){\@frequenciesone}\fi
\put(100,119){\normalsize 1.3mm:}
\if@noblank\put(120,119){\@frequenciestwo}\fi
%
% Source list
\thicklines
\put(0,6){\framebox(185,101) { } }
\thinlines
\put(92,6){\line(0,1){101}}
\put(2,99){{\normalsize \bf List of Objects} (give most common names)}
\put(2,95){with equatorial coordinates in J2000 (accurate }
\put(2,91){to 2$''$) and LSR velocities}
\put(2,12){(continue on next page, if needed)}
%%\put(2,8){please send also be e-mail if list is long)} 
%%
% \if@noblank\put(3,88){\makebox(0,0)[tl]{\parbox[t]{86mm}{\@sourcelist} } }\fi
%% \put(29,91){EPOCH:}
%% \if@noblank\put(43,91){\@epoch}\fi
\put(5,87){Source}
\put(32,87){RA}
\put(54,87){DEC}
\put(1,85){\line(1,0){90}}
\put(1,18){\line(1,0){90}}
\put(23,85){\line(0,-1){66}}
\put(47,85){\line(0,-1){66}}
\put(70,85){\line(0,-1){66}}
\if@noblank\put(0,84){\makebox(0,0)[tl]{\parbox[t]{86mm}{
\begin{tabular}{p{20mm}p{20mm}p{20mm}p{20mm}}\@sourcelist \end{tabular}} } }\fi
%%
%
% Investigators
\put(94,103) {{\bf Principal Investigator:}} 
\put(94,99) {name, institution, address, fax, e-mail:}
\if@noblank\put(94,96){\makebox(0,0)[tl]{\parbox[t]{85mm}{\@first}}} \fi
\put(94,55){{\bf Other Investigators} (name, institution,fax):}
\if@noblank\put(94,53){\makebox(0,0)[tl]{\parbox[t]{80mm}{\@others}}}\fi
\if@noblank\put(94,12){{\bf who will reduce data:} \@reducer}
\else\put(94,12){\bf who will reduce data}\fi
%
\put(0,1){\em join to this form: scientific aims($\leq 2$ typed pages
+ 1 page Figs., Tables) and list of related publications}
\end{picture}  }
%\put(95,90){\makebox(0,0)[tl]{\parbox[t]{85mm}{\@first}}}
%\put(95,45){\makebox(0,0)[tl]{\parbox[t]{80mm}{\@others}}}
%\put(125,8){\@reducer}
%\end{picture}}

%
% Define Technical sheet for Plateau de Bure
\def\techsheet{
\if@pico
\else
{\small
\begin{center}
{\bf IRAM Plateau de Bure Interferometer:
Proposal Technical Summary}\\
{\em Please fill one sheet per frequency setup}
\end{center}
\begin{itemize}
\item {\bf Program Title:}\\
\if@noblank \begin{center}\large\bf\@title\end{center} \fi
\item {\bf Source position and velocity:}\\
\if@noblank \@techsourcelist \fi
\item {\bf Category and Project type:}  
\if@noblank{
\if@onemmcat   {1.3-mm~}\fi
\if@threemmcat   {3-mm~}\fi
\if@dualfrcat   {dual-frequency~}\fi
\if@specialcat   {{\em \underline{Special}}~}\fi
\if@exgalcont  {continuum~}\fi
\if@exgalco    {lines~}\fi
\if@galcont   {continuum~} \fi
\if@gallines   {lines~}\fi
\if@mapping {mapping~}\fi
\if@detection    {detection~}\fi
\if@sizemeasure {size~measurement~}\fi
\if@snapshot    {snapshots~}\fi
\if@mosaic      {mosaic~}\fi
\if@othertype   {other type~}\fi }\fi
\item {\bf Size of largest structure in (arcseconds)}
\if@noblank \@structuresize \fi
\item {\bf Expected continuum flux:}  
\if@noblank \@continuumflux \fi
\item {\bf Expected continuum source size:}
\if@noblank \@continuumsize \fi
\item {\bf For pure continuum projects:}
\begin{itemize}
\item {\it Preferred observing frequency:}
\if@noblank \@continuumfreq \fi
\item {\it Expected Line contamination at observing frequency:}
\if@noblank \@contamination \fi
\item {\it Frequencies to avoid:}
\if@noblank \@avoidfreq \fi
\end{itemize}
\item {\bf For line projects:}
\begin{itemize}
\item {\it Receiver configuration (fill in empty columns) :}\\
{\tt \begin{tabular}{l|l|l|l|l}
& {\em line name} & {\em Freq. (GHz)} & {\em band} & \\
\hline
LINE & \if@noblank\@reconeline\fi & \if@noblank\@reconefr\fi
& \if@noblank\@reconeband\fi & /RECEIVER 1\\
LINE & \if@noblank\@rectwoline\fi & \if@noblank\@rectwofr\fi
& \if@noblank\@rectwoband\fi & /RECEIVER 2\\
\hline
\end{tabular}}

\item {\it Correlator configuration (fill in empty columns) : }\\
{\tt \begin{tabular}{l|l|l|l|l}
             & {\em width} & {\em freq.} & & {\em Receiver} \\
\hline
SPECTRAL 1 &\if@noblank\@speconewid\fi 
& \if@noblank\@speconefr\fi 
& /RECEIVER & \if@noblank\@speconerec\fi\\
SPECTRAL 2 &\if@noblank\@spectwowid\fi 
& \if@noblank\@spectwofr\fi 
& /RECEIVER & \if@noblank\@speconerec\fi\\
SPECTRAL 3 &\if@noblank\@specthreewid\fi 
& \if@noblank\@specthreefr\fi 
& /RECEIVER & \if@noblank\@specthreerec\fi\\
SPECTRAL 4 &\if@noblank\@specfourwid\fi 
& \if@noblank\@specfourfr\fi 
& /RECEIVER & \if@noblank\@specfourrec\fi\\
SPECTRAL 5 &\if@noblank\@specfivewid\fi 
& \if@noblank\@specfivefr\fi 
& /RECEIVER & \if@noblank\@specfiverec\fi\\
SPECTRAL 6 &\if@noblank\@specsixwid\fi 
& \if@noblank\@specsixfr\fi 
& /RECEIVER & \if@noblank\@specsixrec\fi\\
 \hline
 \end{tabular} }
\item {\it Expected width of spectral line (to zero power) 
and narrowest feature:}
\if@noblank \@linezerowidth \fi
\item {\it Number of lines observed simultaneously 
(add sketch of frequency setup):}
\if@noblank \@numberlines \fi
\item {\it Line frequencies:}
\if@noblank \@linefreq \fi
\item {\it Expected source size in each line:}
\if@noblank \@linesize \fi
\item {\it Expected line strength:}
\if@noblank \@linestrength \fi
\end{itemize}
\item {\bf For detection projects:}
\begin{itemize}
\item {\it Configuration required (BC, CD other):}
\if@noblank \@configuration \fi
\item {\it Observing time required:}
\if@noblank \@observingtime \fi
\end{itemize}
\item {\bf For snapshot or size measurements:}
\begin{itemize}
\item {\it Baseline range in meters:}
\if@noblank \@baselinerange \fi
\item {\it Configuration list:}
\if@noblank \@configlist \fi
\item {\it Number of hour angles per baseline:}
\if@noblank \@hourangles \fi
\item {\it Observing time per hour angle:}
\if@noblank \@hourangletime \fi
\end{itemize}
\item {\bf Phase Calibrators (2 or more):}
\if@noblank \@phasecalibrators \fi
\item {\bf Amplitude Calibrator:}
\if@noblank \@ampcalibrator \fi
\item {\bf Required accuracy of bandpass calibration:}
\if@noblank \@bandpass \fi
\item {\bf Special requirements:}
\if@noblank \@specials \fi
\end{itemize}}
\newpage
\fi}
%
\def\maketitle{
\if@noblank
\begin{center}{\Large\bf\@title}\end{center}
\fi}