4.mt

早期freebsd实现

.\"------------
.\" Cover sheet. Memorandum type 4
.\"------------
.de cov@print-title
.MOVE 2.4c
.S 12
.ad c
.fi
.B
.cov*title
.br
.S
.R
.ad b
.PGFORM
..
.\"------------
.de cov@print-authors
.SP 0.5
.I
.nr cov*i 0 1
.while \\n+[cov*i]<=\\n[cov*au] \{\
.ce
\\*[cov*au!\\n[cov*i]!1]
.br
.\}
.R
.PGFORM
..
.\"------------
.de cov@print-firm
.SP 0.5
.ce
\\*[cov*firm]
..
.\"------------
.de cov@print-abstract
.SP 2
.if d cov*abstract \{\
.	misc@ev-keep cov*ev
.	if \\n[cov*abs-ind]>0 \{\
.		in +\\n[cov*abs-ind]u
.		ll -\\n[cov*abs-ind]u
.	\}
.	ce
\fI\\*[cov*abs-name]\fP
.	SP 2
.	fi
.	cov*abstract
.	br
.	ev
.\}
..
.\"-----------------
.if d cov*default-firm .if !d cov*firm .ds cov*firm \\*[cov*default-firm]
.if !d cov*mt-printed \{\
.	cov@print-title
.	cov@print-authors
.	cov@print-firm
.	cov@print-abstract
.	SP 3
.	ds cov*mt-printed
.	pg@enable-top-trap
.	pg@enable-trap
.\}