diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /obsolete/macros/plain |
Initial commit
Diffstat (limited to 'obsolete/macros/plain')
-rw-r--r-- | obsolete/macros/plain/contrib/fontch20/DSmac.tex | 5 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/fontch20/README | 338 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/fontch20/TS1mac.tex | 130 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/fontch20/bsymbols.tex | 228 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/fontch20/fontch.tex | 1201 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/siam/READ.ME | 30 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/siam/docuptex.tex | 361 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/siam/pexample.tex | 523 | ||||
-rw-r--r-- | obsolete/macros/plain/contrib/siam/siamptex.sty | 324 |
9 files changed, 3140 insertions, 0 deletions
diff --git a/obsolete/macros/plain/contrib/fontch20/DSmac.tex b/obsolete/macros/plain/contrib/fontch20/DSmac.tex new file mode 100644 index 0000000000..89231af349 --- /dev/null +++ b/obsolete/macros/plain/contrib/fontch20/DSmac.tex @@ -0,0 +1,5 @@ +%% DSmac.tex This file is part of fontch package V2.0 2007/09/04 +%% This stupid file is for avoiding to define a new family when it is not +%% necessary, because a \newfam macro cannot be inside an if structure. +\newfam\dsfam + diff --git a/obsolete/macros/plain/contrib/fontch20/README b/obsolete/macros/plain/contrib/fontch20/README new file mode 100644 index 0000000000..5d8f5703b7 --- /dev/null +++ b/obsolete/macros/plain/contrib/fontch20/README @@ -0,0 +1,338 @@ +README File of the package fontch.tex V2.0 2007/09/04 + fontch.tex: Macros for changing fonts and sizes in plain TeX + + Rodrigo Medina (IVIC) rmedina@ivic.ve + +Suggested locations: .../texmf/tex/plain/fontch/ + .../texmf/doc/tex/fontch/README.txt +Licence: LPPL + +Components +---------- +The fontch V2.0 package is composed of the following files: + README.txt -- This file + fontch.tex -- main macros + bsymbols.tex -- macros for boldface symbols + TS1mac.tex -- macros for the TS1 companion symbols + DSmac.tex -- auxiliary file for the DStroke option + +Description +----------- + This package allows, in plain TeX, to change with a single +command the size of all fonts that are used for text input and math input. +Main text fonts of sizes 8, 10, 12, 14, 20 and 24 points are available. +Fonts of sizes 5, 6, 7 and 9 points are used in subscripts and subscripts of +subscripts of other main sizes. +In addition fontch gives support to: + - boldface math-italic and boldface math symbols, + - T1 Latin Modern fonts, + - TS1 companion symbol fonts. + - AMS fonts for boldface math, + - Double Stroke fonts for blackboard bold symbols + +Requierements +------------- +- In order to use the T1 options LMTone and LMTSone, you need to have installed + the Latin Modern fonts. +- In order to use the AMSfont option you need to have installed the AMS fonts. +- In order to use the DStroke option ou need to have installed the Double + Stroke fonts. + +Installation +------------ + You have only to put the macro files fontch.tex, bsymbols.tex, + TS1mac.tex and DSmac.tex in any sensible place in the texmf tree, like + .../texmf/tex/plain/fontch/ + +It is also commendable to put this README file in a proper place such as + + .../texmf/doc/tex/fontch/README.txt + +Usage +----- + For using fontch.tex with the original TeX OT1 fonts (Computer Modern) +just put at the beginning of the document: + \input fontch.tex + +The file bsymbols.tex provides macro definitions for boldface versions +of math symbols. For using it just input the file where you need it. + +The fontch package has four options for handling different kinds of fonts: + + - LMTone for Latin Modern T1 fonts. + - LMTSone for the TS1 companion symbol font. + - AMSfont for AMS fonts used for boldface math. + - DStroke for Doublestroke fonts providing blackboard-boldface symbols. + +The four options are independent. They are activated by setting the +corresponding variable before calling fontch.tex. For example for +activating all the four options and using the macros for bold math +put at the beginning of the document: + + \let\AMSfont\relax + \let\DStroke\relax + \let\LMTone\relax + \let\LMTSone\relax + \input fontch.tex + \input bsymbols.tex + +NOTES: +----- + (1) There is one modification of the standard behavior of plain TeX. Plain + TeX defines for the font #3 the same font (tenex) for text, script and + scriptscript. That is awfull. The fontch package uses sevenex for + script and fiveex for scriptscript, as for the other fonts. + + (2) The use of files il1-t1.tcx or il2-t1.tcx is recommended together + with the LMT1 fonts. + + (3) Only the cmcs, cmmib, cmbsy and cmex AMS fonts are supported. These + are used for small caps and for boldface math-italic and boldface + greek symbols. The other AMS fonts like the Euler, Cyrillic and extra + symbols are not supported. + + (4) Only the roman Doublestroke font is supported. The sans serif version + is not supported. + + (5) There are two main uses of boldface math. One case is the use of + isolated bold characters or symbols inside a formula. For this case + fontch provides bold versions of math synbols and the macro \mb for bold + math-italic characters. The plain TeX macro "\bf" yields roman-bold + characters in math mode. The name of the bold version of a math symbol + is obtained adding the prefix "bf" to the name of the normal symbol. For + example a boldface italic "a" is {\mb a}, a boldface roman "P" is + {\bf P}, a boldface \Sigma is \bfSigma, a boldface \iff is \bfiff. + + The other case is when one wants to write a complete formula in + boldface, for example inside a title. For this case fontch has the + macro \setmathbold that changes the font families 1 (cmmi) and 2 (cmsy) + to the bold versions cmmib and cmmbsy. The macro \unsetmathbold resets + the families 1 and 2 to their original values. These macros should be + put before and after the formula. + + (6) Usually the macro \setmathbold does not change the whole formula to + boldface. This is due to the fact that in math mode some symbols + come from family #0 (cmr) or #3 (cmex) such as "+" or \int. Fontch + provides macros for the symbols that come from family #0, For + example the bold version of "(" is \bflparen. + + (7) Math symbols of family #3 (cmex) do not have bold versions. In particular + \int, \sum and \prod. Never the less \smallint is of cmsy and does + a bold version. + +Modifications from version 1.3 +------------------------------ + +Version 2.0 is a mayor revision. + +There are many improvements such as + -- Proper handling of smallcaps + -- Support for bold-math + -- Support for AMS fonts + -- Support for blackboard boldface + -- Correction of bugs and scaling. + +The behavior of V2.0 should be compatible with V1.3 except for case explained +in Note (1). +----------------------------------------------------- +%%%%%%%%% Commands of fontch %%%%%% + +General Commands +---------------- +The package fontch defines the following commands valid for any option. + +Commands for changing font size: + \eightpoint -- Change to small type + \tenpoint -- Change to normal type + \twelvepoint -- Change to large type + \fourteenpoint -- Change to very large type + \twentypoint -- Change to huge type + \twentyfourpoint -- Change to immense type + +Commands for changing family, most already in plain TeX. + + \rm -- Roman + \it -- Italic + \bf -- Boldface + \tt -- Teletype + \sf -- Sans Serif (new) + \sc -- Small Caps + \cal -- Calligraphic + \mit -- Math Italic + \mb -- Math Boldface (new) + \bcal -- Boldface calligraphica (new) + \oldstyle -- Old style digits + \boldstyle -- Boldface old style digitsa (new) + \setmathbold -- set families 1 and 2 to cmmib and cmmbsy (new) + \unsetmathbold -- reset families 1 and 2 to cmmi and cmmsy (new) + +Command for changing line spacing + \doublespace -- Double Space for ten & twelve points + + + +Macros of bold symbols (Require input of bsymbols.tex) +---------------------- +Symbols that have a keyword + bold_keyword = bf + normal_keyword + +Symbols that do not have a keyword + \bfexcl -- ! + \bflparen -- ( + \bfrparen -- ) + \bfplus -- + + \bfcomma -- , + \bfcolon -- : + \bfsemicolon -- ; + \bfequal -- = + \bflbraket -- [ + \bflt -- < + \bfslash -- / + \bfgt -- > + \bfminus -- - + \bfvert -- | + \bfVert -- \| + +Command of the DStroke option +----------------------------- + \ds -- Double Stroke + +Commands of the LMT1 option +--------------------------- + +Redefined Plain TeX Commands: + \i , \j , \ae , \AE, \oe , \OE , \o , \O , + \ss , \SS , \aa , \AA , \l , \L , + \Gamma , \Delta , \Theta , \Lambda , \Xi , \Pi , + \Sigma , \Upsilon , \Phi , \Psi , \Omega , \hbar + +New T1 Commands for non-latin1 characters + + \lh -- l' + \Lh -- L' + \dh -- d' + \th -- t' + \dbar -- d slash + \Edh + \edh + \ij + \IJ + \nj + \NJ + \thorn + \Thorn + \smallzero + \lguille -- left guillemot (does not appear in il1-t1.tcx) + \rguille -- right guillemot (does not appear in il1-t1.tcx) + \vispace -- visible space + +Redefined plain TeX accents + \` , \' , \^ , \~ , \" , \H , \v , \u , \= , \. , \b , \c + +Redefined plain TeX math-accents + \acute,\grave,\ddot,\tilde,\bar,\breve,\check,\hat,\dot + +New T1 accents + \r -- ring accent + \k -- ogonek + +New T1 math-accent + \ring + +Commands of the LMTS1 option +---------------------------- + +TS1 symbols + \tcchar{#1} -- Character of TS1 table + +Redefined plain TeX commands + \t{#1} -- tie-after-accent + \P -- pilcrow + \S -- section + \dag -- dagger + \ddag -- double dagger + \copyright + +Most TS1 symbols (in increasing charcode order) +Some are text versions of symbols of the math mode. + + \arrowl -- left arrow + \arrowr -- right arrow + \blank + \dollar + \caster -- centered asterisk + \sequals -- short equals + \anglel + \angler + \mho + \bigcircle + \Ohm + \bbracketl -- left double square bracket + \bbracketr -- right double square bracket + \arrowu -- up arrow + \arrowd -- down arrow + \textstar -- star + \born + \died + \leaf + \married + \music + \doublevert -- Double vertical bar + \perthousand + \bull -- bullet (is in manmac) + \centigrade + \olddollar + \oldcent + \florin + \Colon + \won + \naira + \guarani + \peso + \lira + \recipe + \interrobang -- Question+Exclamation + \gnaborretni -- Question+Exclamation upside-down + \dong + \TM + \pertenth -- per ten thousand + \npilcrow -- narrow pilcrow + \baht + \numero + \abzueglich + \aestimated -- Big e + \openbull + \SM + \qbrackl -- left quill bracket + \qbrackr -- right quill bracket + \cent + \sterling + \currency + \yen + \brokenvert -- broken vertical bar + \feminine + \copyleft + \lognot -- logical not + \circledP + \registered + \degree + \plusminus + \twoup + \threeup + \micro + \centereddot + \reference + \oneup + \masculine + \root + \onequarter + \onehalf + \threequarters + \euro + \texttimes + \textdiv + +Bugs +---- + Comments and bug reports are welcome at rmedina@ivic.ve +-.- diff --git a/obsolete/macros/plain/contrib/fontch20/TS1mac.tex b/obsolete/macros/plain/contrib/fontch20/TS1mac.tex new file mode 100644 index 0000000000..00cf719ed7 --- /dev/null +++ b/obsolete/macros/plain/contrib/fontch20/TS1mac.tex @@ -0,0 +1,130 @@ +%% TS1mac.tex this file is part of fontch package V2.0 2007/09/04 +%% Support of TS1 fonts +%% eight points fonts %% +\font\eightcrm=ts1-lmr8 +\font\eightcbf=ts1-lmbx8 +\font\eightcsl=ts1-lmro8 +\font\eightctt=ts1-lmtt8 +\font\eightcit=ts1-lmri8 +\font\eightcss=ts1-lmss8 +%% ten points fonts %% +\font\tencrm=ts1-lmr10 +\font\tencbf=ts1-lmbx10 +\font\tencsl=ts1-lmro10 +\font\tenctt=ts1-lmtt10 +\font\tencit=ts1-lmri10 +\font\tencss=ts1-lmss10 +%% twelve points fonts %% +\font\twelvecrm=ts1-lmr12 +\font\twelvecbf=ts1-lmbx12 +\font\twelvecsl=ts1-lmro12 +\font\twelvectt=ts1-lmtt12 +\font\twelvecit=ts1-lmri12 +\font\twelvecss=ts1-lmss12 +%% fourteen points fonts %% +\font\fourteencrm=ts1-lmr12 scaled 1167 +\font\fourteencbf=ts1-lmbx12 scaled 1167 +\font\fourteencsl=ts1-lmro12 scaled 1167 +\font\fourteenctt=ts1-lmtt12 scaled 1167 +\font\fourteencit=ts1-lmri12 scaled 1167 +\font\fourteencss=ts1-lmss12 scaled 1167 +%% twenty points fonts %% +\font\twentycrm=ts1-lmr12 scaled 1667 +\font\twentycbf=ts1-lmbx12 scaled 1667 +\font\twentycsl=ts1-lmro12 scaled 1667 +\font\twentyctt=ts1-lmtt12 scaled 1667 +\font\twentycit=ts1-lmri12 scaled 1667 +\font\twentycss=ts1-lmss12 scaled 1667 +%% twentyfour points fonts %% +\font\twentyfourcrm=ts1-lmr12 scaled 2000 +\font\twentyfourcbf=ts1-lmbx12 scaled 2000 +\font\twentyfourcsl=ts1-lmro12 scaled 2000 +\font\twentyfourctt=ts1-lmtt12 scaled 2000 +\font\twentyfourcit=ts1-lmri12 scaled 2000 +\font\twentyfourcss=ts1-lmss12 scaled 2000 +%% Text companion symbols TS1 %% +%% Redefinition of tie-accent +\def\t#1{{\edef\next{\the\font}\tcfont\accent"1B\next#1}} +%% TC character +\def\tcchar#1{{\edef\next{\the\font}\tcfont\char#1\next}} +%% TC symbols +\def\arrowl{{\tcchar{"18}}} +\def\arrowr{{\tcchar{"19}}} +\def\blank{{\tcchar{"20}}} +\def\dollar{{\tcchar{"24}}} +\def\caster{{\tcchar{"2A}}} +\def\sequals{{\tcchar{"2D}}} +\def\anglel{{\tcchar{"3C}}} +\def\angler{{\tcchar{"3E}}} +\def\mho{{\tcchar{"4D}}} +\def\bigcircle{{\tcchar{"4F}}} +\def\Ohm{{\tcchar{"57}}} +\def\bbracketl{{\tcchar{"5B}}} +\def\bbracketr{{\tcchar{"5D}}} +\def\arrowu{{\tcchar{"5E}}} +\def\arrowd{{\tcchar{"5F}}} +\def\textstar{{\tcchar{"62}}} +\def\born{{\tcchar{"63}}} +\def\died{{\tcchar{"64}}} +\def\leaf{{\tcchar{"6C}}} +\def\married{{\tcchar{"6D}}} +\def\music{{\tcchar{"6E}}} +\def\dag{{\tcchar{"84}}}%% Redefined +\def\ddag{{\tcchar{"85}}}%% Redefined +\def\doublevert{{\tcchar{"86}}} +\def\perthousand{{\tcchar{"87}}} +\def\bull{{\tcchar{"88}}} +\def\centigrade{{\tcchar{"89}}} +\def\olddollar{{\tcchar{"8A}}} +\def\oldcent{{\tcchar{"8B}}} +\def\florin{{\tcchar{"8C}}} +\def\Colon{{\tcchar{"8D}}} +\def\won{{\tcchar{"8E}}} +\def\naira{{\tcchar{"8F}}} +\def\guarani{{\tcchar{"90}}} +\def\peso{{\tcchar{"91}}} +\def\lira{{\tcchar{"92}}} +\def\recipe{{\tcchar{"93}}} +\def\interrobang{{\tcchar{"94}}} +\def\gnaborretni{{\tcchar{"95}}} +\def\dong{{\tcchar{"96}}} +\def\TM{{\tcchar{"97}}} +\def\pertenth{{\tcchar{"98}}} +\def\npilcrow{{\tcchar{"99}}} +\def\baht{{\tcchar{"9A}}} +\def\numero{{\tcchar{"9B}}} +\def\abzueglich{{\tcchar{"9C}}} +\def\aestimated{{\tcchar{"9D}}} +\def\openbull{{\tcchar{"9E}}} +\def\SM{{\tcchar{"9F}}} +\def\qbrackl{{\tcchar{"A0}}} +\def\qbrackr{{\tcchar{"A1}}} +\def\cent{{\tcchar{"A2}}} +\def\sterling{{\tcchar{"A3}}} +\def\currency{{\tcchar{"A4}}} +\def\yen{{\tcchar{"A5}}} +\def\brokenvert{{\tcchar{"A6}}} +\def\S{{\tcchar{"A7}}}%% Redefined +\def\copyright{{\tcchar{"A9}}} +\def\feminine{{\tcchar{"AA}}} +\def\copyleft{{\tcchar{"AB}}} +\def\lognot{{\tcchar{"AC}}} +\def\circledP{{\tcchar{"AD}}} +\def\registered{{\tcchar{"AE}}} +\def\degree{{\tcchar{"B0}}} +\def\plusminus{{\tcchar{"B1}}} +\def\twoup{{\tcchar{"B2}}} +\def\threeup{{\tcchar{"B3}}} +\def\micro{{\tcchar{"B5}}} +\def\P{{\tcchar{"B6}}}%% Redefined +\def\centereddot{{\tcchar{"B7}}} +\def\reference{{\tcchar{"B8}}} +\def\oneup{{\tcchar{"B9}}} +\def\masculine{{\tcchar{"BA}}} +\def\root{{\tcchar{"BB}}} +\def\onequarter{{\tcchar{"BC}}} +\def\onehalf{{\tcchar{"BD}}} +\def\threequarters{{\tcchar{"BE}}} +\def\euro{{\tcchar{"BF}}} +\def\texttimes{{\tcchar{"D6}}} +%% End of LMTSone option %% diff --git a/obsolete/macros/plain/contrib/fontch20/bsymbols.tex b/obsolete/macros/plain/contrib/fontch20/bsymbols.tex new file mode 100644 index 0000000000..b44d0818bc --- /dev/null +++ b/obsolete/macros/plain/contrib/fontch20/bsymbols.tex @@ -0,0 +1,228 @@ +%% bsymbols.tex Macros for bold symbols defined in cmmib and cmbsy +%% Part of package fontch V2.0 2007/09/4 +%% Rodrigo Medina (IVIC) rmedina@ivic.ve +%% Licence: LPPL +%% +%%%% Description +%% Defines a macro for the bold version of each symbol that appears in +%% cmmi and cmsy. The name of the bold symbol is the name of the normal symbol +%% with the prefix "bf". For example the bold version of \Sigma is \bfSigma. +%% +%% There are also macros for the bold versions of symbols that have their +%% own key. For example the bold version of "+" is \bfplus. +%%%% Requirement +%% As it is defined in fontch.tex cmmib must be family #8 and cmbsy family #9 +%% +%%%% Usage +%% You can use bsymbols.tex in two ways: +%% 1- put \input bsymbols.tex in your document. +%% 2- If need only a few bold symbols you may copy in your document +%% the lines of this file in which the symbols that you need appear. +%% +%%%% +%% +%% These have their own key, most are defined in cmr +\mathchardef\bfexcl="0621 +\mathchardef\bflparen="4628 +\mathchardef\bfrparen="5629 +\mathchardef\bfplus="262B +\mathchardef\bfcomma="662C +\mathchardef\bfcolon="063A +\mathchardef\bfsemicolon="663B +\mathchardef\bfequal="363D +\mathchardef\bflbraket="465B +\mathchardef\bfrbraket="565D +\mathchardef\bflt="383C +\mathchardef\bfslash="283D +\mathchardef\bfgt="383E +\mathchardef\bfminus="2900 +\mathchardef\bfvert="296A +%% cmmi symbols +\mathchardef\bfGamma="7800 +\mathchardef\bfDelta="7801 +\mathchardef\bfTheta="7802 +\mathchardef\bfLambda="7803 +\mathchardef\bfXi="7804 +\mathchardef\bfPi="7805 +\mathchardef\bfSigma="7806 +\mathchardef\bfUpsilon="7807 +\mathchardef\bfPhi="7808 +\mathchardef\bfPsi="7809 +\mathchardef\bfOmega="780A +\mathchardef\bfalpha="080B +\mathchardef\bfbeta="080C +\mathchardef\bfgamma="080D +\mathchardef\bfdelta="080E +\mathchardef\bfepsilon="080F +\mathchardef\bfzeta="0810 +\mathchardef\bfeta="0811 +\mathchardef\bftheta="0812 +\mathchardef\bfiota="0813 +\mathchardef\bfkappa="0814 +\mathchardef\bflambda="0815 +\mathchardef\bfmu="0816 +\mathchardef\bfnu="0817 +\mathchardef\bfxi="0818 +\mathchardef\bfpi="0819 +\mathchardef\bfrho="081A +\mathchardef\bfsigma="081B +\mathchardef\bftau="081C +\mathchardef\bfupsilon="081D +\mathchardef\bfphi="081E +\mathchardef\bfchi="081F +\mathchardef\bfpsi="0820 +\mathchardef\bfomega="0821 +\mathchardef\bfvarepsilon="0822 +\mathchardef\bfvartheta="0823 +\mathchardef\bfvarpi="0824 +\mathchardef\bfvarrho="0825 +\mathchardef\bfvarsigma="0826 +\mathchardef\bfvarphi="0827 +\mathchardef\bfleftharpoonup="3828 +\mathchardef\bfleftharpoondown="3829 +\mathchardef\bfrightharpoonup="382A +\mathchardef\bfrightharpoondown="382B +\mathchardef\bflhook="382C +\mathchardef\bfrhook="382D +\def\bfhookrightarrow{\bflhook\joinrel\bfrightarrow} +\def\bfhookleftarrow{\bfleftarrow\joinrel\bfrhook} +\def\bfrelbar{\mathrel{\smash\bfminus}} +\def\bfRelbar{\mathrel\bfequal} +\mathchardef\bftriangleright="282E +\mathchardef\bftriangleleft="282F +\def\bfjoinrel{\mathrel{\mkern-4mu}} +\def\bfbowtie{\mathrel\bftriangleright\bfjoinrel\mathrel\bftriangleleft} +\def\bfmodels{\mathrel\bfvert\bfjoinrel\bfequal} +\def\bfLongrightarrow{\bfRelbar\bfjoinrel\bfRightarrow} +\def\bflongrightarrow{\bfrelbar\bfjoinrel\bfrightarrow} +\def\bflongmapsto{\bfmapstochar\bflongrightarrow} +\def\bflongleftarrow{\bfleftarrow\bfjoinrel\bfrelbar} +\def\bfLongleftarrow{\bfLeftarrow\bfjoinrel\bfRelbar} +\def\bflongleftrightarrow{\bfleftarrow\bfjoinrel\bfrightarrow} +\def\bfLongleftrightarrow{\bfLeftarrow\bfjoinrel\bfRightarrow} +\def\bfiff{\;\bfLongleftrightarrow\;} + + +\mathchardef\bfldotp="683A +\def\bfldots{\mathinner{\bfldotp\bfldotp\bfldotp}} +\let\bfdots=\bfldots +\mathchardef\bfstar="283F +\mathchardef\bfpartial="0840 +\mathchardef\bfflat="085B +\mathchardef\bfnatural="085C +\mathchardef\bfsharp="085D +\mathchardef\bfsmile="385E +\mathchardef\bffrown="385F +\mathchardef\bfell="0860 +\mathchardef\bfimath="087B +\mathchardef\bfjmath="087C +\mathchardef\bfwp="087D +%% +%% cmsy symbols +\mathchardef\bfcdot="2901 +\mathchardef\bfcdotp="6201 +\def\bfcdots{\mathinner{\bfcdotp\bfcdotp\bfcdotp}} +\mathchardef\bftimes="2902 +\mathchardef\bfast="2903 +\mathchardef\bfdiv="2904 +\mathchardef\bfdiamond="2905 +\mathchardef\bfpm="2906 +\mathchardef\bfmp="2907 +\mathchardef\bfoplus="2908 +\mathchardef\bfominus="2909 +\mathchardef\bfotimes="290A +\mathchardef\bfoslash="290B +\mathchardef\bfodot="290C +\mathchardef\bfbigcirc="290D +\mathchardef\bfcirc="290E +\mathchardef\bfbullet="290F +\mathchardef\bfasymp="3910 +\mathchardef\bfequiv="3911 +\mathchardef\bfsubseteq="3912 +\mathchardef\bfsupseteq="3913 +\mathchardef\bfleq="3914 \let\bfle=\bfleq +\mathchardef\bfgeq="3915 \let\bfge=\bfgeq +\mathchardef\bfpreceq="3916 +\mathchardef\bfsucceq="3917 +\mathchardef\bfsim="3918 +\mathchardef\bfapprox="3919 +\mathchardef\bfsubset="391A +\mathchardef\bfsupset="391B +\mathchardef\bfll="391C +\mathchardef\bfgg="391D +\mathchardef\bfprec="391E +\mathchardef\bfsucc="391F +\mathchardef\bfleftarrow="3920 \let\bfgets=\bfleftarrow +\mathchardef\bfrightarrow="3921 \let\bfto=\bfrightarrow +\mathchardef\bfuparrow="3922 +\mathchardef\bfdownarrow="3923 +\mathchardef\bfleftrightarrow="3924 +\mathchardef\bfnearrow="3925 +\mathchardef\bfsearrow="3926 +\mathchardef\bfsimeq="3927 +\mathchardef\bfLeftarrow="3928 +\mathchardef\bfRightarrow="3929 +\mathchardef\bfUparrow="392A +\mathchardef\bfDownarrow="392B +\mathchardef\bfLeftrightarrow="392C +\mathchardef\bfnwarrow="392D +\mathchardef\bfswarrow="392E +\mathchardef\bfpropto="392F +\mathchardef\bfprime="0930 +\mathchardef\bfinfty="0931 +\mathchardef\bfin="3932 +\mathchardef\bfni="3933 +\mathchardef\bfbigtriangle="2934 +\mathchardef\bfbigtriangledown="2935 +\mathchardef\bfnot="3936 +\mathchardef\bfmapstochar="3937 +\def\bfmapsto{\bfmapstochar\bfrightarrow} +\mathchardef\bfforall="0938 +\mathchardef\bfexists="0939 +\mathchardef\bfneg="093A \let\bflnot=\bfneg +\mathchardef\bfemptyset="093B +\mathchardef\bfRe="093C +\mathchardef\bfIm="093D +\mathchardef\bftop="093E +\mathchardef\bfbot="093F \let\bfperp=\bfbot +\mathchardef\bfaleph="0940 +\mathchardef\bfcup="295B +\mathchardef\bfcap="295C +\mathchardef\bfuplus="295D +\mathchardef\bfwedge="295E \let\bfland=\bfwedge +\mathchardef\bfvee="295F \let\bflor=\bfvee +\mathchardef\bfvdash="3960 +\mathchardef\bfdashv="2961 +\mathchardef\bflfloor="4962 +\mathchardef\bfrfloor="5963 +\mathchardef\bflceil="4964 +\mathchardef\bfrceil="5965 +\mathchardef\bflbrace="4966 +\mathchardef\bfrbrace="5967 +\mathchardef\bflangle="4968 +\mathchardef\bfrangle="5969 +\mathchardef\bfmid="396A +\mathchardef\bfparallel="396B +\mathchardef\bfVert="296B +\mathchardef\bfupdownarrow="396C +\mathchardef\bfUpdownarrow="396D +\mathchardef\bfbackslash="096E +\mathchardef\bfwr="296F +\def\bfsurd{{\mathchar"1970}} +\mathchardef\bfamalg="2971 +\mathchardef\bfnabla="0972 +\mathchardef\bfsmallint="1973 +\mathchardef\bfsqcup="2974 +\mathchardef\bfsqcap="2975 +\mathchardef\bfsqsubseteq="3976 +\mathchardef\bfsqsupseteq="3977 +\mathchardef\bfS="0978 +\mathchardef\bfdagger="2979 +\mathchardef\bfddagger="297A +\mathchardef\bfP="097B +\mathchardef\bfclubsuit="097C +\mathchardef\bfdiamondsuit="097D +\mathchardef\bfheartsuit="097E +\mathchardef\bfspadesuit="097F +%% +~ diff --git a/obsolete/macros/plain/contrib/fontch20/fontch.tex b/obsolete/macros/plain/contrib/fontch20/fontch.tex new file mode 100644 index 0000000000..976d301684 --- /dev/null +++ b/obsolete/macros/plain/contrib/fontch20/fontch.tex @@ -0,0 +1,1201 @@ +%% fontch.tex Macros for easily changing fonts and sizes in plain TeX %% +%% V2.0 2007/09/04 +%% Rodrigo Medina (IVIC) rmedina@ivic.ve +%% Suggested location: .../texmf/tex/plain/fontch/ +%% Licence: LPPL +%% +%%%%%% Components +%% The fontch V2.0 package is composed of the following files +%% README.txt -- Explanation file (has essentially this information) +%% fontch.tex -- main macros +%% bsymbols.tex -- macros for boldface symbols +%% TS1mac.tex -- macros for the TS1 companion symbols +%% DSmac.tex -- auxiliary file for the DStroke option +%%%%%% Description +%% +%% Fontch implements a mechanism for changing type and size of fonts. One +%% can write text and math at main sizes of 8, 10, 12, 14, 20 and 24 points. +%% Fonts of sizes 5, 6, 7 and 9 points are used in subscripts and subscripts of %% subscripts of other main sizes. +%% A single command makes all the changes needed for changing font smoothly. +%% In addition fontch gives support to: +%% - boldface math-italic and boldface math symbols, +%% - T1 Latin Modern fonts, +%% - TS1 companion symbol fonts. +%% - AMS fonts for boldface math, +%% - Double Stroke fonts for blackboard bold symbols +%% +%%%%%% Usage +%% +%% For using fontch.tex with the original TeX OT1 fonts (Computer Modern) +%% just put at the beginning of the document: +%% \input fontch.tex +%% +%% The file bsymbols.tex provides macro definitions for boldface versions +%% of math symbols. For using it just input the file where you need it. +%% +%% The fontch package has four options for handling different kinds of fonts: +%% +%% - LMTone for Latin Modern T1 fonts. +%% - LMTSone for the TS1 companion symbol font. +%% - AMSfont for AMS fonts used for boldface math. +%% - DStroke for Doublestroke fonts providing blackboard-boldface symbols. +%% +%% The four options are independent. They are activated by setting the +%% corresponding variable before calling fontch.tex. For example for +%% activating all the four options and using the macros for bold math +%% put at the beginning of the document: +%% +%% \let\AMSfont\relax +%% \let\DStroke\relax +%% \let\LMTone\relax +%% \let\LMTSone\relax +%% \input fontch.tex +%% \input bsymbols.tex +%% +%% +%%%%%% NOTES: +%% (1) There is one modification of the standard behavior of plain TeX. Plain +%% TeX defines for the font #3 the same font (tenex) for text, script and +%% scriptscript. That is awfull. The fontch package uses sevenex for +%% script and fiveex for scriptscript, as for the other fonts. +%% +%% (2) The use of files il1-t1.tcx or il2-t1.tcx is recommended together +%% with the LMT1 fonts. +%% +%% (3) Only the cmcs, cmmib, cmbsy and cmex AMS fonts are supported. These +%% are used for small caps and for boldface math-italic and boldface +%% greek symbols. The other AMS fonts like the Euler, Cyrillic and extra +%% symbols are not supported. +%% +%% (4) Only the roman Doublestroke font is supported. The sans serif version +%% is not supported. +%% +%% (5) There are two main uses of boldface math. One case is the use of +%% isolated bold characters or symbols inside a formula. For this case +%% fontch provides bold versions of math synbols and the macro \mb for bold +%% math-italic characters. The plain TeX macro "\bf" yields roman-bold +%% characters in math mode. The name of the bold version of a math symbol +%% is obtained adding the prefix "bf" to the name of the normal symbol. For +%% example a boldface italic "a" is {\mb a}, a boldface roman "P" is +%% {\bf P}, a boldface \Sigma is \bfSigma, a boldface \iff is \bfiff. +%% +%% The other case is when one wants to write a complete formula in +%% boldface, for example inside a title. For this case fontch has the +%% macro \setmathbold that changes the font families 1 (cmmi) and 2 (cmsy) +%% to the bold versions cmmib and cmmbsy. The macro \unsetmathbold resets +%% the families 1 and 2 to their original values. These macros should be +%% put before and after the formula. +%% +%% (6) Usually the macro \setmathbold does not change the whole formula to +%% boldface. This is due to the fact that in math mode some symbols +%% come from family #0 (cmr) or #3 (cmex) such as "+" or \int. Fontch +%% provides macros for the symbols that come from family #0, For +%% example the bold version of "(" is \bflparen. +%% +%% (7) Math symbols of family #3 (cmex) do not have bold versions. In particular +%% \int, \sum and \prod. Never the less \smallint is of cmsy and does +%% a bold version. +%% +%%%%%%%%% Commands of fontch %%%%%% +%% +%%%%%% General Commands +% \rm -- Roman +% \it -- Italic +% \bf -- Boldface +% \tt -- Teletype +% \sf -- Sans Serif +% \sc -- Small Caps +% \cal -- Calligraphic +% \mit -- Math Italic +% \mb -- Math Boldface +% \bcal -- Boldface calligraphic +% \oldstyle -- Old style digits +% \boldstyle -- Boldface old style digits +% \setmathbold -- set families 1 and 2 to cmmib and cmmbsy +% \unsetmathbold -- reset families 1 and 2 to cmmi and cmmsy +% \eightpoint -- Change to small type +% \tenpoint -- Change to normal type +% \twelvepoint -- Change to large type +% \fourteenpoint -- Change to very large type +% \twentypoint -- Change to huge type +% \twentyfourpoint -- Change to immense type +% \doublespace -- Double Space for ten & twelve points +% +%%%%%% Macros of bold symbols +% Symbols that have a keyword +% bold_keyword = bf + normal_keyword +% +% Symbols that do not have a keyword +% \bfexcl -- ! +% \bflparen -- ( +% \bfrparen -- ) +% \bfplus -- + +% \bfcomma -- , +% \bfcolon -- : +% \bfsemicolon -- ; +% \bfequal -- = +% \bflbraket -- [ +% \bflt -- < +% \bfslash -- / +% \bfgt -- > +% \bfminus -- - +% \bfvert -- | +% \bfVert -- \| +% +%%%%%% Command of the DStroke option +% \ds -- Double Stroke +% +%%%%%% Commands of the LMT1 option +%% Redefined Plain TeX Commands +% \i , \j , \ae , \AE, \oe , \OE , \o , \O , +% \ss , \SS , \aa , \AA , \l , \L , +% \Gamma , \Delta , \Theta , \Lambda , \Xi , \Pi , +% \Sigma , \Upsilon , \Phi , \Psi , \Omega, \hbar +%% +%% New T1 Commands for non-latin1 characters +% \lh -- l' +% \Lh -- L' +% \dh -- d' +% \th -- t' +% \dbar -- d slash +% \Edh +% \edh +% \ij +% \IJ +% \nj +% \NJ +% \thorn +% \Thorn +% \smallzero +% \lguille -- left guillemot (does not appear in il1-t1.tcx) +% \rguille -- right guillemot (does not appear in il1-t1.tcx) +% \vispace -- visible space +%% +%% Redefined plain TeX accents +% \` , \' , \^ , \~ , \" , \H , \v , \u , \= , \. , \b , \c +%% New T1 accents +% \r -- ring accent +% \k -- ogonek +%% +%% Redefined plain TeX math-accents +% \acute,\grave,\ddot,\tilde,\bar,\breve,\check,\hat,\dot +%% New T1 math-accent +% \ring +%% +%%%%% Commands of the LMTS1 option %% +%% Text companion symbols TS1 %% +% \tcchar{#1} -- Character of TS1 table +%% Redefined plain TeX commands +% \t{#1} -- tie-after-accent +% \P -- pilcrow +% \S -- section +% \dag -- dagger +% \ddag -- double dagger +% \copyright +%% Most TS1 symbols (in increasing charcode order) +% \arrowl -- left arrow +% \arrowr -- right arrow +% \blank +% \dollar +% \caster -- centered asterisk +% \sequals -- short equals +% \anglel +% \angler +% \mho +% \bigcircle +% \Ohm +% \bbracketl -- left double square bracket +% \bbracketr -- right double square bracket +% \arrowu -- up arrow +% \arrowd -- down arrow +% \textstar -- star +% \born +% \died +% \leaf +% \married +% \music +% \doublevert -- Double vertical bar +% \perthousand +% \bull -- bullet (is in manmac) +% \centigrade +% \olddollar +% \oldcent +% \florin +% \Colon +% \won +% \naira +% \guarani +% \peso +% \lira +% \recipe +% \interrobang -- Question+Exclamation +% \gnaborretni -- Question+Exclamation upsidedown +% \dong +% \TM +% \pertenth -- per ten thousand +% \npilcrow -- narrow pilcrow +% \baht +% \numero +% \abzueglich +% \aestimated -- Big e +% \openbull +% \SM +% \qbrackl -- left quill bracket +% \qbrackr -- right quill bracket +% \cent +% \sterling +% \currency +% \yen +% \brokenvert -- broken vertical bar +% \feminine +% \copyleft +% \lognot -- logical not +% \circledP +% \registered +% \degree +% \plusminus +% \twoup +% \threeup +% \micro +% \centereddot +% \reference +% \oneup +% \masculine +% \root +% \onequarter +% \onehalf +% \threequarters +% \euro +% \texttimes +% \textdiv +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% +%% Modifications from version 1.3 +%% +%% Version 2.0 is a mayor revision. +%% +%% There are many improvements such as +%% -- Proper handling of smallcaps +%% -- Support for bold-math +%% -- Support for AMS fonts +%% -- Support for blackboard boldface +%% -- Correction of bugs and scaling. +%% +%% The behavior should be compatible with V1.3 except for +%% case explained in Note (1). +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\wlog{File: fontch.tex + [v2.0 (2007/09/04) font change package for plain TeX]} +% +%% Math fonts, valid for any option +%% five points fonts (defined in plain.tex) %% +%% six points fonts %% +\font\sixi=cmmi6 +\font\sixsy=cmsy6 +\skewchar\sixi='177 +\skewchar\sixsy='60 +%% seven points fonts (defined in plain.tex) %% +%% eight points fonts %% +\font\eighti=cmmi8 +\font\eightsy=cmsy8 +\skewchar\eighti='177 +\skewchar\eightsy='60 +%% nine points fonts %% +\font\ninei=cmmi9 +\font\ninesy=cmsy9 +\skewchar\ninei='177 +\skewchar\ninesy='60 +%% ten points fonts %% +\font\tenmib=cmmib10 +\font\tenbsy=cmbsy10 +\skewchar\tenmib='177 +\skewchar\tenbsy='60 +%% twelve points fonts %% +\font\twelvei=cmmi12 +\font\twelvesy=cmsy10 scaled 1200 +\font\twelveex=cmex10 scaled 1200 +\font\twelvemib=cmmib10 scaled 1200 +\font\twelvebsy=cmbsy10 scaled 1200 +\skewchar\twelvei='177 +\skewchar\twelvemib='177 +\skewchar\twelvesy='60 +\skewchar\twelvebsy='60 +%% fourteen points fonts %% +\font\fourteeni=cmmi12 scaled 1167 +\font\fourteensy=cmsy10 scaled 1400 +\font\fourteenex=cmex10 scaled 1400 +\font\fourteenmib=cmmib10 scaled 1400 +\font\fourteenbsy=cmbsy10 scaled 1400 +\skewchar\fourteeni='177 +\skewchar\fourteenmib='177 +\skewchar\fourteensy='60 +\skewchar\fourteenbsy='60 +%% twenty points fonts %% +\font\twentyi=cmmi12 scaled 1667 +\font\twentysy=cmsy10 scaled 2000 +\font\twentyex=cmex10 scaled 2000 +\font\twentymib=cmmib10 scaled 2000 +\font\twentybsy=cmbsy10 scaled 2000 +\skewchar\twentyi='177 +\skewchar\twentymib='177 +\skewchar\twentysy='60 +\skewchar\twentybsy='60 +%% twentyfour points fonts %% +\font\twentyfouri=cmmi12 scaled 2000 +\font\twentyfoursy=cmsy10 scaled 2400 +\font\twentyfourex=cmex10 scaled 2400 +\font\twentyfourmib=cmmib10 scaled 2400 +\font\twentyfourbsy=cmsy10 scaled 2400 +\skewchar\twentyfouri='177 +\skewchar\twentyfourmib='177 +\skewchar\twentyfoursy='60 +\skewchar\twentyfourbsy='60 +%% +%% big... operators +\newdimen\bigsize +\newdimen\Bigsize +\newdimen\biggsize +\newdimen\Biggsize +%% Make @ visible +\catcode`\@=11 +\def\big#1{{\hbox{$\left#1\vbox to \bigsize{}\right.\n@space$}}} +\def\Big#1{{\hbox{$\left#1\vbox to \Bigsize{}\right.\n@space$}}} +\def\bigg#1{{\hbox{$\left#1\vbox to \biggsize{}\right.\n@space$}}} +\def\Bigg#1{{\hbox{$\left#1\vbox to \Biggsize{}\right.\n@space$}}} +%% +\ifx\AMSfont\@undefined% +{} +\else +\let\ifAMS=\relax +\fi +%% +\ifx\DStroke\@undefined% +{} +\else +\let\ifDS=\relax +\fi +%% +\ifx\LMTone\@undefined% +{} +\else +\let\ifLMT=\relax +\fi +\ifx\LMTSone\@undefined% +{} +\else +\let\ifLMTS=\relax +\fi +%% +%% Make @ invisible +\catcode`\@=12 +%% +\ifx\ifAMS\relax% +%% AMS option activated %% +\immediate\write16{*** AMS option activated. AMS fonts are used ***} +%% extension font +\font\sevenex=cmex7 +\font\eightex=cmex8 +\font\nineex=cmex9 +\font\fiveex=cmex7 scaled 714 +\font\sixex=cmex7 scaled 857 +%% math-italic boldface font +\font\fivemib=cmmib5 +\font\sixmib=cmmib6 +\font\sevenmib=cmmib7 +\font\eightmib=cmmib8 +\font\ninemib=cmmib9 +%% boldface symbols fonts +\font\fivebsy=cmbsy5 +\font\sixbsy=cmbsy6 +\font\sevenbsy=cmbsy7 +\font\eightbsy=cmbsy8 +\font\ninebsy=cmbsy9 +\else +%% extension font +\font\fiveex=cmex10 scaled 500 +\font\sixex=cmex10 scaled 600 +\font\sevenex=cmex10 scaled 700 +\font\eightex=cmex10 scaled 800 +\font\nineex=cmex10 scaled 900 +%% math-italic boldface font +\font\fivemib=cmmib10 scaled 500 +\font\sixmib=cmmib10 scaled 600 +\font\sevenmib=cmmib10 scaled 700 +\font\eightmib=cmmib10 scaled 800 +\font\ninemib=cmmib10 scaled 900 +%% boldface symbols fonts +\font\fivebsy=cmbsy10 scaled 500 +\font\sixbsy=cmbsy10 scaled 600 +\font\sevenbsy=cmbsy10 scaled 700 +\font\eightbsy=cmbsy10 scaled 800 +\font\ninebsy=cmbsy10 scaled 900 +\fi +%% End of AMS option +\skewchar\fivemib='177 +\skewchar\sixmib='177 +\skewchar\sevenmib='177 +\skewchar\eightmib='177 +\skewchar\ninemib='177 +\skewchar\fivebsy='60 +\skewchar\sixbsy='60 +\skewchar\sevenbsy='60 +\skewchar\eightbsy='60 +\skewchar\ninebsy='60 +%% +\ifx\ifLMT\relax% +%% T1 option activated % +\immediate\write16{*** T1 option activated. cork-LM fonts are used ***} +%% Replace CM text fonts %% +%% ten points fonts %% +\font\tenrm=cork-lmr10 +\font\tenbf=cork-lmbx10 +\font\tensl=cork-lmro10 +\font\tentt=cork-lmtt10 +\font\tenit=cork-lmri10 +\font\tenss=cork-lmss10 +\font\tencsc=cork-lmcsc10 +%% eight points fonts %% +\font\eightrm=cork-lmr8 +\font\eightbf=cork-lmbx8 +\font\eightsl=cork-lmro8 +\font\eighttt=cork-lmtt8 +\font\eightit=cork-lmri8 +\font\eightss=cork-lmss8 +\font\eightcsc=cork-lmcsc10 at 8pt +%% five points fonts %% +\font\fiverm=cork-lmr5 +\font\fivebf=cork-lmbx5 +\font\fivess=cork-lmss8 scaled 625 +%% six points fonts %% +\font\sixrm=cork-lmr6 +\font\sixbf=cork-lmbx6 +\font\sixss=cork-lmss8 scaled 750 +%% seven points fonts %% +\font\sevenrm=cork-lmr7 +\font\sevenbf=cork-lmbx7 +\font\sevenss=cork-lmss8 scaled 875 +%% nine points fonts %% +\font\ninerm=cork-lmr9 +\font\ninebf=cork-lmbx9 +\font\niness=cork-lmss9 +%% twelve points fonts %% +\font\twelverm=cork-lmr12 +\font\twelvebf=cork-lmbx12 +\font\twelvesl=cork-lmro12 +\font\twelvett=cork-lmtt12 +\font\twelveit=cork-lmri12 +\font\twelvess=cork-lmss12 +\font\twelvecsc=cork-lmcsc10 scaled 1200 +%% fourteen points fonts %% +\font\fourteenrm=cork-lmr12 scaled 1167 +\font\fourteenbf=cork-lmbx12 scaled 1167 +\font\fourteensl=cork-lmro12 scaled 1167 +\font\fourteentt=cork-lmtt12 scaled 1167 +\font\fourteenit=cork-lmri12 scaled 1167 +\font\fourteenss=cork-lmss12 scaled 1167 +\font\fourteencsc=cork-lmcsc10 scaled 1400 +%% twenty points fonts %% +\font\twentyrm=cork-lmr12 scaled 1667 +\font\twentybf=cork-lmbx12 scaled 1667 +\font\twentysl=cork-lmro12 scaled 1667 +\font\twentytt=cork-lmtt12 scaled 1667 +\font\twentyit=cork-lmri12 scaled 1667 +\font\twentyss=cork-lmss12 scaled 1667 +\font\twentycsc=cork-lmcsc10 scaled 2000 +%% twentyfour points fonts %% +\font\twentyfourrm=cork-lmr12 scaled 2000 +\font\twentyfourbf=cork-lmbx12 scaled 2000 +\font\twentyfoursl=cork-lmro12 scaled 2000 +\font\twentyfourtt=cork-lmtt12 scaled 2000 +\font\twentyfourit=cork-lmri12 scaled 2000 +\font\twentyfourss=cork-lmss12 scaled 2000 +\font\twentyfourcsc=cork-lmcsc10 scaled 2400 +%% +%% Redefinition of character commands %% +\chardef\i="19 \chardef\j="1A +\chardef\ae="E6 \chardef\AE="C6 +\chardef\oe="F7 \chardef\OE="D7 +\chardef\o="F8 \chardef\O="D8 +\chardef\ss="FF \chardef\SS="DF +\chardef\aa="E5 \chardef\AA="C5 +\chardef\l="AA \chardef\L="8A +\mathchardef\Gamma="0100 +\mathchardef\Delta="0101 +\mathchardef\Theta="0102 +\mathchardef\Lambda="0103 +\mathchardef\Xi="0104 +\mathchardef\Pi="0105 +\mathchardef\Sigma="0106 +\mathchardef\Upsilon="0107 +\mathchardef\Phi="0108 +\mathchardef\Psi="0109 +\mathchardef\Omega="010A +\def\hbar{{\mathchar"7009\mkern-9muh}} + +%% New character commands %% +\chardef\lh="A9 \chardef\Lh="89 +\chardef\dh="A4 \chardef\th="B4 +\chardef\dbar="9E +\chardef\Edh="D0 \chardef\edh="F0 +\chardef\ij="BC \chardef\IJ="9C +\chardef\nj="AD \chardef\NJ="8D +\chardef\thorn="FE \chardef\Thorn="DE +\chardef\smallzero="18 +\chardef\lguille="E \chardef\rguille="F +\chardef\vispace="20 + +%% Redefinition of accents and new accents%% +\def\`#1{{\accent0 #1}} +\def\'#1{{\accent1 #1}} +\def\^#1{{\accent2 #1}} +\def\~#1{{\accent3 #1}} +\def\"#1{{\accent4 #1}} +\def\H#1{{\accent5 #1}} +%New ring accent +\def\r#1{{\accent6 #1}} +\def\v#1{{\accent7 #1}} +\def\u#1{{\accent8 #1}} +\def\=#1{{\accent9 #1}} +\def\.#1{{\accent10 #1}} +\def\b#1{\oalign{#1\crcr\hidewidth + \vbox to.2ex{\hbox{\char9}\vss}\hidewidth}} +\def\c#1{\setbox0=\hbox{#1}\ifdim\ht0=1ex \accent"B #1% + \else{\ooalign{\unhbox0\crcr\hidewidth\char"B\hidewidth}}\fi} +%New ogonek accent +\def\k#1{\setbox0=\hbox{#1}\ifdim\ht0=1ex \accent"C #1% + \else{\ooalign{\unhbox0\crcr\hidewidth\char"C\hidewidth}}\fi} +\def\textdiv{{\tcchar{"F6}}} +% +%% Redefinition of math-accents %% +\def\acute{\mathaccent"7001 } +\def\grave{\mathaccent"7000 } +\def\ddot{\mathaccent"7004 } +\def\tilde{\mathaccent"7003 } +\def\bar{\mathaccent"7009 } +\def\breve{\mathaccent"7008 } +\def\check{\mathaccent"7007 } +\def\hat{\mathaccent"7002 } +\def\dot{\mathaccent"700A } +%New ring math-accent +\def\ring{\mathaccent"7006 } +% +%% Activate non-ascii letters %% +% upper case +\catcode`\^^80=11 \uccode`\^^80=`\^^80 \lccode`\^^80=`\^^a0 +\catcode`\^^81=11 \uccode`\^^81=`\^^81 \lccode`\^^81=`\^^a1 +\catcode`\^^82=11 \uccode`\^^82=`\^^82 \lccode`\^^82=`\^^a2 +\catcode`\^^83=11 \uccode`\^^83=`\^^83 \lccode`\^^83=`\^^a3 +\catcode`\^^84=11 \uccode`\^^84=`\^^84 \lccode`\^^84=`\^^a4 +\catcode`\^^85=11 \uccode`\^^85=`\^^85 \lccode`\^^85=`\^^a5 +\catcode`\^^86=11 \uccode`\^^86=`\^^86 \lccode`\^^86=`\^^a6 +\catcode`\^^87=11 \uccode`\^^87=`\^^87 \lccode`\^^87=`\^^a7 +\catcode`\^^88=11 \uccode`\^^88=`\^^88 \lccode`\^^88=`\^^a8 +\catcode`\^^89=11 \uccode`\^^89=`\^^89 \lccode`\^^89=`\^^a9 +\catcode`\^^8a=11 \uccode`\^^8a=`\^^8a \lccode`\^^8a=`\^^aa +\catcode`\^^8b=11 \uccode`\^^8b=`\^^8b \lccode`\^^8b=`\^^ab +\catcode`\^^8c=11 \uccode`\^^8c=`\^^8c \lccode`\^^8c=`\^^ac +\catcode`\^^8d=11 \uccode`\^^8d=`\^^8d \lccode`\^^8d=`\^^ad +\catcode`\^^8e=11 \uccode`\^^8e=`\^^8e \lccode`\^^8e=`\^^ae +\catcode`\^^8f=11 \uccode`\^^8f=`\^^8f \lccode`\^^8f=`\^^af +\catcode`\^^90=11 \uccode`\^^90=`\^^90 \lccode`\^^90=`\^^b0 +\catcode`\^^91=11 \uccode`\^^91=`\^^91 \lccode`\^^91=`\^^b1 +\catcode`\^^92=11 \uccode`\^^92=`\^^92 \lccode`\^^92=`\^^b2 +\catcode`\^^93=11 \uccode`\^^93=`\^^93 \lccode`\^^93=`\^^b3 +\catcode`\^^94=11 \uccode`\^^94=`\^^94 \lccode`\^^94=`\^^b4 +\catcode`\^^95=11 \uccode`\^^95=`\^^95 \lccode`\^^95=`\^^b5 +\catcode`\^^96=11 \uccode`\^^96=`\^^96 \lccode`\^^96=`\^^b6 +\catcode`\^^97=11 \uccode`\^^97=`\^^97 \lccode`\^^97=`\^^b7 +\catcode`\^^98=11 \uccode`\^^98=`\^^98 \lccode`\^^98=`\^^b8 +\catcode`\^^99=11 \uccode`\^^99=`\^^99 \lccode`\^^99=`\^^b9 +\catcode`\^^9a=11 \uccode`\^^9a=`\^^9a \lccode`\^^9a=`\^^ba +\catcode`\^^9b=11 \uccode`\^^9b=`\^^9b \lccode`\^^9b=`\^^bb +\catcode`\^^9c=11 \uccode`\^^9c=`\^^9c \lccode`\^^9c=`\^^bc +\catcode`\^^c0=11 \uccode`\^^c0=`\^^c0 \lccode`\^^c0=`\^^e0 +\catcode`\^^c1=11 \uccode`\^^c1=`\^^c1 \lccode`\^^c1=`\^^e1 +\catcode`\^^c2=11 \uccode`\^^c2=`\^^c2 \lccode`\^^c2=`\^^e2 +\catcode`\^^c3=11 \uccode`\^^c3=`\^^c3 \lccode`\^^c3=`\^^e3 +\catcode`\^^c4=11 \uccode`\^^c4=`\^^c4 \lccode`\^^c4=`\^^e4 +\catcode`\^^c5=11 \uccode`\^^c5=`\^^c5 \lccode`\^^c5=`\^^e5 +\catcode`\^^c6=11 \uccode`\^^c6=`\^^c6 \lccode`\^^c6=`\^^e6 +\catcode`\^^c7=11 \uccode`\^^c7=`\^^c7 \lccode`\^^c7=`\^^e7 +\catcode`\^^c8=11 \uccode`\^^c8=`\^^c8 \lccode`\^^c8=`\^^e8 +\catcode`\^^c9=11 \uccode`\^^c9=`\^^c9 \lccode`\^^c9=`\^^e9 +\catcode`\^^ca=11 \uccode`\^^ca=`\^^ca \lccode`\^^ca=`\^^ea +\catcode`\^^cb=11 \uccode`\^^cb=`\^^cb \lccode`\^^cb=`\^^eb +\catcode`\^^cc=11 \uccode`\^^cc=`\^^cc \lccode`\^^cc=`\^^ec +\catcode`\^^cd=11 \uccode`\^^cd=`\^^cd \lccode`\^^cd=`\^^ed +\catcode`\^^ce=11 \uccode`\^^ce=`\^^ce \lccode`\^^ce=`\^^ee +\catcode`\^^cf=11 \uccode`\^^cf=`\^^cf \lccode`\^^cf=`\^^ef +\catcode`\^^d0=11 \uccode`\^^d0=`\^^d0 \lccode`\^^d0=`\^^f0 +\catcode`\^^d1=11 \uccode`\^^d1=`\^^d1 \lccode`\^^d1=`\^^f1 +\catcode`\^^d2=11 \uccode`\^^d2=`\^^d2 \lccode`\^^d2=`\^^f2 +\catcode`\^^d3=11 \uccode`\^^d3=`\^^d3 \lccode`\^^d3=`\^^f3 +\catcode`\^^d4=11 \uccode`\^^d4=`\^^d4 \lccode`\^^d4=`\^^f4 +\catcode`\^^d5=11 \uccode`\^^d5=`\^^d5 \lccode`\^^d5=`\^^f5 +\catcode`\^^d6=11 \uccode`\^^d6=`\^^d6 \lccode`\^^d6=`\^^f6 +\catcode`\^^d7=11 \uccode`\^^d7=`\^^d7 \lccode`\^^d7=`\^^f7 +\catcode`\^^d8=11 \uccode`\^^d8=`\^^d8 \lccode`\^^d8=`\^^f8 +\catcode`\^^d9=11 \uccode`\^^d9=`\^^d9 \lccode`\^^d9=`\^^f9 +\catcode`\^^da=11 \uccode`\^^da=`\^^da \lccode`\^^da=`\^^fa +\catcode`\^^db=11 \uccode`\^^db=`\^^db \lccode`\^^db=`\^^fb +\catcode`\^^dc=11 \uccode`\^^dc=`\^^dc \lccode`\^^dc=`\^^fc +\catcode`\^^dd=11 \uccode`\^^dd=`\^^dd \lccode`\^^dd=`\^^fd +\catcode`\^^de=11 \uccode`\^^de=`\^^de \lccode`\^^de=`\^^fe +\catcode`\^^df=11 \uccode`\^^df=`\^^df \lccode`\^^df=`\^^ff +% Lower case +\catcode`\^^a0=11 \uccode`\^^a0=`\^^80 \lccode`\^^a0=`\^^a0 +\catcode`\^^a1=11 \uccode`\^^a1=`\^^81 \lccode`\^^a1=`\^^a1 +\catcode`\^^a2=11 \uccode`\^^a2=`\^^82 \lccode`\^^a2=`\^^a2 +\catcode`\^^a3=11 \uccode`\^^a3=`\^^83 \lccode`\^^a3=`\^^a3 +\catcode`\^^a4=11 \uccode`\^^a4=`\^^84 \lccode`\^^a4=`\^^a4 +\catcode`\^^a5=11 \uccode`\^^a5=`\^^85 \lccode`\^^a5=`\^^a5 +\catcode`\^^a6=11 \uccode`\^^a6=`\^^86 \lccode`\^^a6=`\^^a6 +\catcode`\^^a7=11 \uccode`\^^a7=`\^^87 \lccode`\^^a7=`\^^a7 +\catcode`\^^a8=11 \uccode`\^^a8=`\^^88 \lccode`\^^a8=`\^^a8 +\catcode`\^^a9=11 \uccode`\^^a9=`\^^89 \lccode`\^^a9=`\^^a9 +\catcode`\^^aa=11 \uccode`\^^aa=`\^^8a \lccode`\^^aa=`\^^aa +\catcode`\^^ab=11 \uccode`\^^ab=`\^^8b \lccode`\^^ab=`\^^ab +\catcode`\^^ac=11 \uccode`\^^ac=`\^^8c \lccode`\^^ac=`\^^ac +\catcode`\^^ad=11 \uccode`\^^ad=`\^^8d \lccode`\^^ad=`\^^ad +\catcode`\^^ae=11 \uccode`\^^ae=`\^^8e \lccode`\^^ae=`\^^ae +\catcode`\^^af=11 \uccode`\^^af=`\^^8f \lccode`\^^af=`\^^af +\catcode`\^^b0=11 \uccode`\^^b0=`\^^90 \lccode`\^^b0=`\^^b0 +\catcode`\^^b1=11 \uccode`\^^b1=`\^^91 \lccode`\^^b1=`\^^b1 +\catcode`\^^b2=11 \uccode`\^^b2=`\^^92 \lccode`\^^b2=`\^^b2 +\catcode`\^^b3=11 \uccode`\^^b3=`\^^93 \lccode`\^^b3=`\^^b3 +\catcode`\^^b4=11 \uccode`\^^b4=`\^^94 \lccode`\^^b4=`\^^b4 +\catcode`\^^b5=11 \uccode`\^^b5=`\^^95 \lccode`\^^b5=`\^^b5 +\catcode`\^^b6=11 \uccode`\^^b6=`\^^96 \lccode`\^^b6=`\^^b6 +\catcode`\^^b7=11 \uccode`\^^b7=`\^^97 \lccode`\^^b7=`\^^b7 +\catcode`\^^b8=11 \uccode`\^^b8=`\^^98 \lccode`\^^b8=`\^^b8 +\catcode`\^^b9=11 \uccode`\^^b9=`\^^99 \lccode`\^^b9=`\^^b9 +\catcode`\^^ba=11 \uccode`\^^ba=`\^^9a \lccode`\^^ba=`\^^ba +\catcode`\^^bb=11 \uccode`\^^bb=`\^^9b \lccode`\^^bb=`\^^bb +\catcode`\^^e0=11 \uccode`\^^e0=`\^^c0 \lccode`\^^e0=`\^^e0 +\catcode`\^^e1=11 \uccode`\^^e1=`\^^c1 \lccode`\^^e1=`\^^e1 +\catcode`\^^e2=11 \uccode`\^^e2=`\^^c2 \lccode`\^^e2=`\^^e2 +\catcode`\^^e3=11 \uccode`\^^e3=`\^^c3 \lccode`\^^e3=`\^^e3 +\catcode`\^^e4=11 \uccode`\^^e4=`\^^c4 \lccode`\^^e4=`\^^e4 +\catcode`\^^e5=11 \uccode`\^^e5=`\^^c5 \lccode`\^^e5=`\^^e5 +\catcode`\^^e6=11 \uccode`\^^e6=`\^^c6 \lccode`\^^e6=`\^^e6 +\catcode`\^^e7=11 \uccode`\^^e7=`\^^c7 \lccode`\^^e7=`\^^e7 +\catcode`\^^e8=11 \uccode`\^^e8=`\^^c8 \lccode`\^^e8=`\^^e8 +\catcode`\^^e9=11 \uccode`\^^e9=`\^^c9 \lccode`\^^e9=`\^^e9 +\catcode`\^^ea=11 \uccode`\^^ea=`\^^ca \lccode`\^^ea=`\^^ea +\catcode`\^^eb=11 \uccode`\^^eb=`\^^cb \lccode`\^^eb=`\^^eb +\catcode`\^^ec=11 \uccode`\^^ec=`\^^cc \lccode`\^^ec=`\^^ec +\catcode`\^^ed=11 \uccode`\^^ed=`\^^cd \lccode`\^^ed=`\^^ed +\catcode`\^^ee=11 \uccode`\^^ee=`\^^ce \lccode`\^^ee=`\^^ee +\catcode`\^^ef=11 \uccode`\^^ef=`\^^cf \lccode`\^^ef=`\^^ef +\catcode`\^^f0=11 \uccode`\^^f0=`\^^d0 \lccode`\^^f0=`\^^f0 +\catcode`\^^f1=11 \uccode`\^^f1=`\^^d1 \lccode`\^^f1=`\^^f1 +\catcode`\^^f2=11 \uccode`\^^f2=`\^^d2 \lccode`\^^f2=`\^^f2 +\catcode`\^^f3=11 \uccode`\^^f3=`\^^d3 \lccode`\^^f3=`\^^f3 +\catcode`\^^f4=11 \uccode`\^^f4=`\^^d4 \lccode`\^^f4=`\^^f4 +\catcode`\^^f5=11 \uccode`\^^f5=`\^^d5 \lccode`\^^f5=`\^^f5 +\catcode`\^^f6=11 \uccode`\^^f6=`\^^d6 \lccode`\^^f6=`\^^f6 +\catcode`\^^f7=11 \uccode`\^^f7=`\^^d7 \lccode`\^^f7=`\^^f7 +\catcode`\^^f8=11 \uccode`\^^f8=`\^^d8 \lccode`\^^f8=`\^^f8 +\catcode`\^^f9=11 \uccode`\^^f9=`\^^d9 \lccode`\^^f9=`\^^f9 +\catcode`\^^fa=11 \uccode`\^^fa=`\^^da \lccode`\^^fa=`\^^fa +\catcode`\^^fb=11 \uccode`\^^fb=`\^^db \lccode`\^^fb=`\^^fb +\catcode`\^^fc=11 \uccode`\^^fc=`\^^dc \lccode`\^^fc=`\^^fc +\catcode`\^^fd=11 \uccode`\^^fd=`\^^dd \lccode`\^^fd=`\^^fd +\catcode`\^^fe=11 \uccode`\^^fe=`\^^de \lccode`\^^fe=`\^^fe +\catcode`\^^ff=11 \uccode`\^^ff=`\^^df \lccode`\^^ff=`\^^ff +%%End of LMTone option %% +\else +%% +%% Other CM fonts +%% eight points fonts %% +\font\eightrm=cmr8 +\font\eightbf=cmbx8 +\font\eightsl=cmsl8 +\font\eighttt=cmtt8 +\font\eightit=cmti8 +\font\eightss=cmss8 +%% five points fonts %% +\font\fivess=cmss8 scaled 625 +%% six points fonts %% +\font\sixrm=cmr6 +\font\sixbf=cmbx6 +\font\sixss=cmss8 scaled 750 +%% seven points fonts %% +\font\sevenss=cmss8 scaled 875 +%% nine points fonts %% +\font\ninerm=cmr9 +\font\ninebf=cmbx9 +\font\niness=cmss9 +%% ten points fonts (not defined in plain.tex)%% +\font\tenss=cmss10 +\font\tencsc=cmcsc10 +%% twelve points fonts %% +\font\twelverm=cmr12 +\font\twelvebf=cmbx12 +\font\twelvesl=cmsl12 +\font\twelvett=cmtt12 +\font\twelveit=cmti12 +\font\twelvess=cmss12 +\font\twelvecsc=cmcsc10 scaled 1200 +%% fourteen points fonts %% +\font\fourteenrm=cmr12 scaled 1167 +\font\fourteenbf=cmbx12 scaled 1167 +\font\fourteensl=cmsl12 scaled 1167 +\font\fourteentt=cmtt12 scaled 1167 +\font\fourteenit=cmti12 scaled 1167 +\font\fourteenss=cmss12 scaled 1167 +\font\fourteencsc=cmcsc10 scaled 1400 +%% twenty points fonts %% +\font\twentyrm=cmr12 scaled 1667 +\font\twentybf=cmbx12 scaled 1667 +\font\twentysl=cmsl12 scaled 1667 +\font\twentytt=cmtt12 scaled 1667 +\font\twentyit=cmti12 scaled 1667 +\font\twentyss=cmss12 scaled 1667 +\font\twentycsc=cmcsc10 scaled 2000 +%% twentyfour points fonts %% +\font\twentyfourrm=cmr12 scaled 2000 +\font\twentyfourbf=cmbx12 scaled 2000 +\font\twentyfoursl=cmsl12 scaled 2000 +\font\twentyfourtt=cmtt12 scaled 2000 +\font\twentyfourit=cmti12 scaled 2000 +\font\twentyfourss=cmss12 scaled 2000 +\font\twentyfourcsc=cmcsc10 scaled 2400 +%% AMS activated +\ifx\ifAMS\relax% +%% small caps font +\font\eightcsc=cmcsc8 +\else +%% small caps font +\font\eightcsc=cmcsc10 scaled 800 +\fi +%% end of AMS option +\fi +%% end of LMT1 option +%% Support of TS1 fonts +\ifx\ifLMTS\relax% +\immediate\write16{*** TS1 option activated. ts1-LM fonts are used ***} +\input TS1mac.tex +\fi +%% End of LMTSone option %% +%% DStroke option %% +\ifx\ifDS\relax% +\immediate\write16{*** Doublestroke option activated. DS fonts used ***} +\font\fiveds=dsrom8 scaled 625 +\font\sixds=dsrom8 scaled 750 +\font\sevends=dsrom8 scaled 875 +\font\eightds=dsrom8 +\font\nineds=dsrom10 scaled 900 +\font\tends=dsrom10 +\font\twelveds=dsrom12 +\font\fourteends=dsrom12 scaled 1167 +\font\twentyds=dsrom12 scaled 1667 +\font\twentyfourds=dsrom12 scaled 2000 +\fi +%% End of DStroke option %% +%% +%% Families defined in plain.tex %% +%% fam0 rm roman +%% fam1 i math-italic +%% fam2 sy symbols +%% fam3 ex extension fonts +%% fam4 itfam text-italic +%% fam5 slfam slanted +%% fam6 bffam roman boldface +%% fam7 ttfam teletype +%% +%% New family math-italic bold. Must be fam8 %% +\newfam\mibfam +%% +%% New family symbols boldface. Must be fam9 %% +\newfam\bsyfam +%% +%% New family sans serif %% +\newfam\ssfam +%% +%% New family small caps %% +\newfam\cscfam +%% +%% New family doublestroke %% +\ifx\ifDS\relax% +\input DSmac.tex +\fi +\def\ds{} +%% +%% Change to tenpoint fonts %% +\def\tenpoint{ +\textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm +\textfont1=\teni \scriptfont1=\seveni \scriptscriptfont1=\fivei +\def\mit{\fam1 } \def\oldstyle{\fam1 \teni} +\textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont2=\fivesy +\def\cal{\fam2 } +\textfont3=\tenex \scriptfont3=\sevenex \scriptscriptfont3=\fiveex +\textfont\itfam=\tenit +\textfont\slfam=\tensl +\textfont\ttfam=\tentt +\textfont\ssfam=\tenss +\scriptfont\ssfam=\sevenss \scriptscriptfont\ssfam=\fivess +\textfont\bffam=\tenbf +\scriptfont\bffam=\sevenbf \scriptscriptfont\bffam=\fivebf +\textfont\cscfam=\tencsc +\textfont\mibfam=\tenmib +\scriptfont\mibfam=\sevenmib \scriptscriptfont\bffam=\fivemib +\textfont\bsyfam=\tenbsy +\scriptfont\bsyfam=\sevenbsy \scriptscriptfont\bffam=\fivebsy +\ifx\ifDS\relax% +\textfont\dsfam=\tends +\scriptfont\dsfam=\sevends \scriptscriptfont\dsfam=\fiveds +\def\ds{\fam\dsfam\tends} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \tenrm \let\tcfont=\tencrm} +\def\it{\fam\itfam\tenit \let\tcfont=\tencit} +\def\sl{\fam\slfam\tensl \let\tcfont=\tencsl} +\def\tt{\fam\ttfam\tentt \let\tcfont=\tenctt} +\def\sf{\fam\ssfam\tenss \let\tcfont=\tencss} +\def\bf{\fam\bffam\tenbf \let\tcfont=\tencbf} +\else +\def\rm{\fam0 \tenrm} +\def\it{\fam\itfam\tenit} +\def\sl{\fam\slfam\tensl} +\def\tt{\fam\ttfam\tentt} +\def\sf{\fam\ssfam\tenss} +\def\bf{\fam\bffam\tenbf} +\fi +\def\sc{\fam\cscfam\tencsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\tenmib} +\def\bcal{\fam\bsyfam\tenbsy} +\def\unsetmathbold{ +\textfont1=\teni \scriptfont1=\seveni \scriptscriptfont1=\fivei +\textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont2=\fivesy +\def\oldstyle{\fam1 \teni} } +\def\setmathbold{ +\textfont1=\tenmib \scriptfont1=\sevenmib \scriptscriptfont1=\fivemib +\textfont2=\tenbsy \scriptfont2=\sevenbsy \scriptscriptfont2=\fivebsy +\def\oldstyle{\fam1 \tenmib} } +\normalbaselineskip=12pt minus 1pt +\setbox\strutbox=\hbox{\vrule height8.5pt depth3.5pt width0pt} +\bigsize=8.5pt +\Bigsize=11.5pt +\biggsize=14.5pt +\Biggsize=17.5pt +\normalbaselines\rm} +%% +%% Change to twelve points fonts %% +\def\twelvepoint{ +\textfont0=\twelverm \scriptfont0=\eightrm \scriptscriptfont0=\sixrm +\textfont1=\twelvei \scriptfont1=\eighti \scriptscriptfont1=\sixi +\def\mit{\fam1 } \def\oldstyle{\fam1 \twelvei} +\textfont2=\twelvesy \scriptfont2=\eightsy \scriptscriptfont2=\sixsy +\def\cal{\fam2 } +\textfont3=\twelveex \scriptfont3=\eightex \scriptscriptfont3=\sixex +\textfont\itfam=\twelveit +\textfont\slfam=\twelvesl +\textfont\ttfam=\twelvett +\textfont\ssfam=\twelvess +\scriptfont\ssfam=\eightss \scriptscriptfont\ssfam=\sixss +\textfont\bffam=\twelvebf +\scriptfont\bffam=\eightbf \scriptscriptfont\bffam=\sixbf +\textfont\cscfam=\twelvecsc +\textfont\mibfam=\twelvemib +\scriptfont\mibfam=\eightmib \scriptscriptfont\mibfam=\sixmib +\textfont\bsyfam=\twelvebsy +\scriptfont\bsyfam=\eightbsy \scriptscriptfont\bsyfam=\sixbsy +\ifx\ifDS\relax% +\textfont\dsfam=\twelveds +\scriptfont\dsfam=\eightds \scriptscriptfont\dsfam=\sixds +\def\ds{\fam\dsfam\twelveds} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \twelverm \let\tcfont=\twelvecrm} +\def\it{\fam\itfam\twelveit \let\tcfont=\twelvecit} +\def\sl{\fam\slfam\twelvesl \let\tcfont=\twelvecsl} +\def\tt{\fam\ttfam\twelvett \let\tcfont=\twelvectt} +\def\sf{\fam\ssfam\twelvess \let\tcfont=\twelvecss} +\def\bf{\fam\bffam\twelvebf \let\tcfont=\twelvecss} +\else +\def\rm{\fam0 \twelverm} +\def\it{\fam\itfam\twelveit} +\def\sl{\fam\slfam\twelvesl} +\def\tt{\fam\ttfam\twelvett} +\def\sf{\fam\ssfam\twelvess} +\def\bf{\fam\bffam\twelvebf} +\fi +\def\sc{\fam\cscfam\twelvecsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\twelvemib} +\def\bcal{\fam\bsyfam} +\def\unsetmathbold{ +\textfont1=\twelvei \scriptfont1=\eighti \scriptscriptfont1=\sixi +\textfont2=\twelvesy \scriptfont2=\eightsy \scriptscriptfont2=\sixsy +\def\oldstyle{\fam1 \twelvei} } +\def\setmathbold{ +\textfont1=\twelvemib \scriptfont1=\eightmib \scriptscriptfont1=\sixmib +\textfont2=\twelvebsy \scriptfont2=\eightbsy \scriptscriptfont2=\sixbsy +\def\oldstyle{\fam1 \twelvemib} } +\normalbaselineskip=14pt minus 1pt +\setbox\strutbox=\hbox{\vrule height10pt depth4pt width0pt} +\bigsize=10.2pt +\Bigsize=13.8pt +\biggsize=17.4pt +\Biggsize=21pt +\normalbaselines\rm} +%% +%% Change to eight points fonts %% +\def\eightpoint{ +\textfont0=\eightrm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm +\textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei +\def\mit{\fam1 } \def\oldstyle{\fam1 \eighti} +\textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy +\def\cal{\fam2 } +\textfont3=\eightex \scriptfont3=\sixex \scriptscriptfont3=\fiveex +\textfont\itfam=\eightit +\textfont\slfam=\eightsl +\textfont\ttfam=\eighttt +\textfont\ssfam=\eightss +\scriptfont\ssfam=\sixss \scriptscriptfont\ssfam=\fivess +\textfont\bffam=\eightbf +\scriptfont\bffam=\sixbf \scriptscriptfont\bffam=\fivebf +\textfont\cscfam=\eightcsc +\textfont\mibfam=\eightmib +\scriptfont\mibfam=\sixmib \scriptscriptfont\mibfam=\fivemib +\textfont\bsyfam=\eightbsy +\scriptfont\bsyfam=\sixbsy \scriptscriptfont\bsyfam=\fivebsy +\ifx\ifDS\relax% +\textfont\dsfam=\eightds +\scriptfont\dsfam=\sixds \scriptscriptfont\dsfam=\fiveds +\def\ds{\fam\dsfam\eightds} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \eightrm \let\tcfont=\eightcrm} +\def\it{\fam\itfam\eightit \let\tcfont=\eightcit} +\def\sl{\fam\slfam\eightsl \let\tcfont=\eightcsl} +\def\tt{\fam\ttfam\eighttt \let\tcfont=\eightctt} +\def\sf{\fam\ssfam\eightss \let\tcfont=\eightcss} +\def\bf{\fam\bffam\eightbf \let\tcfont=\eightcbf} +\else +\def\rm{\fam0 \eightrm} +\def\it{\fam\itfam\eightit} +\def\sl{\fam\slfam\eightsl} +\def\tt{\fam\ttfam\eighttt} +\def\sf{\fam\ssfam\eightss} +\def\bf{\fam\bffam\eightbf} +\fi +\def\sc{\fam\cscfam\eightcsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\eightmib} +\def\bcal{\fam\bsyfam} +\def\unsetmathbold{ +\textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei +\textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy +\def\oldstyle{\fam1 \eighti} } +\def\setmathbold{ +\textfont1=\eightmib \scriptfont1=\sixmib \scriptscriptfont1=\fivemib +\textfont2=\eightbsy \scriptfont2=\sixbsy \scriptscriptfont2=\fivebsy +\def\oldstyle{\fam1 \eightmib} } +\normalbaselineskip=9pt +\setbox\strutbox=\hbox{\vrule height7pt depth2pt width0pt} +\bigsize=6.8pt +\Bigsize=9.2pt +\biggsize=11.6pt +\Biggsize=14pt +\normalbaselines\rm} +%% +%% Change to fourteen points fonts %% +\def\fourteenpoint{ +\textfont0=\fourteenrm \scriptfont0=\ninerm \scriptscriptfont0=\sevenrm +\textfont1=\fourteeni \scriptfont1=\ninei \scriptscriptfont1=\seveni +\def\mit{\fam1 } \def\oldstyle{\fam1 \fourteeni} +\textfont2=\fourteensy \scriptfont2=\ninesy \scriptscriptfont2=\sevensy +\def\cal{\fam2 } +\textfont3=\fourteenex \scriptfont3=\nineex \scriptscriptfont3=\sevenex +\textfont\itfam=\fourteenit +\textfont\slfam=\fourteensl +\textfont\ttfam=\fourteentt +\textfont\ssfam=\fourteenss +\scriptfont\ssfam=\niness \scriptscriptfont\ssfam=\sevenss +\textfont\bffam=\fourteenbf +\scriptfont\bffam=\ninebf \scriptscriptfont\bffam=\sevenbf +\textfont\cscfam=\fourteencsc +\textfont\mibfam=\fourteenmib +\scriptfont\mibfam=\ninemib \scriptscriptfont\mibfam=\sevenmib +\textfont\bsyfam=\fourteenbsy +\scriptfont\bsyfam=\ninebsy \scriptscriptfont\bsyfam=\sevenbsy +\ifx\ifDS\relax% +\textfont\dsfam=\fourteends +\scriptfont\dsfam=\nineds \scriptscriptfont\dsfam=\sevends +\def\ds{\fam\dsfam\fourteends} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \fourteenrm \let\tcfont=\fourteencrm} +\def\it{\fam\itfam\fourteenit \let\tcfont=\fourteencit} +\def\sl{\fam\slfam\fourteensl \let\tcfont=\fourteencsl} +\def\tt{\fam\ttfam\fourteentt \let\tcfont=\fourteenctt} +\def\bf{\fam\bffam\fourteenbf \let\tcfont=\fourteencbf} +\def\sf{\fam\ssfam\fourteenss \let\tcfont=\fourteencss} +\else +\def\rm{\fam0 \fourteenrm} +\def\it{\fam\itfam\fourteenit} +\def\sl{\fam\slfam\fourteensl} +\def\tt{\fam\ttfam\fourteentt} +\def\bf{\fam\bffam\fourteenbf} +\def\sf{\fam\ssfam\fourteenss} +\fi +\def\sc{\fam\cscfam\fourteencsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\fourteenmib} +\def\bcal{\fam\bsyfam} +\def\unsetmathbold{ +\textfont1=\fourteeni \scriptfont1=\ninei \scriptscriptfont1=\seveni +\textfont2=\fourteensy \scriptfont2=\ninesy \scriptscriptfont2=\sevensy +\def\oldstyle{\fam1 \fourteeni} } +\def\setmathbold{ +\textfont1=\fourteenmib \scriptfont1=\ninemib \scriptscriptfont1=\sevenmib +\textfont2=\fourteenbsy \scriptfont2=\ninebsy \scriptscriptfont2=\sevenbsy +\def\oldstyle{\fam1 \fourteenmib} } +\normalbaselineskip=17pt minus 1pt +\setbox\strutbox=\hbox{\vrule height12pt depth5pt width0pt} +\bigsize=11.9pt +\Bigsize=16.1pt +\biggsize=20.3pt +\Biggsize=24.5pt +\normalbaselines\rm} +%% +%% Change to twentypoint fonts %% +\def\twentypoint{ +\textfont0=\twentyrm \scriptfont0=\fourteenrm \scriptscriptfont0=\tenrm +\textfont1=\twentyi \scriptfont1=\fourteeni \scriptscriptfont1=\teni +\def\mit{\fam1 } \def\oldstyle{\fam1 \twentyi} +\textfont2=\twentysy \scriptfont2=\fourteensy \scriptscriptfont2=\tensy +\def\cal{\fam2 } +\textfont3=\twentyex \scriptfont3=\fourteenex \scriptscriptfont3=\tenex +\textfont\itfam=\twentyit +\textfont\slfam=\twentysl +\textfont\ttfam=\twentytt +\textfont\ssfam=\twentyss +\scriptfont\ssfam=\fourteenss \scriptscriptfont\ssfam=\tenss +\textfont\bffam=\twentybf +\scriptfont\bffam=\fourteenbf \scriptscriptfont\bffam=\tenbf +\textfont\cscfam=\twentycsc +\textfont\mibfam=\twentymib +\scriptfont\mibfam=\fourteenmib \scriptscriptfont\mibfam=\tenmib +\textfont\bsyfam=\twentybsy +\scriptfont\bsyfam=\fourteenbsy \scriptscriptfont\bsyfam=\tenbsy +\ifx\ifDS\relax% +\textfont\dsfam=\twentyds +\scriptfont\dsfam=\fourteends \scriptscriptfont\dsfam=\tends +\def\ds{\fam\dsfam\twentyds} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \twentyrm \let\tcfont=\twentycrm} +\def\it{\fam\itfam\twentyit \let\tcfont=\twentycit} +\def\sl{\fam\slfam\twentysl \let\tcfont=\twentycsl} +\def\tt{\fam\ttfam\twentytt \let\tcfont=\twentyctt} +\def\sf{\fam\ssfam\twentyss \let\tcfont=\twentycss} +\def\bf{\fam\bffam\twentybf \let\tcfont=\twentycbf} +\else +\def\rm{\fam0 \twentyrm} +\def\it{\fam\itfam\twentyit} +\def\sl{\fam\slfam\twentysl} +\def\tt{\fam\ttfam\twentytt} +\def\sf{\fam\ssfam\twentyss} +\def\bf{\fam\bffam\twentybf} +\fi +\def\sc{\fam\cscfam\twentycsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\twentymib} +\def\unsetmathbold{ +\textfont1=\twentyi \scriptfont1=\fourteeni \scriptscriptfont1=\teni +\textfont2=\twentysy \scriptfont2=\fourteensy \scriptscriptfont2=\tensy +\def\oldstyle{\fam1 \twentyi} } +\def\setmathbold{ +\textfont1=\twentymib \scriptfont1=\fourteenmib \scriptscriptfont1=\tenmib +\textfont2=\twentybsy \scriptfont2=\fourteenbsy \scriptscriptfont2=\tenbsy +\def\oldstyle{\fam1 \twentymib} } +\normalbaselineskip=24pt minus 2pt +\setbox\strutbox=\hbox{\vrule height17pt depth7pt width0pt} +\bigsize=17pt +\Bigsize=23pt +\biggsize=29pt +\Biggsize=35pt +\normalbaselines\rm} +%% +%% Change to twentyfour points fonts %% +\def\twentyfourpoint{ +\textfont0=\twentyfourrm \scriptfont0=\fourteenrm \scriptscriptfont0=\twelverm +\textfont1=\twentyfouri \scriptfont1=\fourteeni \scriptscriptfont1=\twelvei +\def\mit{\fam1 } \def\oldstyle{\fam1 \twentyfouri} +\textfont2=\twentyfoursy \scriptfont2=\fourteensy \scriptscriptfont2=\twelvesy +\def\cal{\fam2 } +\textfont3=\twentyfourex \scriptfont3=\fourteenex \scriptscriptfont3=\twelveex +\textfont\itfam=\twentyfourit +\textfont\slfam=\twentyfoursl +\textfont\ttfam=\twentyfourtt +\textfont\ssfam=\twentyfourss +\scriptfont\ssfam=\fourteenss \scriptscriptfont\ssfam=\twelvess +\textfont\bffam=\twentyfourbf +\scriptfont\bffam=\fourteenbf \scriptscriptfont\bffam=\twelvebf +\textfont\cscfam=\twentyfourcsc +\textfont\mibfam=\twentyfourmib +\scriptfont\mibfam=\fourteenmib \scriptscriptfont\mibfam=\twelvemib +\textfont\bsyfam=\twentyfourbsy +\scriptfont\bsyfam=\fourteenbsy \scriptscriptfont\bsyfam=\twelvebsy +\ifx\ifDS\relax% +\textfont\dsfam=\twentyfourds +\scriptfont\dsfam=\fourteends \scriptscriptfont\dsfam=\twelveds +\def\ds{\fam\dsfam\twentyfourds} +\else +{} +\fi +\ifx\ifLMTS\relax% +\def\rm{\fam0 \twentyfourrm \let\tcfont=\twentyfourcrm} +\def\it{\fam\itfam\twentyfourit \let\tcfont=\twentyfourcit} +\def\sl{\fam\itfam\twentyfoursl \let\tcfont=\twentyfourcsl} +\def\tt{\fam\ttfam\twentyfourtt \let\tcfont=\twentyfourctt} +\def\sf{\fam\ssfam\twentyfourss \let\tcfont=\twentyfourcss} +\def\bf{\fam\bffam\twentyfourbf \let\tcfont=\twentyfourcbf} +\else +\def\rm{\fam0 \twentyfourrm} +\def\it{\fam\itfam\twentyfourit} +\def\sl{\fam\itfam\twentyfoursl} +\def\tt{\fam\ttfam\twentyfourtt} +\def\sf{\fam\ssfam\twentyfourss} +\def\bf{\fam\bffam\twentyfourbf} +\fi +\def\sc{\fam\cscfam\twentyfourcsc} +\def\mb{\fam\mibfam} \def\boldstyle{\fam\mibfam\twentyfourmib} +\def\bcal{\fam\bsyfam} +\def\unsetmathbold{ +\textfont1=\twentyfouri \scriptfont1=\fourteeni \scriptscriptfont1=\twelvei +\textfont2=\twentyfoursy \scriptfont2=\fourteensy \scriptscriptfont2=\twelvesy +\def\oldstyle{\fam1 \twentyfouri} } +\def\setmathbold{ +\textfont1=\twentyfourmib \scriptfont1=\fourteenmib +\scriptscriptfont1=\twelvemib +\textfont2=\twentyfourbsy \scriptfont2=\fourteenbsy +\scriptscriptfont2=\twelvebsy +\def\oldstyle{\fam1 \twentyfourmib} } +\normalbaselineskip=28pt minus 2pt +\setbox\strutbox=\hbox{\vrule height20pt depth8pt width0pt} +\bigsize=20.4pt +\Bigsize=27.6pt +\biggsize=34.8pt +\Biggsize=42pt +\normalbaselines\rm} +%% +%% double space +\def\doublespace{ +\normalbaselineskip=24pt minus 1pt +\setbox\strutbox=\hbox{\vrule height17pt depth 7pt width0pt} +\normalbaselines} +%% +%% Initial set at ten points +\tenpoint + diff --git a/obsolete/macros/plain/contrib/siam/READ.ME b/obsolete/macros/plain/contrib/siam/READ.ME new file mode 100644 index 0000000000..341a72aaff --- /dev/null +++ b/obsolete/macros/plain/contrib/siam/READ.ME @@ -0,0 +1,30 @@ +READ.ME 12/11/92 + +The following files constitute the full distribution +of SIAM's TeX macro package. The files are: + +siamptex.sty +docuptex.tex +pexample.tex + +docuptex.tex is the documentation file and should be refered to +for information about using the macros. + +The SIAM macro's home is NETLIB@research.att.com, accessible through email. + +Both the LaTeX and plain TeX macros can be accessed through NETLIB: +Send an e-mail message to netlib@research.att.com, the body of the +message should be: + + send siamltex.all from typesetting + +for the LaTeX version, and + + send siamptex.all from typesetting + +for the plain TeX version. + +Questions, problems, bugs, and bug fixes should be +forwarded to SIAM TeX Support, 3600 University City Science Center, +Philadelphia PA, 19104. E-mail to duggan@siam.org. + diff --git a/obsolete/macros/plain/contrib/siam/docuptex.tex b/obsolete/macros/plain/contrib/siam/docuptex.tex new file mode 100644 index 0000000000..5cf8f39ddf --- /dev/null +++ b/obsolete/macros/plain/contrib/siam/docuptex.tex @@ -0,0 +1,361 @@ +\input siamptex.sty + +% The definitions are to provide a verbatim text environment + +\def\uncatcodespecials{\def\do##1{\catcode`##1=12 }\dospecials} +\def\setupverbatim{\tt% + \def\par{\leavevmode\endgraf}% + \obeylines\uncatcodespecials\obeyspaces} +{\obeyspaces\global\let =\ } +\def\doverbatim#1{\def\next##1#1{##1\endgroup}\next} +\def\verbatim{\begingroup\setupverbatim\doverbatim} + + +\overfullrule=0pt + +\topmatter +\vol{1} +\no{1, pp.~000--000} +\journal{SIAM J. E{\smc XAMPLE} F{\smc ILES}} +\date{October 1992} +\copyyear{1992} +\code{000} + +\title Using SIAM's \TeX\ Macros\endtitle + +\shorttitle{USING SIAM'S \TeX\ MACROS} + +\recdate{*}{October 8, 1992. +This work was supported by the Society for Industrial +and Applied Mathematics} + +\author Paul Duggan\fnmark{$^{\dag}$}\endauthor + +\address{$^{\dag}$}{Society for Industrial and Applied Mathematics, +Philadelphia, Pennsylvania ({\tt duggan@siam.org}). Questions, comments, +or corrections to this document may be directed to that email address} + +\abstract{} +\subjclass\endsubjclass +\keywords\endkeywords + + +\endtopmatter + + +\heading{1}{Introduction} +This file is documentation for the SIAM \TeX\ macros, and provides +instruction for submission of files formatted in \TeX. + +To accommodate authors who electronically typeset their manuscripts, +SIAM supports the use of \TeX. To ensure quality typesetting according +to SIAM style standards, SIAM provides a \TeX\ macro style file. +Using \TeX\ to format a manuscript should simplify the editorial process +and lessen the author's proofreading burden. It is still necessary to +proofread with care. + +Electronic files should not be submitted until the paper has been +accepted, and then not until requested to do so by someone in the SIAM +office. Once an article is slated for an issue, +someone from the SIAM office will contact the author about any or all +of the following: editorial and stylistic queries; +supplying the source files (and any supplementary macros) +for the properly formatted article; and handling figures. + +Electronic submissions (to {\tt tex@siam.org}) should be clearly +designated as to the journal and author. Authors are responsible for ensuring +that the paper generated from the source files exactly matches the paper that +was accepted for publication by the review editor. If it does not, +that should be indicated in the transmission of the file. +When submitting a file, please be sure to include any additional +macros (other than those provided by SIAM) that will be needed to run +the paper. + +Once the files are corrected here at SIAM, we will send back the revised +proofs to be read against the original edited manuscript. We are not +set up to shuttle back and forth varying electronic versions of each +paper, so we must rely on hard copy. The author's proofreading +is an important but easily overlooked step. Even if SIAM were not +to introduce a single editorial change into your manuscript, there +would still be a need to check line and page breaks as the encoding +of Times Roman fonts would change the page makeup of a Computer +Modern file. + +A sample file is included with this distribution to demonstrate the +standard use of SIAM's macro package. To provide an incentive for +the use of \TeX\ in paper preparation, SIAM provides 100 free reprints +of the author's journal article but only to those who have made use of +the SIAM macro in proper fashion. To qualify for free reprints the +following criteria must be met: +\meti{1.} The appropriate document style line must appear at +the beginning of the source file. +\meti{2.} All top matter information (key words, affiliation, etc.) must +be present and correctly tagged. The only exception to the rule will be +the AMS subject classification. +\meti{3.} All tagging conventions, as described in this documentation +and used in the example file, must be followed. +\meti{4.} The format of the bibliography must strictly adhere to SIAM +guidelines. The appropriate tags must be used for all entries. All names +are to be keyed initial upper case cap and small caps. Only the first +and middle initials, followed by the last name, are to be used. +Last names should never be listed first. There will be no exceptions +to this requirement. An improperly prepared bibliography will, +in all cases, prevent an author from receiving free reprints + + +The distribution contains the following items: {\tt siamptex.sty}, the +main macro package; this documentation file; and a sample file, {\tt +pexample.tex}. The sample file is representative of the standard way +to apply the macros. The rest of this paper emphasizes some aspects +of applying the macros, points out options and special cases, and +describes the SIAM style standards. +The SIAM macros make use of the small caps font, {\tt cmcsc}, which +is not installed in some systems. Contact the American Mathematical +Society for information about the availability of this font. + +\heading{2}{Headings} +The top matter of a journal is in a standard format. The macro +and initial definitions should be included as follows + +\verbatim: +\def\smc{\tensmc} +\input siamptex.sty +\overfullrule=0pt + +: + +The \verbatim:\overfullrule: should be set wider while still +being edited by the author, to assist in locating lines that extend +beyond the margins. + + +The ``slugline,'' containing the journal and copyright information, is +created by special commands following the\verbatim:\topmatter: + +\verbatim: +\vol{0} +\no{0, pp.~000--000} +\journal{SIAM J. A{\smc PPL}. M{\smc ATH}.} +\date{May 1992} +\copyyear{1992} +\code{000} + +: +The information for volume, number, date, and code will likely be unknown, +or zeros should be +put in where required. SIAM will place the appropriate information in +the commands in production, however, the commands must be used. + +The title and author(s) of the paper are indicated by the +\verbatim:\title\endtitle: and \verbatim:\author\endauthor: commands. +Author support and address information is indicated as follows: + +\verbatim: +\author A.~U. Thorone\fnmark{$^{\dag}$} + \and A.~U. Thortwo\fnmark{$^{\ddag}$}\endauthor + +\address{$^{\dag}$}{Address of the first author and support} +\address{$^{\ddag}$}{Address of the second author and support} + +: + +The commands \verbatim:\shorttitle{}: and \verbatim:\shortauthor{}: +are used to designate the running heads for the paper. + +The \verbatim:\abstract{}:, \verbatim:\keywords\endkeywords:, and +\verbatim:\subjclass\endsubjclass: commands are used to include the +abstract, keywords, and AMS subject class numbers, respectively. +If there is to be only one subject classification number, the +\verbatim:\subjclass: command should be preceded by +\verbatim:\oneclass:. If the AMS numbers are unknown, leave that +information blank. Authors are responsible for providing AMS numbers. +They can be found in the Annual Index of Math Reviews, or +through {\tt e-Math} ({\tt telnet@e-math.ams.com}; login +and password are both {\tt e-math}). +This section initial information is ended by \verbatim:\endtopmatter:. + + + +\heading{3}{Equations} +Equations and are handled by standard \TeX\ commands. SIAM style is +for numbered equations to appear flush with the left margin. The +\verbatim:\leqno: and \verbatim:\leqalignno{}: commands are used for +this purpose. If any letters indicating subequations are to be used +with the numbers, they should be set in roman type. + +More information on the formatting of equations and aligned +equations are found in Knuth [1]. Authors bear primary responsibility +for formatting their equations within margins and in an aestheticly +pleasing and informative manner. + +Groups of equations that are not directly related to each other +should normally be centered independently. This may be done through +the \TeX\ math command \verbatim:\displaylines{}:. Numbering +independently centered equations can be difficult, so Seroul and Levy's [2] +macro \verbatim:\ldisplaylinesno{}: has been included in {\tt siamptex.sty}. +\verbatim:\ldisplaylinesno{}: works just like \verbatim:\leqalignno:, except +no ampersand is used to align the equations, since they are to be centered. + +\heading{4}{Text formatting} +Section and subsection headings are both included using the +\verbatim:\heading{}{}: command, which requires two arguments. The first is +for the number, and the second is the title of the section or +subsection. + +No extra spacing should be placed between paragraphs. The +\verbatim:\heading: command inserts the required spacing between sections. + +SIAM style does not normally make use of the plain \TeX's \verbatim:\item: +command. The \verbatim:\meti: command is preferred for +lists of items beginning with, for instance, bullets ($\bullet$) or +roman numerals (iv). The\verbatim:\meti: command retains normal +paragraph shape, but places all labels aligned flush right. For +example: + +\verbatim: +\meti{(i)} This is the first item. +\meti{(ii)} This is the second item of the series. + +: + +produces + +\meti{(i)} This is the first item. +\meti{(ii)} This is the second item of the series. +\medskip + +The \verbatim:\meti: macro was adapted from Seroul and Levy [2]. + +\heading{4.1}{Punctuation} +All standard punctuation and all numerals should be set in Roman type +(upright). The only exceptions are periods and commas. They may +be set to match the surrounding text. + +\heading{4.2}{Theorems, lemmas, and proofs} +Theorems, lemmas, propositions, and so forth, have macros included +for correct formatting. Below is an example. + +\verbatim: +\thm{Theorem 3.1} +Sample theorem included for illustration. Words in all caps, like +{\rm SIAM} should be set in roman type, as should all numbers and +parentheses. Note that words in displayed equations, such as +$$ x^2 = Y^2 \sin z^2 \hbox{ for all } x $$ +will appear in italic type in a theorem, though normally +they should appear in roman.\endthm + +: + +This produces: + +\thm{Theorem 3.1} +Sample theorem included for illustration. Words in all caps, like {\rm +SIAM} should be set in roman type, as should all numbers and +parentheses. Note that words in displayed equations, such as +$$ x^2 = Y^2 \sin z^2 \hbox{ for all } x $$ +will appear in italic type in a theorem, though normally +text they should appear in roman.\endthm + +The \verbatim:\lem:, \verbatim:\prop:, and \verbatim:\cor: commands +all work similarly. Named theorems should be designated with the +title in roman type, enclosed in parentheses. + +\verbatim: +\thm{Theorem 3.2 {\rm (sample theorem with title)}} + +: + +Proofs are illustrated in the following example: + +\verbatim: +\prf{Proof} +The body of the proof. +\qquad\endproof + +: + +If the proof ends with a displayed equation, the \verbatim:\endproof: +box \endproof\ should appear flush right with the margin, on line with the +equation. The \verbatim:\eqno: +command will place this in the correct position. If the equation is +already numbered, this method will not work, so just include the +\verbatim:\endproof: box and SIAM will handle making the box flush +right in production. + +\heading{5}{Figures and tables} +Figures and tables are best handled in \TeX\ by putting them within a +\verbatim:\topinsert \endinsert: environment. The appropriate amount +of space should be left for the figure, and the caption should be +formatted to be centered or as a paragraph if more than one line. Text +should be italic, eight-point type, with the words ``Fig.~\#'' in small +caps. + +SIAM tables should be formatted in eight-point type, with enough +space left between entries and surrounding lines so that they do not +touch. See Knuth [1] or Seroul and Levy [2] for more information on +the formatting of tables in \TeX. Table captions are similar to +figure captions, but the words ``Table'' and the number appear on one +line. + +SIAM supports the use of {\tt psfig} for including {\smc PostScript} +figures. All {\smc Post\-Script} figures should be sent in separate +files. See the {\tt psfig} documentation for more details on the use +of this style option. It is a good idea to submit hardcopy of all +{\smc Post\-Script} figures just in case there is difficulty in the +reproduction of the figure. Figures produced by other non-\TeX\ +methods should be included as hardcopy when the manuscript is submitted. + +\heading{6}{Bibliographies} +References are handled using the \verbatim:\Refs: command. Some +representative sample entries are illustrated below: + +\verbatim| +\Refs + +\ref 1\\ {\smc A.~U Thorone}, {\it Title of paper with lower case +letters}, SIAM J. Abbrev. Correctly, 2 (1992), pp.~000--000.\endref + +\ref 2\\ \sameauthor, % generates a 3-em rule +{\it Title of paper appearing in book}, in Book Title: +With All Initial Caps, Publisher, Location, 1992.\endref + +\ref 3\\ {\smc A.~U. Thorone, A.~U. Thortwo, and A.~U. Thorthree}, +{\it Title of Book{\rm :} Note Initial Caps and {\rm ROMAN TYPE} +for Punctuation and Acronyms}, Publisher, Location, pp.~000--000. +1992.\endref + +\ref 4\\ {\smc A. Notherauth}, {\it Title of paper that's not yet +published}, SIAM J. Abbrev. Correctly, to appear.\endref + +| + +Other types of references fall into the same general pattern. See the +sample file or any SIAM journal for other examples. Authors must +correctly format their bibliography to be considered as having used +the macros correctly. An incorrectly formatted bibliography is not +only time-consuming but very likely to have errors introduced into it by +keyboarders/copy editors. + +As an alternative to the above style of reference, an alphanumeric +code may be used in place of the number (e.g., [AUTh90]). The same +\verbatim:\Refs: and \verbatim:\ref: commands are used, but the +command \verbatim:\resetrefindent{}: must be used before the +\verbatim:\Refs: command, with the widest expected alphanumeric code +as an argument. + +Another alternative is no number, simply the authors' names and +the year of publication following in parentheses. The rest of the +format is identical. To get an entry with no number in brackets +before it, use the \verbatim:\xref: command. + + +\Refs + +\ref 1\\ {\smc D.~E. Knuth}, {\it The {\rm \TeX} book}, Addison Wesley, +Reading, MA, 1986.\endref + +\ref 2\\ {\smc R. Seroul and S. Levy}, {\it A Beginner's Book of +{\rm \TeX}}, Springer-Verlag, Berlin, New York, 1991.\endref + + +\bye diff --git a/obsolete/macros/plain/contrib/siam/pexample.tex b/obsolete/macros/plain/contrib/siam/pexample.tex new file mode 100644 index 0000000000..90ba472adf --- /dev/null +++ b/obsolete/macros/plain/contrib/siam/pexample.tex @@ -0,0 +1,523 @@ +% Sample file for SIAM's plain TeX macro package. +% +\input siamptex.sty + +% author defined macros included for illustrative purposes only. +% symbols for real numbers, complex, ... (\Bbb font from AMS-TeX +% fonts v2.x also useable) + +\def\fR{{\bf R}} +\def\fC{{\bf C}} +\def\fK{{\bf K}} + +% misc. operators +\def\Span {\mathop{\hbox{\rm span}}\nolimits} +\def\Range{\mathop{\hbox{\rm Range}}\nolimits} +\def\Det {\mathop{\hbox{\rm det}}} +\def\Re {\mathop{\hbox{\rm Re}}} +\def\Im {\mathop{\hbox{\rm Im}}} +\def\Deg {\mathop{\hbox{\rm deg}}} + +% misc. + +\def\Kr{\hbox{\bf K}} +\def\K { { K}} +\def\sT{\hbox{$\cal T$}} +\def\sB{\hbox{$\cal B$}} + +\def\bmatrix#1{\left[ \matrix{#1} \right]} + +% Each of the following commands have to be filled in with +% something. If the data is unknown, the arguments can be +% left blank. + +\topmatter +\journal{SIAM J. E{\smc XAMPLE} F{\smc ILES}} +\vol{1} +\no{1, pp.~000--000} +\date{October 1993} +\copyyear{1993} +\code{000} + + +\title SAMPLE FILE FOR SIAM PLAIN \TeX\ MACRO +PACKAGE\endtitle + +\shorttitle{SIAM MACRO EXAMPLE} + +\recdate{*}{May 1, 1992; accepted by the editors Month, x, +xxxx. This work was supported by the Society for Industrial +and Applied Mathemtics, Philadelphia, Pennsylvania} + +\author Paul Duggan\fnmark{$^{\dag}$} \and Various A.~U. +Thors\fnmark{$^{\ddag}$}\endauthor + +\address{$^{\dag}$}{Composition Department, Society for +Industrial and Applied Mathematics, 3600 University City +Science Center, Philadelphia, Pennsylvania, 19104-2688 +({\tt duggan@siam.org})} + +\address{$^{\ddag}$}{Various affiliations, supported by +various foundation grants} + +\abstract{An example of SIAM \TeX\ macros is presented. +Various aspects of composing manuscripts for SIAM's journals +are illustrated with actual examples from accepted +manuscripts. SIAM's stylistic standards are adhered to +throughout, and illustrated.} + +\keywords polynomials, SI model\endkeywords + +\subjclass 33H40, 35C01\endsubjclass + +% if there is only one AMS subject number, the +% command \oneclass should precede the \subjclass command. + +\endtopmatter + +\heading{1}{Introduction and examples} +This paper presents a sample file for the use of SIAM's +\TeX\ macro package. It illustrates the features of the +macro package, using actual examples culled from various +papers published in SIAM's journals. This sample will provide +examples of how to use the +macros to generate standard elements of journal papers, +e.g., equations, theorems, or figures. This paper also +serves as an exmple of SIAM's stylistic preferences for the +formatting of such elements as bibliographic references, +displayed equations, and aligned equations, among others. +Some special circumstances are not dealt with this the +sample file; for that information, please see the +associated documentation file. + +{\it Note}. This paper is not to be read in any form for +content. The conglomeration of equations, lemmas, and other +text elements were put together solely for typographic +illustrative purposes. + +For theoretical reasons, it is desirable to find characterizations of the +conditions of breakdown of the algorithms that are based on the key {\it +spaces} $\Kr_n(r^{(0)},A)$ and $\Kr_n(\tilde r^{(0)},A^*)$ rather than +the {\it formulas} for the algorithms. In particular, we will +characterize breakdown of the three Lanczos algorithms in terms of the +{\it moment matrices} $\K_n(\tilde r^{(0)},A^*)^*\K_n(r^{(0)},A)$ and +$\K_n(\tilde r^{(0)},A^*)^*A\K_n(r^{(0)},A)$. Here we define the matrix +$\K_n(v,A)=\bmatrix{v&Av&\cdots&A^{n-1}v\cr}$, a matrix whose columns span +the Krylov space $\Kr_n(v,A)$. + +The following three theorems give exact conditions for breakdown of the +above algorithms. Detailed proofs may be found in [3]. A +result similar to Theorem 2 is found in [1]; see also [5]. + + +\thm{Theorem 1 {\rm (Lanczos--Orthodir breakdown)}} +Suppose Lanczos/Orthodir has successfully generated +$u^{(n-1)}\not=u$. Then the following are equivalent: + +\meti{$\bullet$} The algorithm does not break down at step $n$. + +\meti{$\bullet$} The matrix $\K_n(\tilde r^{(0)},A^*)^*A\K_n(r^{(0)},A)$ +is nonsingular. + +\meti{$\bullet$} There exists a unique iterate $u^{(n)}$ satisfying $(2)$. +\endthm + + +\thm{Theorem 2 {\rm (Lanczos--Orthomin breakdown)}} +Suppose Lanczos/Orthomin has successfully generated $u^{(n-1)}\not=u$. +Then the following are equivalent: + +\meti{$\bullet$} The algorithm breaks down at step $n$. + +\meti{$\bullet$} Either +$\K_{n-1}(\tilde r^{(0)},A^*)^*\K_{n-1}(r^{(0)},A)$ or +$\K_n(\tilde r^{(0)},A^*)^*A\K_n(r^{(0)},A)$ is singular. +\endthm + + +\prop{Proposition 3 {\rm (zero sets of polynomials)}} +Let $\fK=\fR$ or $\fC$. If $P$ is a complex nonzero polynomial in the +variables $x_1,x_2,\ldots ,x_N\in\fK$, then $P(x)\not=0$ for almost every +$x=(x_1,x_2,\ldots,x_N)\in \fK^N$. +\endprop + +\prf{Proof} +If $\fK=\fR$ and $P$ is nonzero, then either $\Re P(z)$ or $\Im P(z)$ +is a nonzero (real) polynomial; if $\fK=\fC$, we may decompose each $x_i$ +into real and imaginary parts, giving $2N$ variables, and consider the +real polynomial $P(x)^*P(x)$. In any case, we may assume without loss of +generality that $P$ is a nonzero real polynomial of real variables. + +We know that for any point $x$, the polynomial $P$ is the zero polynomial +if and only if the polynomial and all its derivatives are zero at $x$. +Let $V_0$ denote the set of zeros of $P$ in $\fR^N$. Suppose the set +$V_0$ has nonzero measure. We know from integration theory (see, for +example, [6, pp.\ 128f]) that almost every point of $V_0$ is +a point of density in each of the $N$ coordinate directions. We recall +that $x\in\fR$ is a point of density of a measurable subset +$S\subseteq\fR$ if for any sequence of intervals $I_n$ such that +$x\in I_n$ with measure $m(I_n)\rightarrow 0$ we have +$m(S\cap I_n)/m(I_n)\rightarrow 1$. + +It is easily seen that at such points in $V_0$, the first +partial derivatives of $P$ must necessarily be zero. Let $V_1$ be the +points of $V_0$ where all first derivatives are also zero. We have just +shown that $V_0$ and $V_1$ both have the same nonzero measure. The +argument +may be repeated for $V_1$ to show all second partial derivatives of $f$ +are zero at almost every point of $V_0$, and so forth, resulting in the +fact that $P$ and all its derivatives are zero on a set which has nonzero +measure. The proof is completed by selecting any one of these points. +\qquad\endproof + +\thm{Theorem 4 {\rm (Lanczos breakdown, iterate $n$)}} +Let $\fK=\fR$ or $\fC$, $A, \tilde Z\in\fK^{N\times N}$, and $n\leq d(A)$. +Then exactly one of the following three conditions holds for the Lanczos +method with $\tilde r^{(0)}=\tilde Z^* r^{(0)}$. + +\meti{\rm (i)} Hard breakdown at step $n$ occurs for every vector +$r^{(0)}\in\sT_n(A)\cap\fK^N$ $($and thus at least for almost every +$r^{(0)}\in\fK^N)$. + +\meti{\rm (ii)} Hard breakdown at step $n$ occurs for a nonempty measure-zero +set of vectors $r^{(0)}\in\sT_n(A)\cap\fK^N$ +$($and thus a nonempty measure-zero set of vectors in $\fK^N)$. + +\meti{\rm (iii)} Hard breakdown at step $n$ occurs for no vectors +$r^{(0)}\in\sT_n(A)\cap\fK^N$ $($and thus for at most a measure-zero set of +vectors in $\fK^N)$. + +Furthermore, the same result holds if ``hard breakdown'' is replaced by +``soft breakdown'' in the statement of this theorem. +\endthm + + +\prf{Proof} +For vectors $r^{(0)}\in\sT_n(A)\cap\fK^N$, breakdown is equivalent to +singularity of an appropriate moment matrix. The set $\sT_n(A)\cap\fK^N$ +amounts to almost +every vector in $\fK^N$. Now, by Corollary 5, the set $S_n$ of vectors in +$\fK^N$ for which the moment matrix of dimension $n$ is singular is either +the set of all vectors or a subset of measure zero. If the moment matrix +is singular for every vector (i.e., $S_n=\fK^N$), then it is singular for +every vector in $\sT_n(A)\cap\fK^N$, giving case (i) above. Otherwise the +set $S_n$ is measure zero in $\fK^N$. Thus +$\sB_n\equiv S_n\cap(\sT_n(A)\cap\fK^N)$ is of measure zero +and is either empty or nonempty. +\qquad\endproof + +\heading{2}{Tables and figures} +In Tables 1 and 2 we consider the unpreconditioned problem and also the (left) +ILU- and MILU-preconditioned problem (see [2] and [4]). Runs for which +convergence was not possible in ITMAX iterations are labeled by (--). + + +\topinsert +\hbox{\vbox{ \eightpoint +{\parindent 0pt +\centerline{\smc Table 1} +\centerline{\it Model problem, $h^{-1}=128$, {\rm ITMAX=3000}. + Number of iterations.}\vskip 6pt +\hfil\vbox{\offinterlineskip +\hrule +\halign{&\vrule#&\strut\ \hfil#\ \cr +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +&{\rm method $\backslash$ Dh: } & + &0&&2${}^{-3}$&&2${}^{-2}$&&2${}^{-1}$&&2${}^{0}$& + &2${}^{1}$&&2${}^{ 2}$&&2${}^{ 3}$&&2${}^{ 4}$&&2${}^{5}$&\cr +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +\noalign{\hrule} +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +&{GMRES}($\infty$) \hfill & +& 290&& 269&& 245&& 220&& 200&& 189&& 186&& 189&& 207&& 249&\cr +&{BCG} \hfill & +& 308&& 341&& 299&&1518&& -- && -- && -- && -- && 533&& -- &\cr +&{BCG}{\rm, random $u^{(0)}$} \hfill & +& 309&& 354&& 300&& 310&& 313&& 301&& 299&& 302&& 290&& 293&\cr +&{BCGNB} \hfill & +& 308&& 353&& 284&& 338&& 253&& 240&& 243&& 240&& 302&& 962&\cr +&{CGS} \hfill & +& 272&& 254&& 222&& -- && -- && -- && -- && -- && -- && -- &\cr +&{CGS}{\rm, random $u^{(0)}$} \hfill & +& 193&& 189&& 200&& 192&& 193&& 175&& 225&& 212&& 216&& 197&\cr +&{CGSNB} \hfill & +& 272&& 284&& 212&& 196&& 151&& 162&& 158&& 173&& 156&& 256&\cr +height1pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +} \hrule}\hfil}}} +\endinsert + + +\topinsert + +\hbox{\vbox{ \eightpoint +{\parindent 0pt +\centerline{\smc Table 2} + +\centerline{\it Model Problem, $h^{-1}=128$,} +\centerline{\it {\rm MILU}-preconditioning, {\rm ITMAX=500.} +Number of iterations.} + +\medskip + +\hfil\vbox{\offinterlineskip +\hrule +\halign{&\vrule#&\strut\ \hfil#\ \cr +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +&{\rm Method $\backslash$ Dh: } & + &0&&2${}^{-3}$&&2${}^{-2}$&&2${}^{-1}$&&2${}^{0}$& + &2${}^{1}$&&2${}^{ 2}$&&2${}^{ 3}$&&2${}^{ 4}$&&2${}^{5}$&\cr +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +\noalign{\hrule} +height2pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +&{\rm {GMRES}($\infty$)} \hfill & +& 27&& 25&& 24&& 26&& 28&& 28&& 25&& 19&& 14&& 10&\cr +&{\rm {GMRES}($\infty$), random $u^{(0)}$} \hfill & +& 33&& 29&& 28&& 29&& 31&& 31&& 29&& 24&& 19&& 14&\cr +&{\rm {BCG}} \hfill & +& 31&& 27&& 29&& 33&& 30&& 37&& 30&& 23&& 15&& 10&\cr +% &{BCG}, random $u^{(0)}$, $\gamma=.1$ \hfill & +% & 35&& 30&& 31&& 35&& 40&& 37&& 34&& 27&& 20&& 15&\cr +&{\rm {BCG}, random $u^{(0)}$} \hfill & +& 38&& 34&& 33&& 37&& 44&& 40&& 38&& 29&& 23&& 18&\cr +&{\rm {BCGNB}} \hfill & +& 28&& 27&& 29&& 30&& 34&& 35&& 30&& 23&& 15&& 10&\cr +&{\rm {CGS}} \hfill & +& 21&& 18&& 17&& 20&& 22&& 22&& 19&& 15&& 9&& 6&\cr +&{\rm {CGS}, random $u^{(0)}$} \hfill & +& 24&& 18&& 20&& 22&& 22&& 23&& 21&& 16&& 12&& 9&\cr +&{\rm {CGSNB}} \hfill & +& 21&& 18&& 17&& 20&& 22&& 27&& 20&& 15&& 9&& 6&\cr +height1pt&\omit&&\omit&&\omit&&\omit&&\omit + &&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&\cr +} \hrule}\hfil}}} +\endinsert + +We make the following observations about these runs. + +\meti{$\bullet$} For the unpreconditioned problem, the standard +{BCG} and {CGS} algorithms break down in a number of cases, but the use +of random $u^{(0)}$ or the use of {BCGNB} or {CGSNB} +resulted in convergence. Furthermore, the iteration counts for the +algorithms {BCG} and {BCGNB} are in +general comparatively close to those of the ``best'' method, +{GMRES}($\infty$), while these algorithms have short economical +recurrences, unlike {GMRES}($\infty$). This underscores the +importance of the Lanczos algorithms as economical solution techniques. + +\meti{$\bullet$} For the ILU-preconditioned problems, in most cases +all methods worked well. For the case of $Dh=1$, {BCG} gave +an excessive number of iterations, but this was remedied significantly +by {BCGNB} and much more so +by the use of random $u^{(0)}$. Similarly, {CGS} could +not converge, but {CGSNB} and {CGS} with random +$u^{(0)}$ both converged. + +\meti{$\bullet$} For all of the MILU-preconditioned problems, all of +the Lanczos-type algorithms performed quite well. In particular, the +{BCG} algorithm gave approximately the same number of +iterations as {GMRES}($\infty$). + +Figures 1 and 2 give representative plots of the convergence behavior of the +algorithms for the case of $h^{-1}=128$, $Dh=4$, and no preconditioning. +These results show that the new algorithms keep the residual size +better behaved than the standard {BCG} and {CGS} +algorithms over the course of the run. + +\topinsert +\vskip 3.2in +\centerline{\eightpoint\smc Fig.~1. \it Residual +behavior: $h^{-1}=128$, $Dh=4$.} +\endinsert + + +\topinsert + \vskip 3.2in +\centerline{\eightpoint\smc Fig.~2. \it Residual +behavior: $h^{-1}=128$, $Dh=4$.} +\endinsert + +We now consider a more difficult class of finite difference problems, +namely, central finite differencing applied to the Dirichlet problem +$$ -u_{xx}(x,y) - u_{yy}(x,y) + + D[(y-\textstyle{1\over 2}\displaystyle) u_x(x,y) + + (x-\textstyle{1\over 3}\displaystyle) + (x-\textstyle{2\over 3}\displaystyle) u_y(x,y)], $$ +$$ - 43\pi^2u(x,y) = G(x,y) \quad {\rm on}\ \Omega=[0,1]^2,$$ +$$u(x,y) = 1 + xy \quad \hbox{\rm on}\ \partial\Omega,$$ +with $G(x,y)$ chosen as before so that the true solution is $u(x,y)=1+xy$. +Again, we let $h$ denote the mesh size in each direction. For $D=0$ +and $h$ small, the matrix generated by this problem is a symmetric +indefinite matrix with 16 distinct negative eigenvalues and the rest +of the spectrum positive. + +The standard conjugate residual algorithm applied to this problem with +$h^{-1}=128$ and $D=0$ requires 766 iterations to converge to +$||r^{(n)}||/||b||<\zeta=10^{-6}$. In any case, this is a difficult +problem to solve. + + \def\qed{\vrule height8pt width4pt depth0pt\par\medskip} + \def\Zero{{\bf 0}} + \def\dis{\displaystyle} + \def\b{\beta} + \def\r{\rho} + \def\X{{\bf X}} + \def\Y{{\bf Y}} + \def\bb{{\bar \beta}} + \def\tbcr{\theta\bb c_h \rho_h} + \def\ep{\varepsilon} + + + +Figures 3(a) and 3(b) show the compartmental diagrams for SI models without +and with deaths due to the disease, for the situation in which the infectious +period has only one stage. Figures 4(a) and 4(b) give the corresponding models +with $m$ stages of infection. Venereal +warts, caused by the human papilloma virus, and ordinary herpes are examples +of sexually transmitted diseases without deaths +due to the disease, although both are not quite SI diseases because of +partial immunity. AIDS is the example of an SI disease with death due to +the disease. Although our main focus is on the latter, we present results +on SI models without deaths due to the +disease because the simplification in the dynamics of such models + throws light on the case with disease-related deaths. + +\topinsert +\vskip 2in +\centerline{\eightpoint {\smc Fig.} 3(a). SI {\it model for subgroup $i$, without death +due to the disease.}} +\vskip 2in +\centerline{\eightpoint {\smc Fig.} 3(b). SI {\it model with death due to the disease.}} +\endinsert + +\topinsert +\vskip 2in +\centerline{\eightpoint {\smc Fig.} 4(a). SI {\it model without deaths due to the +disease with $m$ stages of infection.}} +\vskip 2in +\centerline{\eightpoint {\smc Fig.} 4(b). SI {\it model with deaths due to the disease, +with $m$ stages of infection.}} +\endinsert + +\heading{3}{Equations and alignments} +The equations for the system follow directly from the definitions and the +compartmental diagrams. For one infected stage with no disease-related +deaths, the equations are +$$ \dot X_i=-X_ig_i-\mu X_i+U_i, \leqno(1)$$ +$$ \dot Y_i=X_ig_i-\mu Y_i. \leqno(2)$$ +If there are multiple stages to the infection, (2) is replaced by +(3)--(5) as follows: +$$\leqalignno{\dot Y_{i1}&=X_ig_i-(k+\mu)Y_{i1}, &(3)\cr +\dot Y_{ir}&=kY_{i,r-1}-(k+\mu)Y_{ir},\qquad r=2,\ldots,m-1 &(4)\cr +\dot Y_{im}&=kY_{i,m-1}-\mu Y_{im}. &(5)\cr }$$ + + + +\heading{3.1}{The SI model with structured mixing} +In this subsection we write the equations for the SI model with +structured mixing, with one infected stage and with deaths due to the +disease. The equations for multiple infected stages follow easily, as do +those for SI models without death due to the disease. Recall that $f_{is}$ +gives the fraction of population subgroup $i$'s +contacts that are made in activity group $s$. The total contact rate of +susceptibles from population subgroup $i$ in activity group $s$ must be +$c_iX_if_{is}$. Let $\rho_{ij}(s)$ be the fraction of the contacts of group +$i$ that are with members of group $j$, within activity group $s$. +Assuming random allocation of the susceptibles and infecteds from each +population subgroup to the activity groups, the fraction infected in group +$j$ in activity group $s$ must be $Y_j/N_j$, giving +$$ c_iX_if_{is}\rho_{ij}(s)\beta_j{Y_j \over N_j}\leqno(6) $$ +for the rate at which susceptibles in $i$ are infected by contacts +with infecteds from $j$ in activity group $s$. Thus, in this case, $g_i$ is +given by +$$ + g_i=c_i\sum_sf_{is}\sum_j\rho_{ij}(s)\beta_j{Y_j \over N_j}, +\leqno(7) + $$ +and (1a) and (1b) become +$$ \dot X_i=-c_iX_i\sum_sf_{is}\sum_j\rho_{ij}(s)\beta_j{Y_j \over +N_j}-\mu X_i+U_i, \leqno(8) $$ +$$ \dot Y_i=c_iX_i\sum_sf_{is}\sum_j\rho_{ij}(s)\beta_j{Y_j \over +N_j}-(\mu+k)Y_i. \leqno(9) $$ + +\heading{3.2}{Structured mixing within activity groups} +If the mixing within activity groups is proportional mixing, then +$\rho_{ij}(s)$ is given by (10): +$$\rho_{ij}(s)={f_{js}c_jN_j\over \sum_pf_{ps}c_pN_p}, \leqno(10)$$ +and (8) and (9) become (11) and (12): +$$\dot X_i=-c_iX_i\sum_sf_{is}{\sum_jf_{js}c_j\beta_jY_j \over +\sum_jf_{js}c_jN_j}-\mu X_i+U_i \leqno(11)$$ +$$\dot Y_i=c_iX_i\sum_sf_{is}{\sum_jf_{js}c_j\beta_jY_j \over +\sum_jf_{js}c_jN_j}-(k+\mu)Y_i. \leqno(12)$$ + +Expressions (11) and (12) show an important consequence of death due +to the disease. If there are no deaths due to the disease, $N_j$ is +constant on the asymptotically stable invariant subspace $U_j=\mu +N_j$ for all $j$, and the first term, the nonlinear term, in +(11) and (12) is a sum of {\it quadratic} terms. If there are deaths +due to the disease, $N_j$ is no longer constant and the first term is +a sum of rational expressions, each homogeneous of degree one. This +observation extends to SIS, SIR, and SIRS models. + + + +\Refs + + +\ref 1\\ +{\smc R. Fletcher}, {\it Conjugate gradient methods for indefinite +systems}, in Numerical Analysis Dundee 1975, G.~A. Watson, ed., +Springer-Verlag, New York, Lecture Notes in Math. 506, +1976, pp. 73--89. +\endref + + +\ref 2\\ +{\smc I. Gustafsson}, {\it Stability and rate of convergence of +modified incomplete Cholesky factorization methods}, Ph.D. thesis, +Chalmers University of Technology and the University of Goteborg, +Goteborg, Sweden, 1979. +\endref + + +\ref 3\\ +{\smc W.~D. Joubert}, {\it Generalized conjugate gradient and +Lanczos methods for the solution of nonsymmetric systems of linear +equations}, Ph.D. thesis and Report +CNA-238, Center for Numerical Analysis, University of Texas, +Austin, TX, January 1990. +\endref + + +\ref 4\\ +{\smc J.~A. Meijerink and H.~A. van der Vorst}, {\it An iterative +solution method for linear systems of which the coefficient matrix is +a symmetric $M$-matrix}, Math. Comp., 31 (1977), pp.~148--162. +\endref + + + +\ref 5\\ +{\smc Y.~Saad}, {\it The Lanczos biorthogonalization algorithm and +other oblique projection methods for solving large unsymmetric systems}, +SIAM J. Numer. Anal., 19 (1982), pp. 485--506. +\endref + + +\ref 6\\ +{\smc S. Saks}, {\it The Theory of the Integral}, G.~E. Stechert, +New York, 1937. +\endref + +\ref 7\\ +{\smc M. Tinkham}, {\it Introduction to +Superconductivity}, McGraw-Hill, New York, 1975. +\endref + +\bye diff --git a/obsolete/macros/plain/contrib/siam/siamptex.sty b/obsolete/macros/plain/contrib/siam/siamptex.sty new file mode 100644 index 0000000000..8d5f040584 --- /dev/null +++ b/obsolete/macros/plain/contrib/siam/siamptex.sty @@ -0,0 +1,324 @@ +% SIAMPTEX.STY; 12-11-92; Paul Duggan, Society for Industrial +% and Applied Mathematics. From +% Ralph Youngen's siamtex.sty +% +% This file may be freely distributed but may not be altered in +% any way. +% +% This is a file of macros and definitions for creating an article +% for publication in a SIAM journal. +% +% Make the @ sign a letter for internal control sequences. +\catcode`\@=11 +% +% Report the version number of this package. +\message{ *** SIAM Plain TeX macro package, version 2.1, 1-JAN-1993 ***} +% +% +% FONTS +\font\tenrm=cmr10 +\font\tenbf=cmbx10 +\font\tenit=cmti10 +\font\tensmc=cmcsc10 +\def\tenpoint{% + \def\rm{\fam0\tenrm}\def\bf{\fam\bffam\tenbf}% + \def\it{\fam\itfam\tenit}\def\smc{\tensmc} + \textfont0=\tenrm \scriptfont0=\sevenrm + \textfont1=\teni \scriptfont1=\seveni + \textfont2=\tensy \scriptfont2=\sevensy + \textfont3=\tenex \scriptfont3=\tenex +\baselineskip=12pt\rm}% + +\font\ninerm=cmr9 +\font\ninebf=cmbx9 +\font\nineit=cmti9 +\def\ninepoint{% + \def\rm{\ninerm}\def\bf{\ninebf}% + \def\it{\nineit}\baselineskip=11pt\rm}% + +\font\eightrm=cmr8 +\font\eightbf=cmbx8 +\font\eightit=cmti8 +\font\eighti=cmmi8 +\font\eightsy=cmsy8 +\font\eightsmc=cmcsc8 +\font\eighttt=cmtt8 + \def\eightpoint{% + \def\rm{\fam0\eightrm}\def\bf{\fam\bffam\eightbf}% + \def\it{\fam\itfam\eightit}\def\smc{\eightsmc}\def\tt{\eighttt}\baselineskip=10pt\rm% + \textfont0=\eightrm \scriptfont0=\sixrm + \textfont1=\eighti \scriptfont1=\sixi + \textfont2=\eightsy \scriptfont2=\sixsy +\textfont3=\tenex \scriptfont3=\tenex +} + +\font\sixrm=cmr6 +\font\sixbf=cmbx6 +\font\sixi=cmmi6 +\font\sixsmc=cmr5 +\font\sixsy=cmsy6 +\def\sixpoint{% + \def\rm{\sixrm}\def\bf{\sixbf}% + \def\smc{\sixsmc}\baselineskip=8pt\rm}% + +\fontdimen13\tensy=2.6pt +\fontdimen14\tensy=2.6pt +\fontdimen15\tensy=2.6pt +\fontdimen16\tensy=1.2pt +\fontdimen17\tensy=1.2pt +\fontdimen18\tensy=1.2pt + +\def\rheadfont{\tenpoint\smc} +\def\titlefont{\tenpoint\bf} +\def\authorfont{\eightpoint\smc} +\def\dedicatefont{\ninepoint\it} + + +% DIMENSIONS +\hsize=31pc +\vsize=50pc +\parindent=2em + + +% MACROS +\newif\ifkeywords@ +\newif\ifsubjclass@ +\newif\ifdedicate@ +\newif\ifrecdate@ +\newif\ifoneclass@ + +\keywords@false +\subjclass@false +\dedicate@false +\recdate@false +\oneclass@false + +\def\title#1\endtitle{\def\thetitle{\uppercase{#1}}% + \def\\{\relax\ }\xdef\rightrh{\lowercase{#1}}} + +\def\shorttitle#1{\xdef\rightrh{\lowercase{#1}}} + +\def\author#1\endauthor{% + \def\and{\hbox{\sixrm AND }}\def\\{\break}% prevent \uppercase when typesetting + \def\theauthor{\uppercase{#1}}% + {% + \def\\{\relax\ }% change \\ to be a space in the running head + \def\fnmark##1{}% turn address off in the running head + \def\and{and }% "and" is the same size as names in the running head + \xdef\leftrh{\lowercase{#1}}% + }} + +\def\shortauthor#1{\def\and{and }\xdef\leftrh{\lowercase{#1}}} + +\gdef\fnmark#1{#1} +\gdef\address#1#2{\makefootnote@{\textfont2=\eightsy #1}{#2\unskip.}} +\def\journal#1{\def\thejournal{#1}} +\journal{SIAM J. S{\smc CI. }S{\smc TAT. }C{\smc OMP.}} +\def\copyyear#1{\def\thecopyyear{#1}} +\copyyear{1989} +\def\vol#1{\def\thevol{#1}} +\def\no#1{\def\theno{#1}} +\def\date#1{\def\thedate{#1}} +\def\code#1{\def\thecode{#1}} +\def\dedicate#1{\dedicate@true\def\thededicate{#1}} +\def\keywords#1\endkeywords{\keywords@true\def\thekeywords{#1}} +\def\subjclass#1\endsubjclass{\subjclass@true\def\thesubjclass{#1}} +\def\oneclass{\oneclass@true} +\long\def\abstract#1{\def\theabstract{#1}} + +\def\raggedcenter{\leftskip=0pt plus 1fill \rightskip=0pt plus 1fill} + +\def\copyright#1{{\ooalign{\hfil\raise.07ex\hbox{c}\hfil\crcr#1\char"0D}}} + +\def\recdate#1#2{\global\recdate@true + \gdef\recdate@{#1Received by the editors \ignorespaces#2\unskip.}% + \makefootnote@{}{\recdate@}} + + + +\def\heading#1#2{% + \vskip6pt{\bf #1.\enspace\ignorespaces#2.\enspace}\ignorespaces} + +\def\thm#1{{\smc #1.}\begingroup\it\enspace\ignorespaces} +\let\lem=\thm +\let\cor=\thm +\let\prop=\thm + +\def\endthm{\endgroup} +\let\endlem=\endthm +\let\endcor=\endthm +\let\endprop=\endthm + +\def\prf#1{{\it #1}.\rm\enspace\ignorespaces} +\let\rem=\prf +\let\case=\prf + +\def\endproof{\vbox{\hrule\hbox{% + \vrule height1.3ex\hskip0.8ex\vrule}\hrule + }} + +\def\dfn#1{{\smc #1.}\rm\enspace\ignorespaces} + +\let\topmatter=\relax +\def\endtopmatter{% + \global\headline={\hss\vtop to \z@ {% + \sixpoint\rm\noindent\thejournal \hfill% + \rm\copyright{\sevensy}\rm% + \thecopyyear\ Society for Industrial and Applied Mathematics\par + \noindent Vol. \thevol , No. \theno , \thedate\hfill\thecode\par + \vss}\hss}% + \leavevmode\vskip8pt + \vbox{\noindent\raggedcenter\let\\=\break\titlefont\thetitle + \ifrecdate@*\fi} + \vskip6pt + \vbox{\noindent\raggedcenter\let\\=\break\authorfont\theauthor} + \ifdedicate@ + \vskip6pt + \vbox{\noindent\raggedcenter\let\\=\break\dedicatefont + \thededicate} + \fi + \vskip14pt + {\eightpoint{\bf Abstract.\ }\theabstract\par + \ifkeywords@ + \vskip10pt + {\bf Key words.} \thekeywords\par + \fi + \ifsubjclass@ + \vskip10pt + {\bf AMS subject classification\ifoneclass@\else s\fi. }% + \thesubjclass\par + \fi} + \vskip8pt + \tenpoint} +%%grouping of \eightpoint is new: added 2/22/91 to allow roman & bold +%%in math mode + + +%%% REFERENCES + +\newdimen\refindent@ +\newdimen\refhangindent@ +\newbox\refbox@ +\setbox\refbox@=\hbox{\eightpoint\rm [00]}% Default 2 digits +\refindent@=\wd\refbox@ + +\def\resetrefindent#1{% + \setbox\refbox@=\hbox{\eightpoint\rm [#1]}% + \refindent@=\wd\refbox@} + +\def\Refs{% + \unskip\vskip2pc + \centerline{\eightpoint\rm REFERENCES}% + \penalty10000 + \vskip4pt + \penalty10000 + \refhangindent@=\refindent@ + \global\advance\refhangindent@ by 2em + \global\everypar{\hangindent\refhangindent@}% + \parindent=0pt\eightpoint\rm} + +\def\XRefs{% + \unskip\vskip2pc + \centerline{\eightpoint\rm REFERENCES}% + \penalty10000 + \vskip4pt + \penalty10000 + \refhangindent@=\refindent@ + \global\everypar{\hangindent\refhangindent@}% + \parindent=0pt\eightpoint\rm} + +\def\sameauthor{\leavevmode\vbox to 1ex{\vskip 0pt plus 100pt + \hbox to 3em{\leaders\hrule\hfil}\vskip 0pt plus 300pt}} + +\def\ref#1\\#2\endref{\leavevmode\hbox to \refindent@{\hfil[#1]}\enspace #2\par} + +\def\xref\\#1\endref{\leavevmode #1\par} +%%% OUTPUT + +\global\footline={\hss\eightpoint\rm\folio\hss}% first page +\output{\plainoutput} +\def\plainoutput{\shipout\vbox{\makeheadline\pagebody\makefootline}% + \advancepageno + \ifnum\pageno>1 + \global\footline={\hfill}% + \fi + \ifodd\pageno + \global\headline={\hss\rightrh\hss{\tenpoint\rm\folio}}% + \else + \global\headline={\hskip-8pt{\tenpoint\rm\folio}\hss\leftrh\hss}% + \fi + \ifnum\outputpenalty>-\@MM \else\dosupereject\fi} +\def\pagebody{\vbox to\vsize{\boxmaxdepth\maxdepth \pagecontents}} +\def\makeheadline{\vbox to\z@{\vskip-22.5\p@ + \line{\vbox to8.5\p@{}\rheadfont\the\headline}\vss}% + \nointerlineskip} +\def\makefootline{\baselineskip24\p@\vskip-8\p@\line{\the\footline}} +\def\dosupereject{\ifnum\insertpenalties>\z@ % something is being held over + \line{}\kern-\topskip\nobreak\vfill\supereject\fi} + +\def\relaxnext@{\let\next\relax} +\def\footmarkform@#1{\ifmmode {}^{#1}\else$^{#1}$\fi } +\let\thefootnotemark\footmarkform@ +\def\makefootnote@#1#2{\insert\footins + {\interlinepenalty\interfootnotelinepenalty + \eightpoint \splittopskip=\ht\strutbox + \splitmaxdepth=\dp\strutbox + \floatingpenalty=\@MM + \leftskip=\z@ \rightskip=\z@ + \spaceskip=\z@ \xspaceskip=\z@ + \leavevmode{#1}\footstrut\ignorespaces#2\unskip + \lower\dp\strutbox\vbox to\dp\strutbox{}}} +\newcount\footmarkcount@ + \footmarkcount@=\z@ % Initialization +\def\footnotemark{\let\@sf=\empty \relaxnext@ + \ifhmode \edef\@sf{\spacefactor=\the\spacefactor}\/\fi + \def\next@{\ifx[\next \let\next=\nextii@ \else + \ifx"\next \let\next=\nextiii@ \else + \let\next=\nextiv@ \fi\fi\next}% + \def\nextii@[##1]{\footmarkform@{##1}\@sf}% + \def\nextiii@"##1"{{##1}\@sf}% + \def\nextiv@{\global\advance\footmarkcount@\@ne + \footmarkform@{\number\footmarkcount@}\@sf}% + \futurelet\next\next@} +\def\footnotetext{\relaxnext@ + \def\next@{\ifx[\next \let\next=\nextii@ \else + \ifx"\next \let\next=\nextiii@ \else + \let\next=\nextiv@ \fi\fi\next}% + \def\nextii@[##1]##2{\makefootnote@{\footmarkform@{##1}}{##2}}% + \def\nextiii@"##1"##2{\makefootnote@{##1}{##2}}% + +\def\nextiv@##1{\makefootnote@{\footmarkform@{\number\footmarkcount@}}{##1}}% + \futurelet\next\next@} +\def\footnote{\let\@sf=\empty \relaxnext@ + \ifhmode \edef\@sf{\spacefactor\the\spacefactor}\/\fi + \def\next@{\ifx[\next \let\next=\nextii@ \else + \ifx"\next \let\next=\nextiii@ \else + \let\next=\nextiv@ \fi\fi\next}% + \def\nextii@[##1]##2{\footnotemark[##1]\footnotetext[##1]{##2}}% + \def\nextiii@"##1"##2{\footnotemark"##1"\footnotetext"##1"{##2}}% + \def\nextiv@##1{\footnotemark\footnotetext{##1}}% + \futurelet\next\next@} +\def\adjustfootnotemark#1{\advance\footmarkcount@#1\relax} + +\skip\footins=18\p@ plus6\p@ minus6\p@ + +\def\footnoterule{\kern -4\p@\hrule width 3pc \kern 3.6\p@ } % rule = .4 pt high + +\def\meti#1{\parindent=2\parindent \par\indent\llap{#1\enspace}\ignorespaces\parindent=.5\parindent} +\def\metimeti#1{\parindent=2\parindent \par\indent\llap{#1\enspace}\ignorespaces\parindent=.5\parindent} + +\font\tencmmib=cmmib10 \skewchar\tencmmib='177 +\newfam\cmmibfam +\textfont\cmmibfam=\tencmmib + +\def\ldisplaylinesno#1{\displ@y\halign{ + \hbox to\displaywidth{$\@lign\hfil\displaystyle##\hfil$}& + \kern-\displaywidth\rlap{$##$}\kern\displaywidth\crcr + #1\crcr}} + +\def\bphi{\mathchar"0\hexnumber@\cmmibfam"1E} + + +% Turn off @ as being a letter. +% +\catcode`\@=12 |