1'if \n(FM=0 'so /usr/lib/tmac/tmac.s 2.if n .nr FM 1.2i 3.if t .tr *\(**=\(eq/\(sl+\(pl 4.bd S B 3 5.de mD 6.ta 8n 17n 42n 7.. 8.de SM 9.if "\\$1"" .ps -2 10.if !"\\$1"" \s-2\\$1\s0\\$2 11.. 12.de LG 13.if "\\$1"" .ps +2 14.if !"\\$1"" \s+2\\$a\s0\\$2 15.. 16.de HP 17.nr pd \\n(PD 18.nr PD 0 19.if \\n(.$=0 .IP 20.if \\n(.$=1 .IP "\\$1" 21.if \\n(.$>=2 .IP "\\$1" "\\$2" 22.nr PD \\n(pd 23.. 24.de ZP 25.nr pd \\n(PD 26.nr PD 0 27.PP 28.nr PD \\n(pd 29.. 30.de LS \"LS - Literal display; ASCII DS 31.if \\n(.$=0 .DS 32.if \\n(.$=1 \\$1 33.if \\n(.$>1 \\$1 "\\$2" 34.if t .tr '\'`\`^\(ua-\(mi 35.if t .tr _\(ul 36.. 37.de LE \"LE - End literal display 38.DE 39.tr ''``__--^^ 40.. 41.de UP 42Berkeley Pascal\\$1 43.. 44.de PD 45\s-2PDP\s0 46.if \\n(.$=0 11/70 47.if \\n(.$>0 11/\\$1 48.. 49.de DK 50Digital Equipment Corporation\\$1 51.. 52.de PI 53.I pi \\$1 54.. 55.de Xp 56.I Pxp \\$1 57.. 58.de XP 59.I pxp \\$1 60.. 61.de IX 62.I pix \\$1 63.. 64.de X 65.I px \\$1 66.. 67.de PX 68.I px \\$1 69.. 70.if n .ds dg + 71.if t .ds dg \(dg 72.if n .ds Dg \*(dg 73.if t .ds Dg \v'-0.3m'\s-2\*(dg\s0\v'0.3m' 74.if n .ds dd * 75.if t .ds dd \(dd 76.if n .ds Dd \*(dd 77.if t .ds Dd \v'-0.3m'\s-2\*(dd\s0\v'0.3m' 78.if n .ds b \\fI 79.if t .ds b \\fB 80.nr xx 1 81