/contrib/groff/contrib/mm/mm/4.MT
https://bitbucket.org/freebsd/freebsd-head/ · Unknown · 82 lines · 81 code · 1 blank · 0 comment · 0 complexity · 62543fa0aad28af55da36a72d6ffe9d4 MD5 · raw file
- .\"------------
- .\" $Id: 4.MT,v 2.2 2003/04/02 04:06:40 jhaegg Exp $
- .\" Cover sheet. Memorandum type 4
- .\"------------
- .de cov@print-title
- .if !d cov*title .@error title (.TL) not defined!
- .MOVE 2.8c
- .S +2
- .ad c
- .fi
- .B
- .cov*title
- .br
- .S
- .R
- .ad b
- ..
- .\"------------
- .de cov@print-authors
- .SP 0.5
- .I
- .S +1
- .nr cov*i 0 1
- .while \\n+[cov*i]<=\\n[cov*au] \{\
- .ce
- \\*[cov*au!\\n[cov*i]!1]
- .br
- .\}
- .S
- .R
- ..
- .\"------------
- .de cov@print-firm
- .if d cov*firm \{\
- . SP 0.5
- . ce
- \\*[cov*firm]
- .\}
- ..
- .\"------------
- .de cov@print-abstract
- .SP 2
- .if d cov*abstract \{\
- . misc@ev-keep cov*ev
- . init@reset
- . 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
- . if d cov*abstract \{\
- . if !\n[cov*abs-arg] .cov@print-abstract
- . \}
- . SP 2
- . nr hd*cur-bline \n[nl]
- . ds cov*mt-printed
- . pg@enable-top-trap
- . pg@enable-trap
- .\}
- .de CS
- .pg@disable-top-trap
- .SK
- .cov@print-title
- .cov@print-authors
- .cov@print-firm
- .cov@print-abstract
- ..