@(#)e.tmac 2.31 (Berkeley) 5/21/88
Modified by James Clark for use with groff.

Copyright (c) 1988 Regents of the University of California.
All rights reserved.

Redistribution and use in source and binary forms are permitted
provided that this notice is preserved and that due credit is given
to the University of California at Berkeley. The name of the University
may not be used to endorse or promote products derived from this
software without specific prior written permission. This software
is provided ``as is'' without express or implied warranty.
%beginstrip%

**********************************************************************
* *
* ****** - M E N R O F F / T R O F F M A C R O S ****** *
* *
* Produced for your edification and enjoyment by: *
* Eric Allman *
* Electronics Research Laboratory *
* U.C. Berkeley. *
* current address: *
* Britton-Lee, Inc. *
* 1919 Addison Street Suite 105 *
* Berkeley, California 94704 *
* *
* VERSION 2.31 First Release: 11 Sept 1978 *
* *
* Documentation is available. *
* *
**********************************************************************

Code on .de commands:
*** a user interface macro.
&&& a user interface macro which is redefined
when used to be the real thing.
$$$ a macro which may be redefined by the user
to provide variant functions.
--- an internal macro.

.. .@R pf .. .@R @\" \" debugging level *** INTERNAL GP MACROS ***
.nr _S \\n(.s .nr _V \\n(.v .nr _F \\n(.f .nr _J \\n(.j .do ds _A \\n[.fam] .nr _I \\n(.i .ev \\$1 .vs \\n(_Vu .do @fam \\*(_A 'in \\n(_Iu .xl \\n($lu .lt \\n($lu .rr _S .rr _V .rr _F .rr _I .rr _J .ls 1 'ce 0 .. .nr _d 0 . nr _d 1 . nr _d 2 . nr _d 3 . nr _d 4 . nr _d \\$1 . ds |p "\\$2 .\} .. \{\ . tm Line \\n(c. -- Unclosed block, footnote, or other diversion (\\n(.z) . di . ex .\} . bp \" force out final table

.. *** STANDARD HEADERS AND FOOTERS ***
\{\ . rm |4 . rm |5 .\} \{\ . ds |4 "\*($* . ds |5 "\*($* .\} .. . rm |4 . ds |4 "\*($* .. . rm |5 . ds |5 "\*($* .. \{\ . rm |6 . rm |7 .\} \{\ . ds |6 "\*($* . ds |7 "\*($* .\} .. . rm |6 . ds |6 "\*($* .. . rm |7 . ds |7 "\*($* .. \{\ . wh 0 . rs . @b .\} .. *** INTERNAL HEADER AND FOOTER MACROS ***
. tm Line \\n(c. -- Offset + indent exceeds line length initialize a pile of junk
.nr ?h \\n(?H \" transfer "next page" to "this page" .nr ?H 0 .nr ?c \\n(?C .nr ?C 0 .rn |4 |0 .rn |5 |1 .rn |6 |2 .rn |7 |3 .nr _w 0 \" reset max footnote width .nr ?W 0 \" no wide floats this page (yet) .nr ?I 1 begin actual header stuff
.ev 2 .rs . sp |\\n(hmu \" move to header position .@t $h\" \" output header title . nr tm \n(.Vu .ev

_k \" for columned output .nr $c 1 \" set first column \{\ . nr ?s 0 . rs ' @b .\} . @n\" \" begin the column .. . nr bm \\n(.Vu \{\ . nr _b (\\n(ppp*\\n($vu)/200u \" compute fudge factor (must be < 1P) . if \\n(_bu>((\\n(bmu-\\n(fmu-((\\n(tpp*\\n($vu)/100u))/2u) \ . nr _b (\\n(ppp*\\n($vu)/100u-\n(.Vu . nr _b +\\n(bmu .\} .nr _B \\n(_bu .ch @f .wh -\\n(_bu @f .nr _b +(\\n(ppp*\\n($vu)/100u \" add 1 paragraph v in case of sweep past .nr ?f 0 \" reset footnote flag \{\ . (f _\" \" reprocess footnotes which run off page . nf . |o . fi . )f . rm |o .\} .nr ?o 0 \{\ . nr _i \\n(.i . in 0 . |h\" \" output the table header . in \\n(_iu . rr _i . mk #T \" for tbl commands . ns .\} \{\ . nr ?a 0 \" output floating keep . @k |t . if \\n(?w \ . mk _k \" don't overstrike wide keeps . nr ?w 0 .\} .os .$H\" \" special column header macro .ns .. .ec \{\ . nr T. 1 \" for tbl commands (to output bottom line) . T# 1\" \" output the sides and bottom lines . br .\} .ev 2

0 \{\ . nr ?b 0 . @k |b\" \" output bottom of page tables .\} . @o\" \" output footnote if present . @c\" \" handle new column . @e\" \" new page .ev ..

.ls 1
.wh -\\n(_Bu @r
.|f

\{\ . di \" just in case triggered @r . if \\n(dn=0 \ \{\ . rm |o . nr ?o 0 . \} . nr dn \\n(_D . rr _D .\} .ch @r .. .rs .@O +\\n($lu+\\n($su .nr $c +1 .@n .. .@O \\n(_ou .rs .@t $f\" \" output footer title .nr ?h 0 .bp .. \{\ . sz \\n(tp\" \" set header/footer type fonts, etc. . @F \\n(tf . lt \\n(_Lu \" make title span entire page . nf . \\$1 . br .\} .. \{\ . if e .ds |z "\\*(|0 . if o .ds |z "\\*(|1 .\} ' tl \\*(|z .. \{\ . if e .ds |z "\\*(|0 . if o .ds |z "\\*(|1 .\} \{\ . if e .ds |z "\\*(|2 . if o .ds |z "\\*(|3 .\} ' tl \\*(|z .. .di |o \" save overflow footnote .nr ?o 1 .nr _D \\n(dn .ns .. *** COMMANDS WITH VARIANT DEFINITIONS ***
.rn bp @b \" --- begin page .nr $c \\n($m \" force new page, not new column . @b \\$1 \{\ . if \\n(.$>0 \ . pn \\$1 . if \\n(?I \ . @h\" \" 'spring' the header trap .\}

.wh 0 @h \" reset header .. .rn ll xl \" *** special line length (local) .xl \\$1 .lt \\$1 .nr $l \\n(.l . nr _L \\n(.l .. .rn po @O \" --- local page offset .@O \\$1 .nr _o \\n(.o .. Redefine the fam request to set the family in
environment 2 as well as the current environment.
.do rn fam @fam \" --- set family in current environment .do de fam \" *** set font family in ev 2 and current ev .do @fam \\$1 .ev 2 .do @fam \\$1 .ev .. *** MISCELLANEOUS ROFF COMMANDS ***
.nr ?H 1 .. 'in \\$1 ..

.rs .. .nm 1 .xl -\w'0000'u .nr ?n 1 .. .nm \\$1 . xl -\w'0000'u . xl \\n($lu .. .bp \\$1 .. .af % i .. .af % 1 .. .nr _0 \\n(hmu .nr hm \\$1v .nr tm +\\n(hmu-\\n(_0u .rr _0 .. .nr tm \\n(hmu+\\n(tpp+\\$1v .. .nr bm \\n(fmu+\\n(tpp+\\$1v .. .nr _0 \\n(fmu .nr fm \\$1v .nr bm +\\n(fmu-\\n(_0u .. . tm Line \\n(c. -- I cannot skip multiple pages .nr ?s 1 .. *** MISCELLANEOUS USER SUPPORT COMMANDS ***
.. .. . nr $i \\$1n . nr $i \\n(siu*\\n($0u ..

\l'\\n(.lu-\\n(_Iu' .. *** PARAGRAPHING ***
.lp \\n(piu .. .@p . ti +\\$1 .nr $p 0 1 .. . nr ii \\n(iin .nr _0 \\n(ii . nr _0 \\$2n .@p \\n(_0u .nr _I \\n(.iu .di |i \\$1

.di \{\ . ti -\\n(_0u . ie \\w"\\*(|j">=\\n(_0 \ \{\ \\*(|j . br . \} . el \\*(|j\h'|\\n(_0u'\c .\} .rr _0 .. use string comparison in case user has changed format of $p
. nr $p 0 \" reset number after .bu .nr $p +1 \" increment paragraph number .@p \w'\0(000)\0'u \0(\\n($p)\h'|\w'\0(000)\0'u'\c ..

use string comparison in case user has changed format of $p
. ns \" don't space between .bu paragraphs .nr $p 0-1 \" mark "bulleted paragraph" mode .@p \w'\0\(bu\0'u \0\(bu\0\c .. . in +\\$1n

0

.@F \\n(pf .sz \\n(pp .ns .. *** SECTION HEADINGS ***
. nr si \\n(sin

0 .@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \{\ . ds |n \\$2 . $p "\\*(|n" "\\*($n" \\n($0 . $0 "\\*(|n" "\\*($n" \\n($0 . rm |n .\} .nr $p 0 1 \" reset .np count .. . nr $0 \\$1 . nr $\\n($0 \\$2 \{\ . if '\\n($1'0' \ . nr $1 1 . if (\\n(.$>=3) .if !"\\$3"-" \ . nr $1 \\$3 . as $n \\n($1 .\} . nr $1 0 \{\ . if '\\n($2'0' \ . nr $2 1 . if (\\n(.$>=4) .if !"\\$4"-" \ . nr $2 \\$4 . as $n .\\n($2 .\} . nr $2 0 \{\ . if '\\n($3'0' \ . nr $3 1 . if (\\n(.$>=5) .if !"\\$5"-" \ . nr $3 \\$5 . as $n .\\n($3 .\} . nr $3 0 \{\ . if '\\n($4'0' \ . nr $4 1 . if (\\n(.$>=6) .if !"\\$6"-" \ . nr $4 \\$6 . as $n .\\n($4 .\} . nr $4 0 \{\ . if '\\n($5'0' \ . nr $5 1 . if (\\n(.$>=7) .if !"\\$7"-" \ . nr $5 \\$7 . as $n .\\n($5 .\} . nr $5 0 \{\ . if '\\n($6'0' \ . nr $6 1 . if (\\n(.$>=8) .if !"\\$8"-" \ . nr $6 \\$8 . as $n .\\n($6 .\} . nr $6 0 ..

0 .ul 0 .nr _0 \\n($0-1 .@d \\n(_0 .rr _0 .$p "" "" \\n($0 .nr $p 0 1 \" reset .np count .. .$p "\\$1" .$0 "\\$1" .. . nr $i \\$3*\\n(si \{\ . sp \\n(ssu \" one of them is non-null . ne \\n(.Lv+\\n(.Vu+\\n(psu+((\\n(spp*\\n($vu*\\n(.Lu)/100u) . \" exdent if \\$3 > 0 . ie 0\\$3 \ . ti -(\\n(siu-\\n(sou) . el \ . ti +\\n(sou . @F \\n(sf . sz \\n(sp . if 0\\$3 \ . $\\$3 . if \w"\\$2">0 \\$2. . if \w"\\$1">0 \\$1\f1 \& .\} . sp \\n(psu .@F \\n(pf .sz \\n(pp .. *** COLUMNNED OUTPUT ***

. 1c\" \" revert to 1c if already 2c .nr $c 1 .nr $m 2 . nr $m \\$2 . nr $s \\$1n \" param 1: column seperation .nr $l (\\n(.l-((\\n($m-1)*\\n($s))/\\n($m .xl \\n($lu

_k .ns ..

.nr $c 1 .nr $m 1 .@O \\n(_ou .. .. *** FLOATING TABLES AND NONFLOATING BLOCKS ***
.@D 4 \\$1 \\$2 .@( .. .@) .rr _0 . nr dn +(\\n(ppp*\\n($vu)/200u+\\n(zsu .nr dl -\n(.H \" fudge factor necessary to make it work \{\ . nr ?a 1 . if (\\n(dl>\\n($l)&(\\n($m>1) \ . nr ?w 1 \" mark wider than one column (top) . ds |x |t .\} \{\ . nr ?b 1 . if (\\n(dl>\\n($l)&(\\n($m>1) \ . nr ?W 1 \" mark wider than one column (bottom) . nr _b +\\n(dnu . \" avoid moving @f back past the current position . if \\n(.p-\\n(nl-\n(.V<\\n(_b \ . nr _b \\n(.p-\\n(nl-\n(.V . ch @f -\\n(_bu . ds |x |b .\} .da \\*(|x \" copy to save macro

.ls 1
.nr ?k 1
\!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
.|k\" \" and the body
.ec
.nr ?k 0
.da
.ls 1
.xl \\n($lu
.ev
..
.ev 1
.ls 1
.\\$1
.ec

.ev
..
.(z \\$1 \\$2
..
.)z \\$1 \\$2
..

.@D 3 \\$1 \\$2
.@(
..

.@)
. ne \\n(dnu \" make it all on one page
.ls 1
.|k
.ec

.xl \\n($lu
.ev
..
.@M
.di |k
\!'rs
..
.nr ?k 1
.@C 1
.@F \\n(df
.vs \\n(.sp*\\n($Vu/100u
. fi \" set fill mode if "F" parameter
. in 0
\{\
. in +\\n(biu
. xl -\\n(biu
.\}
. ce 10000
..

.nr ?k 0
.di
 0
..
.di |c
..
 \" force out final line
.di
.ev 1
.ls 1
.|c
.ec
.ls
.ev
..
 *** BLOCK QUOTES (OR WHATEVER) AND LISTS ***

.@C 1

.xl -\\n(qiu
.sz \\n(qp
..

.ev
.nr ?k 0
..

.@D 3 \\$1 \\$2
.@M
..

.ev
.nr ?k 0
..
 *** PREPROCESSOR SUPPORT ***

 EQN

.ec
\{\
. if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
. @D 1 "\\$1" "\\$2"
. @C 2
. di |e
.\}
.ls 1
..

\{\
. nr ?e 1
. sp \\n(esu
.\}
\{\
. nr ?e 0
. di
. if \\n(dn \
. @q\" \" actual equation output
. rm |e
. ev
.\}
..
.nr _Q \\n(dnu
.ev
.@C 2\" \" .ev 2 may be jumbled from header
. in (\\n(.lu+\\n($iu-\\n(dlu)/2u
. in \\n($iu
. in \\n(biu+\\n($iu
. in 0
 _q
\{\
. rs
. sp (\\n(_Qu-\\n(.vu)/2u
. tl """\\*(|p"
. rt \\n(_qu
.\}
.|e
.rr _q
.rr _Q
..

 TBL

.@C 1
 \" drop into fill mode for text boxes
\{\
. di |h \" save header part
. nr ?T 1
.\}
.ls 1
.ch @f -(\\n(_bu+1v) \" set pseudo-trap for bottom line
. ch @f \\n(nlu+\n(.Vu
..
.nr T. 0
.T# 0
.di
.nr _T \\n(?T
.nr ?T 0
.nr ?T \\n(_T
.nr _i \\n(.i
.|h\" \" put in the initial header
.rr _i
 #T
..
.nr ?T 0
.ch @f -\\n(_bu \" reset pseudo-trap
. ch @f \\n(nlu+\n(.Vu
.ev
.re
..
..

 REFER

.[\\$1
..
.(f
.ip "\\*([F.\0"
.@p
.)f
..
.(f
.ip "\\*([F.\0"
\\*([A,
\{\
. ie \\n([P>0  pp.\&
. el  p.\&
\\*([P
.\}
(\\*([D).
.)f
..
.(f
.ip "\\*([F.\0"
\\*([A, \\f2\\*([T,\\f1
\\*([I\c
 (\\*([D).
.)f
..
.(f
.ip "\\*([F.\0"
\\*([A, \\*(lq\\*([T,\\*(rq
in \\f2\\*([B\\f1, \c
 (\\*([D).
.)f
..
.(f
.ip "\\*([F.\0"
\\*([A, \\*(lq\\*([T,\\*(rq
\\*([R\c
 (\\*([D).
.)f
..
.(f
.ip "\\*([F.\0"
\\*([A, \\f2\\*([T\\f1,
.)f
..
.$p References
.lp
..
..
..
\{\
. ds [. \s-2\v'-.4m'\f1
. ds .] \v'.4m'\s+2
.\}
\{\
. ds [. " [
. ds .] ]
.\}

 IDEAL

.nr g7 \\n(.u
.ls 1
..
.ls
..
.ls
..

 PIC

.nr g7 \\$2
.nr g7 \\n(.u
.ls 1
..
.ls
..

 GREMLIN

.nr g7 (\\n(.lu-\\n(g1u)/2u
.nr g7 \\n(.u
.ls 1
..
.GF
..
.ls
..
 *** FONT AIDS ***
.vs \\n(.sp*\\n($vu/100u \" default vs at pointsize + 20%
..
..
..
. ds _F \\n(.f
\{\
. ie \\n(.f<100&\n(.g \
. ds _F (\\n(.f
. el \
. ds _F P
.\}
..
.@E
..
.@E
..
.@E
..
.@E
..
.@E
..
\\$1\l'|0\(ul'\\$2
..
 a better version of u
\Z'\\$1'\v'.25m'\D'l \w'\\$1'u 0'\v'-.25m'\\$2
..
\\*(lq\\$1\\*(rq\\$2
..
\k~\(br\|\\$1\|\(br\l'|\\n~u\(rn'\l'|\\n~u\(ul'\^\\$2
..
\s-1\\$1\\s0\\$2
..
.nr ~ \\$1
. ft \\n~
.rr ~
..
 *** FOOTNOTING ***
.ec
\{\
. nr _D \\n(dn
. nr _0 1v+\\n(nlu
. ev 2
. da |f
. in 0
. xl \\n($lu-\\n(fuu
. @F \\n(ff
. sz \\n(fp
. vs \\n(.sp*\\n($Vu/100u
. if !\\n(?f \
\{\
. nr _b +1v \" allow space for $s
. $s
. \}
. br
. if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
\{\
. da\" \" won't fit on page at all
. bc
. if !\\n(?f \
. rm |f
. da |f
 next five lines could be dropped if headers had their own environment
. in 0 \" reset everything from .bc
. xl \\n($lu-\\n(fuu
. @F \\n(ff
. sz \\n(fp
. vs \\n(.sp*\\n($Vu/100u
. if !\\n(?f \
. $s
. br
. \}
. rr _0
. sp \\n(fsu
. nr ?f 1
. fi
. if !"\\$1"_" \
. ti \\n(fiu
. if \n@>2 .tm << (f $f=\\n($f
.\}
\{\
. ev 2
. in 0
. xl \\n($lu-\\n(fuu
. @F \\n(ff
. sz \\n(fp
. vs \\n(.sp*\\n($Vu/100u
. fi
\!.(f \\$1
\!.@N
.\}
..
..
\{\
. if \\n* \
. nr $f +1
. ds * \\*{\\n($f\\*}\k*
. nr * 0
. in 0
. da
. ev
. if \\n(_w<\\n(dl \
. nr _w \\n(dl \" compute maximum fn width
. nr _b +\\n(dn
. ch @f -\\n(_bu
. if \\n(.p-\\n(_b<=\\n(nl \
. ch @f \\n(nlu+\n(.Vu
. nr dn \\n(_D
. rr _D
.\}
\{\
. br
\!.)f
. ev
.\}
..
.@R ff
. nr ff 1 \" footnote font: Times Roman
.@R fp
. nr fp 8 \" footnote pointsize
\l'2i'
..
 *** DELAYED TEXT ***
.am |d )d
..
. nr $d +1
.rr #
..
.|d
.nr $d 1 1
..
 *** INDEXES (TABLE OF CONTENTS) ***
.nr _x 0 1
.af _x a
. ds |X \\$1
. nr _z 0
. nr _z 1
.@\\n(_z
..
.am %\\*(|X )x
..
..
\{\
. ds |x \\n%
. if \\n(.$>0 \
. ds |x \\$1
. if "\\*(|x"_" \
. ig ..
. am %\\*(|X ..
. if \w"\\$2">(\\n(.l-\\n(.i-\\n(.k) \
. ti +\\n(xuu
\\\\a\\\\t\\$2\\*(|x
...
. rm |x
. rm |X
.\}
\{\
\!.(x \\*(|X
\!\\\\*(=\\n(_x\\\\
\!.)x \\$1 \\$2
\!.rm =\\n(_x
.\}
..

.@C 2
.ls 1
.vs \\n(.sp*\\n($Vu/100u

. ds |X \\$1
.xl -(\\n(xuu+\w'...'u)
.di |x
.%\\*(|X

.di
.xl \\n($lu
.ev
.|x

..
.ep\" \" force out footnotes
\{\
. bp \" force out a table or more footnote
. rs
. ep
.\}
.nr ?C 1
.nr $f 1 1
. pn 1
.bp
.rs
. $c "\\$1"
. sp 3
..
.nr _0 0
. nr _0 1 \" chapter
. nr _0 11 \" renumbered chapter
. nr _0 2 \" appendix
. nr _0 12 \" renumbered appendix
. nr _0 3 \" preliminary material
. nr _0 4 \" bibliographic material
. nr _0 5 \" abstract
. tm Line \\n(c. -- Bad mode to .++
.nr ?R 0
.\{
. nr ?R 1
. nr _0 -10
.\}
.nr ch 0 1
. pn 1 \" must do before .ep
. pn 1 \" must do before .ep
.ep\" \" end page for correct page number types
\{\
. af ch 1
. af % 1
.\}
\{\
. af ch A
. af % 1
.\}
. af % i
. af % 1
. af % 1
. he \\$2
.nr _M \\n(_0
.rr _0
..
.sz 12
 1000
. nr ch +1
. sp 4-\\n(.L
 0
.sz
. $C Chapter \\n(ch "\\$1"
. $C Appendix \\n(ch "\\$1"
..
.hx
.bp

.rs
..
 *** DATES ***
.nr y2 \n(yr%100
.af y2 00
.nr y4 \n(yr+1900
 *** PARAMETRIC INITIALIZATIONS ***
.rr x
.nr $v \n(.v00+\n(.sp-1/\n(.sp \" vs as percentage of ps for .sz request
.nr $V \n($v \" same for displays & footnotes
.nr hm 4v \" header margin
.nr tm 7v \" top margin
.nr bm 6v \" bottom margin
.nr fm 3v \" footer margin
.nr tf 3 \" title font: (real) Times Bold
.nr tp 10 \" title point size
.nr bi 4m \" indent for blocks
.nr pi 5n \" indent for paragraphs
.nr pf 1 \" normal text font
.nr pp 10 \" normal text point size
.nr qi 4n \" indent for quotes
.nr qp -1 \" down one point
.nr ii 5n \" indent for .ip's and .np's
.nr $m 1 \" max number of columns
.nr $s 4n \" column separation
.nr sf 3 \" section font -- Times Bold
.nr sp 10 \" section title pointsize
.nr ss 12p \" section prespacing
.nr si 0 \" section indent
 *** OTHER INITIALIZATION ***
 GNU pic sets this register to 1, to indicate that \x should not be used.
.@R 0x
 for compatibility with traditional -me
 (the first will work only in compatibility mode)
 Avoid warnings from groff -ww.
.@S |0
.@S |1
.@S |2
.@S |3
.@S $H
.@S $0
.@S $1
.@S $2
.@S $3
.@S $4
.@S $5
.@S $6
.@S $7
.@S $8
.@S $9
.@S ..
.@R po\" \" simulated page offset
.@R $0\" \" section depth
.@R $i\" \" paragraph base indent
.@R $p\" \" numbered paragraph number
.@R $r\" \" ratio of vs to ps (may override $v)
.@R $R\" \" same for displays (may override $V)
.@R df\" \" display font: same as surrounding text
.@R so\" \" additional section title offset
.@R fu\" \" footnote undent
.@R bt\" \" block keep threshold
.@R *\" \" has \** been referenced?
.@R ?a\" \" pending floating keep at page top?
.@R ?b\" \" pending floating keep at page bottom?
.@R ?C\" \" at chapter header?
.@R ?e\" \" in equation?
.@R ?H\" \" suppress headers and footers next page?
.@R ?I\" \" has the header trap been sprung?
.@R ?n\" \" n1 mode?
.@R ?o\" \" footnote overflow?
.@R ?R\" \" renumbered chapter?
.@R ?s\" \" skip next page?
.@R ?T\" \" inside .TS H?
.@R ?W\" \" wide floating keep at page bottom?
.@R ?w\" \" wide floating keep at page top?
.nr fi 0.3i
.nr _o \n(.o
.nr $b 3 \" bold
.nr ps 0.35v
.nr bs \n(ps \" block pre/post spacing
.nr qs \n(ps \" quote pre/post spacing
.nr zs 1v \" float-block pre/postspacing
.nr xs 0.2v \" index prespacing
.nr xu 0.5i \" index undent
.nr fs 0.2v \" footnote prespacing
.nr es 0.5v \" equation pre/postspacing
.wh 0 @h \" set header
.nr $l \n(.lu \" line length
.nr _L \n(.lu \" line length of page
.nr $c 1 \" current column number
.nr $f 1 1 \" footnote number
.nr $d 1 1 \" delayed text number
.nr _M 1 \" chapter mode is chapter
.em @z
 *** FOREIGN LETTERS AND SPECIAL CHARACTERS ***
 \" accents
 \" umlaut
 \" circumflex and tilde
 \" cedilla and czech
 \" Norwegian A or angstrom
 \" there exists, for all
.lt 6.0i
.tm The \\$1 macro has been removed from this version of the -me macros.
..
.@U lo
..
.@U th
..
.@U ac
..