.\" $Copyright:	$
.\" Copyright (c) 1984, 1985, 1986, 1987, 1988, 1989, 1990 
.\" Sequent Computer Systems, Inc.   All rights reserved.
.\"  
.\" This software is furnished under a license and may be used
.\" only in accordance with the terms of that license and with the
.\" inclusion of the above copyright notice.   This software may not
.\" be provided or otherwise made available to, or used by, any
.\" other person.  No title to or ownership of the software is
.\" hereby transferred.
...
. \" $Header: P.mac 1.4 86/05/21 $
.fp 1 LR
.fp 2 LI
.fp 3 TT
.fz 3 -1
.fz S 3 -0
.bd S 3 3	\" embolden special font in context of 3
.if t .nr PI .25i	\" paragraph indent
.nr PS 10	\" text point size
.nr VS 12	\" text vertical (inter-line) spacing
.nr dP 1	\" delta point size for program
.ps \n(PS
.vs \n(VS
.if n .nr NH 1	\" space after NH or SH heading
.if t .nr NH .5v
.if n .ls 2
.de UC
\&\\$3\s-1\\$1\\s0\&\\$2
..
.de IT
.if n .ul
\&\\$3\f2\\$1\f1\^\&\\$2
..
.de UL
.lg 0
.if n .ul
\%\&\\$3\f3\\$1\f1\&\\$2
.lg
..
.cs 3 40 \\n(PS-1	\" constant space
.nr P \\n(PS	\" current point size
.nr S \\n(PS+1	\" 1 points bigger
.nr s \\n(PS-1	\" 1 points smaller
.de P1
.DS I .5i
.nf
.lg 0
.if n .ls 1
.if n .ta 5 10 15 20 25 30 35 40 45 50 55 60
.if t .ps -\\n(dP
.if t .vs -\\n(dP
.nr P \\n(.s
.nr S \\n(.s+1
.nr s \\n(.s-1
.nr t 5*33u	\" width in 9 point CW
.if t .ta 1u*\\ntu 2u*\\ntu 3u*\\ntu 4u*\\ntu 5u*\\ntu 6u*\\ntu 7u*\\ntu 8u*\\ntu 9u*\\ntu 10u*\\ntu 11u*\\ntu 12u*\\ntu 13u*\\ntu 14u*\\ntu
.ft 3
.cs 3 40 \\nP-1
.lg 0
..
.de P2
.ps \\n(PS
.vs \\n(VSp
.nr P \\n(PS
.nr S \\n(PS+1
.nr s \\n(PS-1
.ft 1
.if n .ls 2
.fi
.DE
.lg
.cs 3 40 \\n(PS-1
..
.hy 14	\"2=not last lines; 4= no -xx; 8=no xx-
.am SH
.ft 1
.bd 1 3
..
.am NH
.ft 1
.bd 1 3
..
.am TL
.ft 1
.bd 1 3
..
