add missing /sys/lib/tmac/me files (thanks sirjofri)

This commit is contained in:
Sigrid 2020-05-04 11:55:29 +02:00
parent ac88ce4f7f
commit 5e7959182a
13 changed files with 827 additions and 0 deletions

55
sys/lib/tmac/me/acm.me Normal file
View file

@ -0,0 +1,55 @@
.nr _0 \n(c.
.\" @(#)acm.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de ac
.ll 8.9i
.nr $s 0.5i
.if !\\n($T \
. po 1.0i
.ie "\\$2"*" \
\{\
. nr hm 0.375i
. nr tm 1.125i
. pl 14.25i
. nr bm 1.5i
. de $h ..
. tl ''%''
...
. rm $f
.\}
.el \
\{\
. nr hm 0
. nr tm 0
. pl 15i
. nr bm 3i
. nr fm 0.9i
. de $f ..
. ti 0
\h'|0.5i'\\\\n%\h'|1.25i'\\$2\h'|3i'\\$1
. br
...
. rm $h
.\}
.bp
.rs
.sp 0.75i
.rm ac
..
.if t .tm Line \n(c. -- macro .ac will not work in TROFF -- request ignored.
.if t .rm ac
.de +c
.if \\n(?A \
\{\
. nr ch 0 1
. pn 1
. ep
. af % 1
. bp
.\}
.nr ?A 0
.sp 1i
.if \\n(.$ \
. $c "\\$1"
..
.nr c. \n(_0

53
sys/lib/tmac/me/chars.me Normal file
View file

@ -0,0 +1,53 @@
.nr _0 \n(c.
.\" @(#)chars.me 2.2 8/29/80
.\" This version has had comments stripped; an unstripped version is available.
.if n \
\{\
. ds #[ \f1
. ds #] \fP
. ds #h 0
. ds #v 0.8m
. ds #f 0.3m
.\}
.if t \
\{\
. ds #[ \&
. ds #] \&
. ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
. ds #v 0.6m
. ds #f 0
.\}
.ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\*(#[\(aa\h'|\\n_u'\*(#]
.ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\*(#[\(ga\h'|\\n_u'\*(#]
.ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m+\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m+\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#]
.ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[^\h'|\\n_u'\*(#]
.ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[~\h'|\\n_u'\*(#]
.ds , \k_\h'-(\\n(.wu)'\*(#[,\h'|\\n_u'\*(#]
.ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\*(#[\s-4v\s0\v'\*(#v'\h'|\\n_u'\*(#]
.ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\*(#[\z\(de\v'0.4n'\h'|\\n_u'\*(#]
.ds qe \*(#[\v'0.5m'\z\(em\v'-0.65m'\z\(em\v'-0.65m'\z\(em\v'0.8m'\h'0.3m'|\h'-0.3m'\*(#]
.ds qa \*(#[\h'-0.24m'\z\e\h'0.48m'\z\(sl\h'-0.24m'\v'-0.15m'\(em\v'0.15m'\*(#]
.if t \
\{\
. ds qe \s-2\v'0.45m'\z\(em\v'-0.625m'\z\(em\v'-0.625m'\(em\v'0.8m'\s0\h'-0.1m'\v'-0.05m'\(br\v'0.05m'\h'0.1m'
. ds qa \z\e\h'0.35m'\z\(sl\h'-0.33m'\v'-0.3m'\s-4\(em\s0\v'0.3m'\h'0.15m'
.\}
.if \n($T \
\{\
. ds ' \*(#[\h'-1'\(aa\*(#]
. ds ` \*(#[\h'-1'\(ga\*(#]
. ds : \&
. ds ^ \*(#[\h'-1'^\*(#]
. ds ~ \*(#[\h'-1'~\*(#]
. ds , \*(#[\h'-1',\*(#]
. ds v \&
. ds o \&
. ds qe EXISTS
. ds qa FORALL
.\}
.rm #[
.rm #]
.rm #h
.rm #v
.rm #f
.nr c. \n(_0

View file

@ -0,0 +1,20 @@
.nr _0 \n(c.
.\" @(#)deltext.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de (d
.am |d )d
.sp \\n(bsu
..
.de )d
.if \\n# \
. nr $d +1
.ds # [\\n($d]\k#
.rr #
..
.de pd
.|d
.rm |d
.nr $d 1 1
.ds # [1]\k#
..
.nr c. \n(_0

77
sys/lib/tmac/me/eqn.me Normal file
View file

@ -0,0 +1,77 @@
.nr _0 \n(c.
.\" @(#)eqn.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de EQ
.ec
.if !\\n(?e \
\{\
. if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
. @D 1 "\\$1" "\\$2"
. @C 2
. di |e
.\}
.ls 1
.in 0
.nf
..
.de EN
.br
.ie "\\$1"C" \
\{\
. nr ?e 1
. sp \\n(esu
.\}
.el \
\{\
. nr ?e 0
. di
. if \\n(dn \
. @q
. rm |e
. rm 10
. rm 11
. rm 12
. rm 13
. rm 14
. rm 15
. rm 16
. rm 17
. rm 18
. rm 19
. rm 20
. rm 21
. rm 22
. rm 23
. ev
.\}
..
.de @q
.nr _Q \\n(dnu
.ev
.sp \\n(esu
.@C 2
.ie \\n(_d=1 \
. in (\\n(.lu+\\n($iu-\\n(dlu)/2u
.el .ie \\n(_d=2 \
. in \\n($iu
.el .ie \\n(_d=3 \
. in \\n(biu+\\n($iu
.el .if \\n(_d=4 \
. in 0
.if !"\\n(.z"" \!.ne \\n(_Qu
.ne \\n(_Qu+\n(.Vu
.mk _q
.if !"\\*(|p"" \
\{\
. rs
. sp (\\n(_Qu-\\n(.vu)/2u
. tl """\\*(|p"
. rt \\n(_qu
.\}
.|e
.sp |\\n(_qu+\\n(_Qu
.sp \\n(esu+\\n(.Lv-1v
.rr _q
.rr _Q
..
.nr c. \n(_0

63
sys/lib/tmac/me/float.me Normal file
View file

@ -0,0 +1,63 @@
.nr _0 \n(c.
.\" @(#)float.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de (z
.@D 4 \\$1 \\$2
.@(
.nr ?T 0
..
.de )z
.sp \\n(zsu
.@)
.rr _0
.if !\\n(?b \
. nr dn +(\\n(ppu*\\n($ru)/2u+\\n(zsu
.nr dl -\n(.H
.ie ((\\n(dn+\n(.V)>=\\n(.t):(\\n(?a):((\\n(dl>\\n($l)&(\\n($c>1)) \
\{\
. nr ?a 1
. if (\\n(dl>\\n($l)&(\\n($m>1) \
. nr ?w 1
. ds |x |t
.\}
.el \
\{\
. nr ?b 1
. if (\\n(dl>\\n($l)&(\\n($m>1) \
. nr ?W 1
. nr _b +\\n(dnu
. ch @f -\\n(_bu
. ds |x |b
.\}
.da \\*(|x
.nf
.ls 1
.nr ?k 1
\!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
.eo
.cc @
@|k
@cc
.ec
.nr ?k 0
.rm |k
.da
.in 0
.ls 1
.xl \\n($lu
.ev
..
.de @k
.ev 1
.nf
.ls 1
.in 0
.sp \\n(zsu
.\\$1
.ec
.br
.rm \\$1
.ev
.nr ?T 0
..
.nr c. \n(_0

View file

@ -0,0 +1,83 @@
.nr _0 \n(c.
.\" @(#)footnote.me 2.4 9/23/80
.\" This version has had comments stripped; an unstripped version is available.
.de (f
.ec
.if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
.ie "\\n(.z"" \
\{\
. 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(fpu
. vs \\n(.su*\\n($Ru
. if !\\n(?f \
\{\
. nr _b +2u*\n(.Vu
. $s
. \}
. br
. if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
\{\
. da\"
. bc
. if !\\n(?f \
. rm |f
. da |f
. in 0
. xl \\n($lu-\\n(fuu
. @F \\n(ff
. sz \\n(fpu
. vs \\n(.su*\\n($Ru
. if !\\n(?f \
. $s
. br
. \}
. rr _0
. sp \\n(fsu
. nr ?f 1
. fi
. if !"\\$1"_" \
. ti \\n(fiu
.\}
.el \
\{\
. ev 2
\!.(f \\$1
.\}
..
.de )f
.ie "\\n(.z"|f" \
\{\
. if \\n* \
. nr $f +1
. ds * \\*[\\n($f\\*]\k*
. rr *
. in 0
. da
. ev
. if \\n(_w<\\n(dl \
. nr _w \\n(dl
. nr _b +\\n(dn
. ch @f -\\n(_bu
. if \\n(.p-\\n(_b<=\\n(nl \
. ch @f \\n(nlu+\n(.Vu
. nr dn _D
. rr _D
.\}
.el \
\{\
. br
\!.)f
. ev
.\}
..
.if \n(ff<=0 \
. nr ff 1
.if \n(fp<=0 \
. nr fp 8
.nr c. \n(_0

70
sys/lib/tmac/me/index.me Normal file
View file

@ -0,0 +1,70 @@
.nr _0 \n(c.
.\" @(#)index.me 2.6 12/10/80
.\" This version has had comments stripped; an unstripped version is available.
.de (x
.ie !"\\n(.z"" \
\{\
. ev 2
\!\\!.(x \\$1
.\}
.el \
\{\
. ds |X x
. if \\n(.$ \
. ds |X \\$1
. am %\\*(|X )x
. sp \\n(xsu
.\}
..
.de )x
.ie "\\n(.z"" \
\{\
. ds |x \\n%
. if \\n(.$ \
. 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
.\}
.el \
\{\
\!\\!.)x \\$1 \\$2
. br
. ev
.\}
..
.de xp
.br
.@C 2
.ls 1
.vs \\n(.su*\\n($Ru
.fi
.ds |X x
.if \\n(.$ \
. ds |X \\$1
.xl -(\\n(xuu+\w'...'u)
.di |x
.%\\*(|X
.br
.di
.rm %\\*(|X
.xl \\n($lu
.rm |X
.ev
.nf
.in 0
.ta \\n(.lu-\\n(xuuR \\n(.luR
.|x
.fi
.in
.rm |x
..
.if \n(xu<=0 \
. nr xu 0.5i
.nr c. \n(_0

10
sys/lib/tmac/me/local.me Normal file
View file

@ -0,0 +1,10 @@
.nr _0 \n(c.
.\" this file may contain local macros, which are initialized with
.\" the ".lo" request. All macros and number registers in this file
.\" should be named ".*X", where X is any letter (upper or lower case)
.\" or digit, to avoid naming conflicts.
.\"
.\" @(#)local.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
. \" *** insert new definitions before this line ***
.nr c. \n(_0

3
sys/lib/tmac/me/null.me Normal file
View file

@ -0,0 +1,3 @@
.\" @(#)null.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.cc .

157
sys/lib/tmac/me/revisions Normal file
View file

@ -0,0 +1,157 @@
2.9 10 Dec 80
-- More stuff to make indices inside keeps work correctly.
2.8 10 Nov 80
-- Had .)c do a .br to insure that the final line is forced out.
2.7 24 Sep 80
-- Fixed bug in 2.6
2.6 23 Sep 80
-- Fixed problem introduced by 2.2 which occured in footnotes and
index entries in filled keeps
2.5 29 Aug 80
-- Changed umlaut to not be so tricky -- it seems to backfire.
2.4 25 Aug 80
-- Fixed bug in indices caused by 2.2.
2.3 20 Aug 80
-- Fixed bug in footnotes caused by 2.2.
-- Changed temp file names that macros that do dynamic loading rename
themselves to. For example, if you say '.TS ... .(f' when both of
them have been used for the first time, the @T macro got used twice.
2.2 18 Aug 80
-- Suspended footnote & index processing until final output
(so that they will work properly in keeps).
2.1 18 Aug 80
-- Release 2. No changes.
Mod 28 18 Aug 80
-- If \nv is set on entry, handle .po differently (for vtroff).
-- Allow ".nr fi 0".
Mod 27 30 Jun 80
-- Put in a cludge to try to make multi-columned output work
with wide floating keeps. Moves all wide keeps to the top
of the next real page.
Mod 26 9 Nov 79
-- Fixed footnote bug that caused the first line of footnotes
that were broken across a page to be indented.
Mod 25 1 Oct 79
-- Fixed footnote bug that caused footnotes invoked at the
top of pages to come out in bold font.
-- Fixed equation bug that caused equations at the top of
page to be improperly centered.
Mod 24 27 Sep 79
-- Changed delimiter in all \w's to " from ', to allow for
apostrophes in labels.
-- Increased footnote fudge factor.
-- Changed \x factor in \*[ & \*< to be one half previous value.
Mod 23 24 Aug 79
-- Changed .ip to start new line if the tag is too long for
the space provided.
Mod 22 11 Jul 79
-- Changed .ac to handle new paper (with second parameter
== "*").
Mod 21 24 Apr 79
-- Changed \*[ and \*< to use \x -- to avoid line overlap.
Mod 20 6 Apr 79
-- Changed 12-pitch DTC terminals to still space 1/6 inch (instead
of 1/8 inch), unless the 'x' register is non-zero -- do-able with
the -rx1 option on the nroff command line.
Mod 19 28 Mar 79
-- Had .ep do a .rs, to avoid occasional problems (like with
.+c (again).
-- Added the 'X' register: if non-zero on startup on a 12-pitch
terminal, it outputs 6 LPI instead of 8 LPI.
Mod 18 26 Mar 79
-- Had .+c reset indent, to solve problems of prelim material
after a .ip (as with references)
Mod 17 19 Mar 79
-- Fixed a bug in .++ which caused it to renumber pages incorrectly,
the result of nroff starting a new page immediately upon reaching
the end of the previous page (damn!).
Mod 16 8 Mar 79
-- Fixed a bug in .++ which caused it to change page number formats
before forcing out the page.
-- Changed tmac.e so that extra '.so's to the package will next to
'null.me'.
-- Changed .sh so that a title of "_" will cause section depth change
side-effects only (base indent will remain the same, and no output
will occur).
Mod 15a 7 Mar 79
-- Fixed a bug in Mod 15 which caused .ip's to fail.
Mod 15 2 Mar 79
-- Changed .@p to do paragraph indents normally in keeps, which
will override the indent parameter in keeps with paragraph
forms in them (use .ba to fix this).
Mod 14 23 Feb 79
-- Fixed .ip so it would hyphenate correctly.
Mod 13 16 Feb 79
-- Added .rs before eqn title output to fix vertical centering
problem.
Mod 12 15 Feb 79
-- Changed NROFF bold font to be regular .ul (.cu is a pain).
-- Changed .sh to output regular spaces instead of unpaddable
spaces.
-- Fixed bug in .1c with bad line length (didn't reset \n($l).
Mod 11 13 Feb 79
-- Added hook to .$c to call .$C (for index entries or whatever).
Mod 10 12 Feb 79
-- Had .xp print in current environment and not reset to single
spacing, to allow more control over output format.
Mod 9 26 Dec 78
-- Fixed yet another problem with equation spacing.
Mod 8 18 Dec 78
-- Fixed .@q to solve a problem with \n(dn getting lost on
equations at top of page.
Mod 7 11 Dec 78
-- Had .@q (equation output) move to end of equation after
equation output (eqn doesn't seem to space quite right).
Mod 6 27 Nov 78
-- Fixed the umlaut on DTC output to be prettier.
Mod 5 5 Nov 78
-- Fixed a bug with the second parameter to .ip.
Mod 4 2 Nov 78
-- Added .uh command (unnumbered heading).
-- Changed .$p and .sh accordingly.
Mod 3 2 Oct 78
-- Fixed .ne command in .$p (print section headings).
Mod 2 25 Sep 78
-- Changed .np to use () instead of [].
Mod 1 12 Sep 78
-- Fixed footnote fudge factor (curse NROFF!!)
-- Put "needs" on .(z, .)z.
Mod 0 11 Sep 78

108
sys/lib/tmac/me/sh.me Normal file
View file

@ -0,0 +1,108 @@
.nr _0 \n(c.
.\" @(#)sh.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de sh
.if (\\n(si>0)&(\\n(si<1n) \
. nr si \\n(sin
.ce 0
.@d "\\$1" +1 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8
.if !"\\$2"_" \
\{\
. ds |x \&\\$2
. $p "\\*(|x" "\\*($n" \\n($0
. $0 "\\*(|x" "\\*($n" \\n($0
. rm |x
.\}
.nr $p 0 1
..
.de @d
.if !""\\$1" \
. nr $0 \\$1
.if \\n($0&(\\n(.$>1) \
. nr $\\n($0 \\$2
.ds $n \&\"
.ie \\n($0>=1 \
\{\
. if \\n($1=0 \
. nr $1 1
. if (\\n(.$>=3) .if !"\\$3"-" \
. nr $1 \\$3
. as $n \\n($1
.\}
.el \
. nr $1 0
.ie \\n($0>=2 \
\{\
. if \\n($2=0 \
. nr $2 1
. if (\\n(.$>=4) .if !"\\$4"-" \
. nr $2 \\$4
. as $n .\\n($2
.\}
.el \
. nr $2 0
.ie \\n($0>=3 \
\{\
. if \\n($3=0 \
. nr $3 1
. if (\\n(.$>=5) .if !"\\$5"-" \
. nr $3 \\$5
. as $n .\\n($3
.\}
.el \
. nr $3 0
.ie \\n($0>=4 \
\{\
. if \\n($4=0 \
. nr $4 1
. if (\\n(.$>=6) .if !"\\$6"-" \
. nr $4 \\$6
. as $n .\\n($4
.\}
.el \
. nr $4 0
.ie \\n($0>=5 \
\{\
. if \\n($5=0 \
. nr $5 1
. if (\\n(.$>=7) .if !"\\$7"-" \
. nr $5 \\$7
. as $n .\\n($5
.\}
.el \
. nr $5 0
.ie \\n($0>=6 \
\{\
. if \\n($6=0 \
. nr $6 1
. if (\\n(.$>=8) .if !"\\$8"-" \
. nr $6 \\$8
. as $n .\\n($6
.\}
.el \
. nr $6 0
..
.de sx
.ce 0
.ul 0
.nr _0 \\n($0-1
.if \\n(.$ .nr _0 +1
.if \\n(.$ .nr _0 \\$1
.@d \\n(_0
.rr _0
.$p "" "" \\n($0
.nr $p 0 1
..
.de uh
.$p "\\$1"
.$0 "\\$1"
..
.if \n(sf<=0 \
. nr sf 8
.if \n(sp<=0 \
. nr sp 10
.if \n(ss<=0 \
. nr ss 12p
.if \n(si<=0 \
. nr si 0
.nr c. \n(_0

109
sys/lib/tmac/me/tbl.me Normal file
View file

@ -0,0 +1,109 @@
.nr _0 \n(c.
.\" @(#)tbl.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.de TS
.sp \\n(bsu
.@C 1
.if "\\$1"H" \
\{\
. di |h
. nr ?T 1
.\}
.ls 1
.ch @f -(\\n(_bu+1v)
..
.de TH
.nr T. 0
.T# 0
.di
.nr _i \\n(.i
.in 0
.|h
.in \\n(_iu
.rr _i
.mk #T
..
.de TE
.nr ?T 0
.ch @f -\\n(_bu
.ev
.sp \\n(bsu+\\n(.Lv-1v
.re
.rr 31
.rr 32
.rr 33
.rr 34
.rr 35
.rr 36
.rr 37
.rr 38
.rr 39
.rr 40
.rr 41
.rr 42
.rr 43
.rr 44
.rr 45
.rr 46
.rr 47
.rr 48
.rr 49
.rr 50
.rr 51
.rr 52
.rr 53
.rr 54
.rr 55
.rr 56
.rr 57
.rr 58
.rr 59
.rr 60
.rr 61
.rr 62
.rr 63
.rr 64
.rr 65
.rr 66
.rr 67
.rr 68
.rr 69
.rr 70
.rr 71
.rr 72
.rr 73
.rr 74
.rr 75
.rr 76
.rr 77
.rr 78
.rr 79
.rr 80
.rr 81
.rr 82
.rr 83
.rr 84
.rr 85
.rr 86
.rr 87
.rr 88
.rr 89
.rr 90
.rr 91
.rr 92
.rr 93
.rr 94
.rr 95
.rr 96
.rr 97
.rr 98
.rr 99
.rr #I
.rr #T
.rr #a
.rr ##
.rr #-
.rr #^
.rr T.
..
.nr c. \n(_0

19
sys/lib/tmac/me/thesis.me Normal file
View file

@ -0,0 +1,19 @@
.nr _0 \n(c.
.\" Setup for thesis.
.\" This file should be modified to keep up with the standard
.\" for a doctoral thesis at Berkeley. Other macros which may
.\" be useful for a thesis are defined here.
.\" @(#)thesis.me 2.1 8/18/80
.\" This version has had comments stripped; an unstripped version is available.
.nr tf 1
.he '''%'
.if n .if \n(_o \
. po 1.5i
.if t .po 1.125i
.ll 5.75i
.if n .if 1n=0.1i \
. ll 5.8i
.m1 1i
.nr ?t 1
.ls 2
.nr c. \n(_0