.\" configurable options
.\" --------------------
.ds Sf C		\" font
.nr Sp 8p		\" point size
.nr Sv 11p		\" vertical spacing (leading)
.nr St 8n		\" tab width
.
.\" setup
.\" -----
.nr FM -1v		\" ensure that footnotes fit
.
.\" macro definitions
.\" -----------------
.eo
.\" Sr -- source code begin
.de Sr
. br
. mk c			\" vertical position where text ends
. if (\nb > \nc) .sp (\nbu - \ncu)
. if (\nb > 0) .if ((\nc + 1p) > \nb) .sp \(PDu
. if !(\nz = 1) .if (\np > 0) .if (\n% > \np) .sp -(\nbu - \ncu - 1.5v)
. nf
. ft \*(Sf
. ps \n(Spu
. vs \n(Svu
. ta \n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu +\n(Stu
. in 2.2i
. mk a			\" vertical position where source code begins
. nr p \n%		\" current page number
..
.\" Se -- source code end
.de Se
. mk b			\" vertical position where source code ends
. rt \nau
. nr z 0
. if (\n% > \np) \{
.  rt \n(HMu		\" return to top of new page
.  nr z 1		\" signal page break
. \}
. nr LL 2i
. ns			\" ignore space before text (like that added by LP/PP)
. LP
..
.ec