| 1 | .tr ~ |
| 2 | .tr _\(em |
| 3 | .ND |
| 4 | .if n .ls 2 |
| 5 | .de UL |
| 6 | .if t \&\\$3\f3\\$1\fP\\$2\& |
| 7 | .if n \&\\$3\f2\\$1\fP\\$2\& |
| 8 | .. |
| 9 | .de IT |
| 10 | .if n .ul |
| 11 | \\$3\f2\\$1\fP\\$2 |
| 12 | .. |
| 13 | .de UI |
| 14 | \f3\\$1\fI\\$2\fR\\$3 |
| 15 | .. |
| 16 | .de P1 |
| 17 | .if \\n(.$ .DS I \\$1 |
| 18 | .if !\\n(.$ .DS I 5 |
| 19 | .if n .ls 1 |
| 20 | .nf |
| 21 | .if n .ta 5 10 15 20 25 30 35 40 45 50 55 60 |
| 22 | .if t .ta .4i .8i 1.2i 1.6i 2i 2.4i 2.8i 3.2i 3.6i 4i |
| 23 | .if t .tr -\(mi|\(bv'\(fm^\(no |
| 24 | .if t .tr _\(ru |
| 25 | .lg 0 |
| 26 | . use first argument as indent if present |
| 27 | .. |
| 28 | .de P2 |
| 29 | .ft R |
| 30 | .if n .ls 2 |
| 31 | .tr --||''^^!!_\(em |
| 32 | .lg |
| 33 | .DE |
| 34 | .. |
| 35 | .hw semi-colon |
| 36 | .if t .ds m \(mi |
| 37 | .if n .ds m - |
| 38 | .if t .ds n \(no |
| 39 | .if n .ds n - |
| 40 | .if t .ds S \(sl |
| 41 | .if n .ds S / |
| 42 | .if t .ds d \s+4\&.\&\s-4 |
| 43 | .if n .ds d \&.\& |
| 44 | .if t .ds a \z@@ |
| 45 | .if n .ds a @ |
| 46 | .hy 14 |
| 47 | . 2=not last lines; 4= no -xx; 8=no xx- |
| 48 | .ds m \(mi |
| 49 | .tr *\(** |
| 50 | .de WS |
| 51 | .sp |
| 52 | .. |
| 53 | .de UC |
| 54 | \&\\$3\s-2\\$1\s0\\$2\& |
| 55 | .. |