}` ''' $RCSfile$$Revision$$Date$ ''' ''' $Log$ ''' .de Sh .br .if t .Sp .ne 5 .PP \$1 .PP .. .de Sp .if t .sp .5v .if n .sp .. .de Ip .br .ie \n(.$>=3 .ne \$3 .el .ne 3 .IP "\$1" \$2 .. .de Vb .ft CW .nf .ne \$1 .. .de Ve .ft R .fi .. ''' ''' ''' Set up -- to give an unbreakable dash; ''' string Tr holds user defined translation string. ''' Bell System Logo is used as a dummy character. ''' .tr *W-||Tr .ie n { .ds -- *W- .ds PI pi .if (n(.H=4u)&(1m=24u) .ds -- *W*W-