.de IP
.ip \\$1 \\$2
..
.de LP
.lp
..
.de SH
.sp
.ti \\n(.iu
.if \\n(1T .sp
.ne 3.1
.ft B
..

.de $0
\\*(st
.(x c
.if '\\$3'1' \ 
.if '\\$3'2' \ \ \ 
.if '\\$3'3' \ \ \ \ \ \ 
.if '\\$3'4'\ \ \ \ \ \ \ \ \ 
.if '\\$3'5'\ \ \ \ \ \ \ \ \ \ \ \ 
\\$2
.if !'\\$3'' :\ 
\\$1  \\fR
.)x \\n%
..

.de $1
.ds co " \\fB
.ds st \\fR
.br
..
.de $2
.ds co "   
.ds st \\fR
.br
..
.de $3
.ds co "     \\fB
.ds st \\fR
.br
..
.de $4
.ds co " \\fB
.ds st \\fR
.br
..

.\" ------------------------------ end of macros --------------------

.