Dear Friends,
This is really sad. Our Dept. is arranging a Condolence Meeting in his memory.
Apart from various other job at the AMS related to Mathematics, here is one
programme written by this departed soul, and one which many of us use quite heavily.
A little browsing through the code shall reveal the power of TeX as a
programming language --- an aspect almost shadowed by its extra-ordinary DTP
capabilities.
------------------------------- One program written by Michael Downes
------------------------------------------------
%% @texfile{
%% filename="empcover.tex",
%% version="3.6",
%% date="5-JUL-2001",
%% filetype="TeX: template",
%% copyright="Copyright (C) American Mathematical Society,
%% all rights reserved. Copying of this file is
%% authorized only if either:
%% (1) you make absolutely no changes to your copy
%% including name; OR
%% (2) if you do make changes, you first rename it to some
%% other name.",
%% author="American Mathematical Society,
%% address="American Mathematical Society,
%% Electronic Products and Services,
%% P. O. Box 6248,
%% Providence, RI 02940,
%% USA",
%% telephone="401-455-4080 or (in the USA) 800-321-4AMS",
%% email="[EMAIL PROTECTED]",
%% codetable="ISO/ASCII",
%% keywords="employment,application,coversheet"
%% abstract="This file prompts the user for the various fields which
%% are to be inserted into a standardized coversheet for
%% an application for employment in Mathematics. It follows
%% the format for a coversheet provided by the AMS as an aid
%% to departments in processing job applications.
%%
%% Instructions for use: Run the file through Plain TeX
%% (not LaTeX or AMS-TeX) and reply to the prompts."
%% }
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcount\infile
\infile=-100
\newcount\TempCount
\newbox\SizeBox
[EMAIL PROTECTED]
%% provide an alternate comment character to permit % signs in e-mail addresses
\catcode`\^^A=14
^^A%%*************************************************************************
^^A%% IF YOU MAKE ANY CHANGES TO THIS FILE, REMEMBER THAT THE COMMENT CHARACTER
^^A%% IS NOW ^^A RATHER THAN %. FROM THIS POINT ON IN THIS FILE, % IS A
^^A%% PRINTABLE CHARACTER.
^^A%%*************************************************************************
^^A%% make % and some other characters type "other" for e-mail address use
\catcode`\%=12
\catcode`\_=12
\catcode`\~=12
\newlinechar=`\^^J
\def\ifundefined#1{\expandafter\ifx\csname#1\endcsname\relax}
\ifundefined{LaTeX}\else
\immediate\write16{^^J^^J**************************************************
^^JYou are using LaTeX rather than Plain TeX.
^^JPlease use Plain TeX for this file. ^^JIt cannot be run through LaTeX.
^^JThe correct command is: tex \jobname
^^J**************************************************^^J^^J}
\@@end\fi
\ifundefined{AmSTeX}\else
\immediate\write16{^^J^^J**************************************************
^^JYou are using AMS-TeX rather than Plain TeX.
^^JPlease use Plain TeX for this file. ^^JIt cannot be run through AMS-TeX.
^^JThe correct command is: tex \jobname
^^J**************************************************^^J^^J}
\end\fi
\def\Instructions{\immediate\write16{^^A%
This file will prompt you for data to be used in typesetting the
^^Jstandard coversheet to accompany applications for employment in the
^^JMathematical Sciences. When you have entered all the information, it
^^Jis written to a file so that you can use it again. You can also edit
^^Jthe data file, or have several different data files which you create
^^Jby editing the data file output by your original run.
^^J
^^JIf this is the first time that you are running this file, or if you do
^^Jnot wish to use previous data, reply when asked, that you want to
^^Jenter data from the keyboard. If you make errors in typing, do not
^^Jworry. You will be able to edit the data file produced by your initial
^^Jrun, so that you can correct any errors (or make any updates) as you
^^Jwish. You can name the file whatever you wish when you are prompted to
^^Jdo so, but if you enter no filename the default will be \jobname.dat.
^^J
^^JThe TeX run will output a file called \jobname.dvi, which you can
^^Jprint using the same software you use for printing other TeX jobs.
^^J
^^JIf you wish to edit the data file produced by running this, be sure
^^Jthat you do not alter the format of the data file, just the contents
^^Jof the rows which contain data.
^^J
^^JPress ``Enter'' to continue.}
\read-1 to \TempFieldOne}
\immediate\write16{^^J^^JDo you want instructions for using this file?}
\read-1 to \TempFieldOne
\if y\TempFieldOne\Instructions\fi
\if Y\TempFieldOne\Instructions\fi
^^A%% predefine negative responses to avoid problems if responses are bypassed
\def\WantTemp{N}
\def\WantPostDoc{N}
\def\WantTwoYear{N}
\def\WantOneYear{N}
\def\LetterOne{N}
\def\LetterTwo{N}
\def\LetterThree{N}
\def\LetterFour{N}
^^A%% initialize string of data to be written to output file.
\def\OutData{^^A%
%% This is a data file for the TeX file which typesets a coversheet for
^^J%% applications for employment in the Mathematical Sciences. If you make
^^J%% any changes to the data in this file, be sure that you DO NOT remove
^^J%% any lines (except in the one case where you may be instructed to do so)
^^J%% because when this file is input, the TeX file will expect all lines,
^^J%% including those which look like comments, to be in the file. You may
^^J%% edit the contents of the data lines however you wish. You may also
^^J%% make several copies of this file with different data, to be used for
^^J%% different runs of the TeX file.^^J}
^^A% \TopcommentLines should give the number of lines in the above string.
\def\TopCommentLines{9}
^^A%%%%%%%%%%%%%%%%% Define the macros for reading input from user.
\long\def\Extract#1#2\\{#1}
\def\GetYN #1\\#2\\#3\\{^^A%
\ifnum\infile < 0 \immediate\write16{#1}
\setbox\SizeBox=\hbox{#2}
\ifdim\wd\SizeBox=0pt\edef\OutData{\OutData %%#1^^J}
\else\edef\OutData{\OutData %%#2^^J}
\fi
\else
\read\infile to \DummyData
\fi
\read\infile to \TempFieldOne
\def\TempFieldTwo{\expandafter\Extract\TempFieldOne\\}
\if y\TempFieldTwo
\gdef #3{Y}
\else
\if Y\TempFieldTwo
\gdef #3{Y}
\fi
\fi
\ifnum\infile < 0 \edef\OutData{\OutData #3^^J}\fi
}
^^A%% usage: \expandafter\EatChar\CharsNotEaten|
\def\CharJustEaten{}
\def\EatChar #1#2|{\gdef\CharJustEaten{#1}\gdef\CharsNotEaten{#2}}
\def\Ask#1\\#2\\#3\\{^^A%
\ifnum\infile < 0 \immediate\write16{#1}
\setbox\SizeBox=\hbox{#2}
\ifdim\wd\SizeBox=0pt\edef\OutData{\OutData %%#1^^J}
\else\edef\OutData{\OutData %%#2^^J}
\fi
\else
^^A%% read in and throw away description of next data item from input file
\read\infile to \DummyData
\expandafter\EatChar \DummyData|
\expandafter\EatChar \CharsNotEaten|
\expandafter\EatChar \CharsNotEaten|
\if S\CharJustEaten
\expandafter\EatChar \CharsNotEaten|
\if o\CharJustEaten
\immediate\write16{^^J^^JYOU HAVE USED A DATA FILE WHICH WAS PRODUCED BY A PREVIOUS
^^JVERSION OF THIS TeX FILE. IT IS NOT COMPATIBLE WITH THIS VERSION. YOU MUST
^^JENTER THE DATA MANUALLY THE FIRST TIME YOU USE THIS VERSION OF THE
^^JCOVERSHEET TEX FILE. PLEASE START AGAIN AND ENTER THE DATA MANUALLY.
^^JFOR FUTURE RUNS, YOU WILL BE ABLE TO USE THE DATA PRODUCED BY THIS RUN.}
YOU HAVE USED A DATA FILE WHICH WAS PRODUCED BY A PREVIOUS
VERSION OF THIS TeX FILE. IT IS NOT COMPATIBLE WITH THIS VERSION. YOU
MUST ENTER THE DATA MANUALLY THE FIRST TIME YOU USE THIS VERSION OF THE
COVERSHEET TEX FILE. PLEASE START AGAIN AND ENTER THE DATA MANUALLY.
FOR FUTURE RUNS, YOU WILL BE ABLE TO USE THE DATA PRODUCED BY THIS RUN.
\fi
\fi
\fi
\read\infile to #3
\ifnum\infile < 0 \edef\OutData{\OutData #3^^J}\fi
}
^^A%%%%%%%%%%%%%%%%
^^A%%%%%%%%%%%%%%%% Find out if input is to be taken from stdin or file.
\immediate\write16{^^J^^JDo you wish to provide data from the keyboard, or is
^^Jthere an existing data file from a previous run of this TeX file?
^^JEnter 0 if input is to be from keyboard, 1 if from a file.}
\loop
\read-1 to \InputSource
\if0\InputSource\infile=-1\else\if1\InputSource\infile=3\fi\fi
^^A \immediate\write16{infile is \infile; InputSource is \InputSource}
\def\DummyData{\infile}
\ifnum\infile < -1
\immediate\write16{Please enter either 0 or 1.}
\repeat
\ifnum\infile>0
\def\DataFile{\jobname.dat}
\loop
\immediate\write16{What is the name of the file which you wish to open?
^^J(default is \jobname.dat): }\read-1 to \DataFile
\setbox\SizeBox=\hbox{\DataFile}
\ifdim\wd\SizeBox < 1pt
\openin\infile=\jobname.dat
\else
\openin\infile=\DataFile
\fi
\ifeof\infile\immediate\write16{I cannot open the file \DataFile.
^^JEither it does not exist, or it is not in the current directory.}
\repeat
\TempCount=0
\loop
\read\infile to \DummyData
\advance\TempCount by 1
\ifnum\TempCount < 9
\repeat
\else
\immediate\write16{
^^J^^JPlease provide the following information for the coversheet.
^^JThen, print out the resulting .dvi file and use it as the coversheet for
^^Jyour applications for employment in Mathematics.
^^JIf any fields are not relevant, leave them blank.^^J}
\fi
^^A%%%%*********************************************************************
^^A%%%%*********************************************************************
^^A%%%%*********************** get input from user
\Ask First name: \\\\\FirstName\\
\Ask Middle name or initial: \\\\\MiddleName\\
\Ask Last name: \\\\\LastName\\
^^A% Social security number removed 7/96
^^A%%%\Ask Social Security Number (optional): \\\\\SocSecNumber\\
\ifnum\infile<0
\immediate\write16{^^A%
You can now enter up to three address lines. If you need only two, you
^^Jmay leave the last one blank.^^J}
\fi
\Ask First Address Line: \\\\\AddressLineOne\\
\Ask Second Address Line: \\\\\AddressLineTwo\\
\Ask Third Address Line: \\\\\AddressLineThree\\
\Ask Area code of work phone number: \\\\\WorkAreaCode\\
\Ask Work phone number (no area code): \\\\\WorkPhone\\
\Ask Area code of home phone number: \\\\\HomeAreaCode\\
\Ask Home phone number (no area code): \\\\\HomePhone\\
\Ask e-mail address: \\\\\Eddress\\
\Ask Current institutional affiliation (including department if appropriate):
\\\\\CurrentAffil\\
\Ask Highest degree held or expected: \\\\\HighDegree\\
\Ask Institution which awarded (or will award) highest
degree:\\\\\GrantingInstitution\\
\Ask Date of highest degree (optional): \\\\\HighDegreeDate\\
\Ask Name of Ph.D. advisor: \\\\\PhDAdvisor\\
\Ask Ph.D. Thesis Title (optional): \\\\\ThesisTitle\\
\Ask Indicate the mathematical subject areas in which you
have done ^^Jresearch using, if applicable, the Mathematics
Subject Classification.
^^JIf listing more than one number, list first the one number which best
^^Jdescribes your current primary interest.^^JPrimary Interest:
\\Mathematics Subject Classification of primary interest:\\\PrimarySub\\
\Ask Secondary Interest: \\\\\SecondarySub\\
\Ask Give a brief synopsis of your current research
interests ^^J(e.g. finite group actions on four-manifolds). ^^JAvoid
special mathematical symbols, and do not use `newline' characters.
\\Current Research:\\\CurrentResearch\\
\Ask ^^JTitle of the most recent post-Ph.D. position you have held (if any):
\\Most recent post-Ph.D. position:\\\RecentTitle\\
\Ask What is the university or company where you have held that position?
\\Employer of most recent post-Ph.D. position:\\\RecentEmployer\\
\Ask What were the dates of that employment?\\\\\EmployDates\\
\Ask Indicate the position for which you are applying,
^^Jand position posting code if applicable:
\\Position for which you are applying:\\\Position\\
\GetYN If unsuccessful for this position, would you like to be
considered for a^^Jtemporary position? (answer Y or N)
\\Want temp position? (If you change from Y to N,
delete next 3 items)\\\WantTemp\\
\if Y\WantTemp
\GetYN Please indicate whether you are interested in a temporary
^^JPostdoctoral position, a 2+-year position, or a 1-year position.
^^J1. Would you be interested in a temporary postdoctoral position? (Y or N)
\\Interested in temporary postdoctoral position?\\\WantPostDoc\\
\GetYN 2. Would you be interested in a temporary 2+-year position? (Y or N)
\\Interested in temporary 2+-year position?\\\WantTwoYear\\
\GetYN 3. Would you be interested in a temporary 1-year position? (Y or N)
\\Interested in temporary 1-year position? \\\WantOneYear\\
\fi ^^A%% end if Y \WantTemp
\ifnum\infile < 0
\immediate\write16{List the names, affiliations, and e-mail addresses of
^^Jup to four individuals who will provide letters of recommendation if asked.}
\fi
\Ask First Reference: \\\\\ReferenceOne\\
\GetYN Have you already asked this person to send a letter?
(Y or N)\\\\\LetterOne\\
\Ask Second Reference: \\\\\ReferenceTwo\\
\GetYN Have you already asked this person to send a letter?
(Y or N)\\\\\LetterTwo\\
\Ask Third Reference: \\\\\ReferenceThree\\
\GetYN Have you already asked this person to send a letter?
(Y or N)\\\\\LetterThree\\
\Ask Fourth Reference: \\\\\ReferenceFour\\
\GetYN Have you already asked this person to send a letter?
(Y or N)\\\\\LetterFour\\
\ifnum\infile < 0
\immediate\write16{I will now write the data out to a file.
^^JWhat filename do you wish to use? (default=\jobname.dat) }
\read-1 to \DataFile
\setbox\SizeBox=\hbox{\DataFile}
\ifdim\wd\SizeBox=0pt\def\DataFile{\jobname.dat}\fi
\openout4=\DataFile\write4{\OutData}
\closeout4
\else
\closein\infile
\fi
^^A%%End data input
^^A%%%%*********************************************************************
^^A%%%%*********************************************************************
^^A%% Build the page - First, set dimensions etc.
\voffset-0.5in
\vsize=10in
\hsize=7in
\parindent=0pt
\parskip0pt
\nopagenumbers
\font\bigboldfont=cmbx10 scaled \magstep4
\font\entryfont=cmti10
\font\entryfontb=cmti9
\font\emailfont=cmtt7
\font\eightrm=cmr8
\tenrm
\def\entrybaseline{\baselineskip18pt}
\def\textbaseline{\baselineskip12pt}
\def\smallbaseline{\baselineskip10pt}
\lineskip0pt
\textbaseline
\newdimen\labelwidth
\labelwidth=9pc
\def\Label#1{\hbox to \labelwidth{#1\hfill}}
\def\AddressLine #1\\#2\\{\line{\hbox to 26pc{#1}\hfill\hbox to 12pc{#2}}}
^^A%% checkbox
\def\checkbox{\leavevmode\vbox to 9pt{\hrule \vss
\hbox to 9pt{\vrule height 9pt \hfil\vrule height 9pt}\vss
\hrule}\ }
^^A%%\checkbox with the box checked off
\def\checkedbox{\leavevmode\vbox to 9pt{\hrule \vss
\hbox to 9pt{\vrule height 9pt \hss
\raise 1.3pt\hbox{\kern 1.7pt\tt X}\hss
\vrule height 9pt}\vss \hrule}\ }
\def\underfill{\kern -4pt\leaders\hbox{\underbar{\mathstrut\phantom{a}}}\hfill}
^^A%%This underlines the entry, and puts it in the appropriate font.
\def\entry#1{\ \ \ \underbar{\entryfont #1}}
\def\entrya#1{\underbar{\entryfont #1}}
^^A%%%%*********************************************************************
^^A%%%%*********************************************************************
^^A%%%%** Typeset the data.
\centerline{\it Academic Employment in Mathematics}
\medskip
\centerline{\bigboldfont AMS Standard Cover Sheet}
\bigskip
This cover sheet is provided as an aid to departments in processing job
applications. It should be included with your other application material.
Please print or type. Do not send this form to the AMS.
\vskip0.5pc
\entrybaseline
\line{\Label{Last (Family) Name:}\entry {\LastName}\underfill\ }
\line{\Label{First Name or Initial:}\entry {\FirstName}\underfill\ }
\line{\Label{Middle Name or Initial:}\entry {\MiddleName}\underfill}
^^A%%%\line{Social Security Number
^^A%%% ({\it optional\/}):\entry{\SocSecNumber}\underfill}
Address through next June:\par\vskip-9pt
\AddressLine \hfill\\Home Phone\hfill\\
\AddressLine \entrya {\AddressLineOne}\underfill\\^^A%
\entrya {(\HomeAreaCode\unskip) \HomePhone}\underfill\\
\AddressLine \entrya {\AddressLineTwo}\underfill\\e-mail address\hfill\\
\AddressLine \entrya {\AddressLineThree}\underfill\\^^A%
\entrya {\emailfont\Eddress}\underfill\\
Current Institutional Affiliation:\par\vskip-9pt
\AddressLine \hfill\\Work Phone\hfill\\
\AddressLine \entrya {\entryfontb\CurrentAffil}\underfill\\^^A%
\entrya {(\WorkAreaCode\unskip) \WorkPhone}\underfill\\
\line{Highest Degree held or expected
\entry{\entryfontb\HighDegree}\underfill}
\line{Granting Institution
\entry{\entryfontb\GrantingInstitution}\underfill\ \ \ \
Date (optional) \entry{\entryfontb\HighDegreeDate}}
\line{Ph.D. Advisor:\entry {\PhDAdvisor }\underfill}
\line{Ph.D. Thesis Title (optional) \entry {\ThesisTitle}\underfill}
\medskip
\smallbaseline
{\eightrm
Indicate the mathematical subject areas in which you have done research
using, if applicable, the Mathematics Subject Classification.
If listing more than one number, list first the one number
which best describes your current primary interest.}
\entrybaseline
\smallskip
\line{Primary Interest \entry {\PrimarySub }\underfill}
\line{Secondary Interests (optional) \entry {\SecondarySub }\underfill}
\medskip
{\smallbaseline
\vbox to 74pt{\hrule \vss\line{^^A%
\vrule height 6pc\hfill
\vbox to 0pt{\vskip-5.5pc\hsize=38pc
{\eightrm\smallbaseline
Give a very brief synopsis of your current research interests in the box
below (e.g. finite group actions on four-manifolds).
Avoid special mathematical symbols.}
\vskip9pt
\entryfontb\smallbaseline \CurrentResearch \vfill}
\hfill\vrule height 6pc}^^A%
\vss \hrule}
}
Most recent position held, if any, post Ph.D.
\line{\Label{University or Company}\entry {\RecentEmployer}\underfill}
\line{\Label{Position Title}\entry {\RecentTitle}\underfill\
\hbox to 2in{Dates \entry{\EmployDates}\underfill}}
Indicate the position for which you are applying and position posting code,
if applicable
\line{\entrya {\Position }\underfill}
If unsuccessful for this position, would you like to be considered for a
temporary position?
\line{\Label{\if Y\WantTemp\checkedbox\ Yes\hfill\checkbox
\else \checkbox\ Yes\hfill\checkedbox\fi\ No}^^A%
If yes, please check the appropriate boxes.\hfill}
\line{\Label{\hfill}
\if Y\WantPostDoc\checkedbox\else\checkbox\fi\ Postdoctoral Position\quad
\if Y\WantTwoYear\checkedbox\else\checkbox\fi\ $2+$ Year Position\quad
\if Y\WantOneYear\checkedbox\else\checkbox\fi\ 1 Year Position\hfill}
List the names and affiliations of up to four individuals who will provide
letters of recommendation if asked. Mark the box provided for each individual
whom you have already asked to send a letter.
\line{\if Y\LetterOne\checkedbox\else\checkbox\fi
\hskip1em 1.\ \entry {\ReferenceOne }\underfill}
\line{\if Y\LetterTwo\checkedbox\else\checkbox\fi
\hskip1em 2.\ \entry {\ReferenceTwo }\underfill}
\line{\if Y\LetterThree\checkedbox\else\checkbox\fi
\hskip1em 3.\ \entry {\ReferenceThree }\underfill}
\line{\if Y\LetterFour\checkedbox\else\checkbox\fi
\hskip1em 4.\ \entry {\ReferenceFour }\underfill}
\bye
---------------------------------------------------------------------------------------------------------------------
--
Partha Pratim Ghosh
-----------------------------------------------------------
Post Doctoral Fellow
Topology and Category Theory Research Group
Department of Mathematics and Applied Mathematics
University of Cape Town
Rondebosch 7701
Cape Town
South Africa
Telephone : (0)27-21-6504527
e-mail : [EMAIL PROTECTED]
[EMAIL PROTECTED]
Home Page : http://www.topos.netfirms.com
-----------------------------------------------------------
"Mathematics is a game, play it..."
"Algebra : Analysis :: Anatomy : Physiology"
"... only algebra is dull and only topology is boring, it is
their mixture that is interesting..."
------------------------------------------------------------
--
To unsubscribe, send mail to [EMAIL PROTECTED] with the body
"unsubscribe ilug-cal" and an empty subject line.
FAQ: http://www.ilug-cal.org/node.php?id=3
