.\" ----------------------------------------------------------------
.\" start of references
.de ]<
.sp 2
.ft B
References
.ft
.sp 1
.nh
.ad l
..
.\" ----------------------------------------------------------------
.\" end of references
.de ]>
.hy
.ad b
..
.\" ----------------------------------------------------------------
.\" start of bibliography entry
.de ]-
.\" clear all registers in preparation for a new item
.ds [A
.ds [C
.ds [D
.ds [I
.ds [T
.ds [W
..
.\" ----------------------------------------------------------------
.\" end of bibliography entry
.de ][
.in +2n
.ti -2n
.DT \\*([D\" extract year from date
.ref-\\$2
.in -2n
.sp .5
..
.\" ----------------------------------------------------------------
.de DT
.ds [D \\$\\n(.$\" year is assumed to be the last argument
..
.\" ----------------------------------------------------------------
.de ref-article-in-book
\\*([A:
.ft I
\\*([T\c
\&.
.ft
In:
.ft I
\\*([B\c
.ft
.tr -\(en
.if !'\\*([P'', p.\~\\*([P\c
.tr --
\&.
.if !'\\*([I''\\*([I,
\\*([C
(\\*([D)
..
.\" ----------------------------------------------------------------
.de ref-book
\\*([A:
.ft I
\\*([T\c
.ft
\&.
.if !'\\*([I''\\*([I,
\\*([C
(\\*([D)
..
.\" ----------------------------------------------------------------