.do xflag 3
.de __
..
.blm __  \" ignore empty lines in input
.lc_ctype en_US.utf8
.mediasize a4

.fp 1 R urw/bookman/ubkl8a pfb
.fp 2 I urw/bookman/ubkli8a pfb
.fp 3 B urw/bookman/ubkd8a pfb
.fp 4 BI urw/bookman/ubkdi8a pfb


.ss 12 0  \" the second (non-portable) argument requests french spacing

.nr PI 4n
.nr PD .3v
.nr QI 2u*\n(PIu
.nr lu 0
.af PN i

.nr PS 12
.nr VS 18

.ds CH "

.nr PO 2.5c
.nr HM 3.5c
.nr FM 3.5c
.nr LL 15c
.ll 15c
.nr LT \n(LL

.	\" _M - change margins for text block on next page
.de _M
.\" if t .if o .nr PO 5c
.\" if t .if e .nr PO 3c
.\" nr PO 2.5c
.\" ds CF "
..
.\" .wh -1u _M

.de _H
'sp |\n(HMu-1.5c
.ps 12
.vs 14
.ft I
.tl 'Markus Schnalke: Die Anfaenge der digitalen Revolution''%'
.ft P
.ps
.vs
..
.wh 1u _H

.	\" ZZ - enlarge or shorten the text block on the current
.	\"      page to avoid widows
.	\"  .ZZ      -> enlarge by one line
.	\"  .ZZ +3   -> enlarge by three lines
.	\"  .ZZ -2   -> shorten by two lines
.	\"  .ZZ +1c  -> enlarge by one centimeter
.	\"  .ZZ ""   -> reset to the default
.de ZZ
.ie \\n(.$=0 .ch FO -\\n(FMu+1v
.el .ch FO -\\n(FMu\\$1
..

.	\" CW - Set text in CW font (similar to .B and .I)
.de CW
.nr PQ \\n(.f
.if t \{\
.	ft CW
.	if !^\\$1^^ \&\\$1\f\\n(PQ\\$2
.\}
.if n \{\
.	ie ^\\$1^^ .ul 999
.	el .ul 1
.	if \\n(.$=1 \&\\$1
.	if \\n(.$>1 \&\\$1\c
.	if \\n(.$>1 \&\\$2
.\}
..

.	\" refer(1) stuff
.ds [. " [
.ds .] ]
.rm ]<
.de ]<
.	de FP
.	IP \\\\$1
\\..
.	rm FS FE
..

.	\" PT - page top macro of ms
.am PT
.	rs
..


.	\" RN - Reset PN and continue on an odd page ($1=number-format)
.de RN
.ie e .pn 1
.el \{
.       pn 0
.       bp
.\}
.ie \\n(.$=1 .af PN \\$1
.el .af PN 1
..


.	\" T_ - Add TOC entry ($1=pre-space $2=indent-level $3=text)
.de T_
.tm TOC____.sp \\$1
.tm TOC____\&\\h'\\$2u*2u*\\n(PIu'\\$3\0\0\a\t\\n(PN\fR
..

.	\" NH - redefine numbered heading
.de NH
.SH
.nr NS \\$1
.if !\\n(.$ .nr NS 1
.if !\\n(NS .nr NS 1
.nr H\\n(NS +1
.if \\n(NS<2 .nr H2 0
.if \\n(NS<3 .nr H3 0
.ds SN \\n(H1
.if \\n(NS>1 .as SN \&.\\n(H2
.if \\n(NS>2 .as SN \&.\\n(H3
..

.	\" H- - Chapter not numbered and not in TOC
.de H-
.ig IG
.EH "
.OH "
.IG
.bp
.\" .if e .rs  \" move to an odd page
.\" .if e .bp
.lg 0
.nr PS +6
.nr VS +6
.SH
.ce 1
.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
\&\\$1
.br
.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
.nr PS -6
.nr VS -6
.lg
.ig IG
.EH "\\\\*(_E
.OH "\\\\*(_o
.IG
.\" .ds CF \\n(PN
.RT
.sp 4
.nr PP 0
..

.	\" AP - Start the Appendix
.de AP
.nr _A 1
.nr H1 0
.af H1 A
..

.	\" H0 - Chapter ($2=="no" -> not numbered)
.de H0
.\" bp
.\" .if e .rs  \" begin chapter on an odd page
.\" .if e .bp
.lg 0
.nr PS +6
.nr VS +6
.ie ,\\$2,no, .SH
.el \{\
.	NH 1
.	ce 1
.ie \\n(_A Appendix \\*(SN
.el Chapter \\*(SN
.	sp .5
.\}
.sp
.ce 1
.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
\&\\$1
.br
.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
.nr PS -6
.nr VS -6
.lg
.\" add to TOC
.rm t_
.if !,\\$2,no, .ds t_ \\Z'\\*(SN'\\h'3n'
.T_ .5v 0 "\fB\\*(t_\\$1
.RT
.sp
.nr PP 0
..


.	\" H1 - Section ($2=="no" -> not numbered)
.de H1
.br
.ne 7
.sp
.lg 0
.nr PS +2
.nr VS +2
.ie '\\$2'no' .SH
.el .NH 2
.if !'\\$2'no' \&\\*(SN
.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
\&\\$1
.br
.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
.nr PS -2
.nr VS -2
.lg
.if !'\\$2'no' .T_ .3v 1 "\\Z'\\*(SN'\\h'4n'\\$1  \" add to TOC
.RT
.nr PP 0
..

.	\" H2 - Subsection
.de H2
.br
.ne 4
.NH 3
\&\\*(SN \\$1
.T_ 0 2 "\\Z'\\*(SN'\\h'5.5n'\\$1  \" add to TOC
.RT
.nr PP 0
..

.	\" U1 - Section ($2=="yes" -> add to TOC)
.de U1
.br
.ne 7
.sp
.lg 0
.nr PS +2
.nr VS +2
.SH
.tr aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ
\&\\$1
.br
.tr aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz
.nr PS -2
.nr VS -2
.lg
.T_ .3v 1 "\\$1  \" add to TOC
.RT
.nr PP 0
..


.	\" U2 - Subsection unnumbered ($2=="yes" -> add to TOC)
.de U2
.br
.ne 4
.SH
\&\\$1
.if '\\$2'yes' .T_ 0 2 "\\Z'\\*(SN'\\h'5.5n'\\$1  \" add to TOC
.RT
.nr PP 0
..

.	\" U3 - Subsubsection unnumbered
.de U3
.br
.ne 4
.RT
.sp
.I "\\$1
.RT
.nr PP 0
..

.	\" P - Paragraph (indented unless following a heading)
.de P
.ie \\n(PP .PP
.el .LP
.nr PP 1
..

.am LP
.nr PP 1
..


.	\" LI - Numbered paragraph ``list item'' ($1=label)
.de LI
.ie \\n(.$ .IP "\\h'\\n(PIu'\\$1." 2u*\\n(PIu
.el .IP "\\h'\\n(PIu'\\(bu" 2u*\\n(PIu
.nr PP 1
..
.ig \" backup
.ie \\n(.$ .IP "\h'1n'\\$1"
.el .IP "\h'1.5n'\\(bu"
..

.	\" BU - Bulleted paragraph
.de BU
.LI
..

.	\" QS - Block quote start
.de QS
.ti \\n(.iu
.\"RT
.sp 2u*\\n(PDu
.ne 1.1
.ps -1
.vs -1
.in +\\n(QIu
.ll -\\n(QIu
.ti \\n(.iu
.\"if \\n(Qp .ti +\\n(PIu
.\"nr QP 1
.\"rr Qp
..

.	\" QP - Block quote paragraph
.de QP
.sp \n(PDu
.ne 1.1
.ti +\\n(PIu
..

.	\" QP - Block quote end
.de QE
.sp \\n(PDu
.in -\\n(QIu
.ll +\\n(QIu
.ti \\n(.iu
.ps +1
.vs +1
..

.	\" DS - Code display
.am DS
.ft CW
.ps -1
.ta T 8n
..

.	\" VS - verbatim text start (\\ -> ^G; ' -> disabled; . -> ^B)
.de VS
.br
.ne 3
.sp \n(DDu
.di _V
.nf
.ft CW
.ps -.5
.\" set up verbatim environment
\.blm
\.ec 
\.c2 ""
\.cc 
..

.	\" VE - verbatim text end  (NOTE: Needs to be called as ^BVE !)
.de VE
\" restore the special characters
cc
.c2
.ec
.br
.di
.ne \\n(dnu+1v \" ensure enough space on the page
.in +2u*\\n(PIu
.ta T 8n
\.ec  \" set up verbatim environment, once again
\.c2 ""
\.cc 
_V \" output the verbatim content
\" restore the special characters
cc
.c2
.ec
.blm __
.in -2u*\\n(PIu
.sp \n(DDu
.ps +.5
.ft P
.fi
.TA
..

.	\" VF - verbatim text from file  ($1=filename)
.de VF
.VS
so $1
VE
..

.de Fn  \" file name
.CW "\\$1" "\\$2
..
.de Pn  \" program name
.CW "\\$1" "\\$2
..
.de Fu  \" function
.CW "\\$1" "\\$2
..
.de Ev  \" env variable
.CW "\\$1" "\\$2
..
.de Cl  \" command line
`\c
.CW "\\$1" "'\\$2
..
.de Sw  \" switch
.CW "\\$1" "\\$2
..
.de Ar  \" argument
.CW "\f(CI\\$1" "\\$2
..
.de Mp  \" man page
.I "\\$1" "\\$2
..
.de Pe  \" profile entry
.CW "\\$1" "\\$2
..
.de Hd  \" mail header field
.CW "\\$1:\&" "\\$2
..

.de Ci  \" commit hash ref
.ds _t \\$1
.substring _t 0 6
[\(rh\|\fL\\*(_t\fP]\\$2
..

.	\" Cf - reference within the document ($1=name of ref file)
.de Cf
\.if !\\nZ .so refs/\\$1 \c
\\$2
..

.	\" Id - put a referenceable marker here ($1=identifier)
.de Id
.tm REF____\\$1\t\\*(SN\t\\n(PN
..