contrib/mm/mm/4.MT

   1 .\" -*- nroff -*-
   2 .ig
   3
   4 Copyright (C) 1991-2018 Free Software Foundation, Inc.
   5 mgm is written by Jörgen Hägg <jh@axis.com>
   6
   7 mgm is free software; you can redistribute it and/or modify it under
   8 the terms of the GNU General Public License as published by the Free
   9 Software Foundation, either version 3 of the License, or
  10 (at your option) any later version.
  11
  12 mgm is distributed in the hope that it will be useful, but WITHOUT ANY
  13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  15 for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 Please submit bug reports with examples at
  21 http://savannah.gnu.org/bugs/?group=groff.
  22 ..
  23 .
  24 .\"------------
  25 .\" Cover sheet. Memorandum type 4
  26 .\"------------
  27 .de cov@print-title
  28 .if !d cov*title .@error title (.TL) not defined!
  29 .MOVE 2.8c
  30 .S +2
  31 .ad c
  32 .fi
  33 .B
  34 .cov*title
  35 .br
  36 .S
  37 .R
  38 .ad b
  39 ..
  40 .\"------------
  41 .de cov@print-authors
  42 .SP 0.5
  43 .I
  44 .S +1
  45 .nr cov*i 0 1
  46 .while \\n+[cov*i]<=\\n[cov*au] \{\
  47 .ce
  48 \\*[cov*au!\\n[cov*i]!1]
  49 .br
  50 .\}
  51 .S
  52 .R
  53 ..
  54 .\"------------
  55 .de cov@print-firm
  56 .if d cov*firm \{\
  57 .       SP 0.5
  58 .       ce
  59 \\*[cov*firm]
  60 .\}
  61 ..
  62 .\"------------
  63 .de cov@print-abstract
  64 .SP 2
  65 .if d cov*abstract \{\
  66 .       misc@ev-keep cov*ev
  67 .       init@reset
  68 .       if \\n[cov*abs-ind]>0 \{\
  69 .               in +\\n[cov*abs-ind]u
  70 .               ll -\\n[cov*abs-ind]u
  71 .       \}
  72 .       ce
  73 \fI\\*[cov*abs-name]\fP
  74 .       SP 2
  75 .       fi
  76 .       cov*abstract
  77 .       br
  78 .       ev
  79 .\}
  80 ..
  81 .\"-----------------
  82 .if d cov*default-firm .if !d cov*firm .ds cov*firm \\*[cov*default-firm]
  83 .if !d cov*mt-printed \{\
  84 .       cov@print-title
  85 .       cov@print-authors
  86 .       cov@print-firm
  87 .       if d cov*abstract \{\
  88 .               if !\n[cov*abs-arg] .cov@print-abstract
  89 .       \}
  90 .       SP 2
  91 .       nr hd*cur-bline \n[nl]
  92 .       ds cov*mt-printed
  93 .       pg@enable-top-trap
  94 .       pg@enable-trap
  95 .\}
  96 .de CS
  97 .pg@disable-top-trap
  98 .SK
  99 .cov@print-title
 100 .cov@print-authors
 101 .cov@print-firm
 102 .cov@print-abstract
 103 ..
 104