summaryrefslogtreecommitdiff
path: root/obsolete/macros/latex209/contrib/ml/mlletter.sty
blob: 68463589268e8d99e0b51d4b0a334d21d844e45a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
% This is MLLETTER.STY in text format
% a modification of Victor Eijkhout's  BRIEF.STY,
% a letter style following Dutch NEN-norms 1025, 1026, and 3162.
\def\fileversion{0.1}\def\filedate{16 sept 1994}
% A MultiLingual letterstyle compatible with letter.sty
%
% Author:
%    Hans Stoks
%    u251006@vm.uci.kun.nl
%
% Main changes of BRIEF.STY:
%      do away with \b@language,
%      let translation be done by external files

\typeout{Document Style `Mlletter'. Version <\fileversion>, <\filedate>}

\def\@ptsize{1}
\@namedef{ds@10pt}{\def\@ptsize{0}}
\@namedef{ds@11pt}{\def\@ptsize{1}}
\@namedef{ds@12pt}{\def\@ptsize{2}}
\@twosidefalse
\def\ds@draft{\overfullrule 5pt}

\def\ds@USletter{\@elfinchtrue} \newif\if@elfinch
\@namedef{ds@a4}{\message{You do not need an A4-option:
paper is adjusted automatically.}}
\def\ds@sober{}

\def\ds@typhulp{\@typhulptrue} \newif\if@typhulp
\def\ds@streepjes{\@streepjestrue} \newif\if@streepjes
\def\ds@adresrechts{\@adresrechtstrue} \newif\if@adresrechts

\@options

\lineskip 1pt \normallineskip 1pt
\def\baselinestretch{1}

%%%%%%%%%%%%%%%%%%%%%%% point size %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifcase \@ptsize\relax
\def\@normalsize{\@setsize\normalsize{12pt}\xpt\@xpt
\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
\def\small{\@setsize\small{11pt}\ixpt\@ixpt
\abovedisplayskip 8.5pt plus 3pt minus 4pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus2pt\belowdisplayshortskip 4pt plus2pt minus 2pt}
\def\footnotesize{\@setsize\footnotesize{9.5pt}\viiipt\@viiipt
\abovedisplayskip 6pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 3pt plus 1pt minus
2pt}
\def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
\def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
\or
\def\@normalsize{\@setsize\normalsize{13.6pt}\xipt\@xipt
\abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
minus3pt}
\def\small{\@setsize\small{12pt}\xpt\@xpt
\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
\def\footnotesize{\@setsize\footnotesize{11pt}\ixpt\@ixpt
\abovedisplayskip 8pt plus 2pt minus 4pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus 1pt\belowdisplayshortskip 4pt plus 2pt minus
2pt}
\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
\def\large{\@setsize\large{14pt}\xiipt\@xiipt}
\def\Large{\@setsize\Large{18pt}\xivpt\@xivpt}
\def\LARGE{\@setsize\LARGE{22pt}\xviipt\@xviipt}
\def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
\def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
\or
\def\@normalsize{\@setsize\normalsize{15pt}\xiipt\@xiipt
\abovedisplayskip 12pt plus3pt minus7pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
minus3pt}
\def\small{\@setsize\small{13.6pt}\xipt\@xipt
\abovedisplayskip 11pt plus3pt minus6pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6.5pt plus3.5pt
minus3pt}
\def\footnotesize{\@setsize\footnotesize{12pt}\xpt\@xpt
\abovedisplayskip 10pt plus2pt minus5pt\belowdisplayskip \abovedisplayskip
\abovedisplayshortskip \z@ plus3pt\belowdisplayshortskip 6pt plus3pt minus3pt}
\def\scriptsize{\@setsize\scriptsize{9.5pt}\viiipt\@viiipt}
\def\tiny{\@setsize\tiny{7pt}\vipt\@vipt}
\def\large{\@setsize\large{18pt}\xivpt\@xivpt}
\def\Large{\@setsize\Large{22pt}\xviipt\@xviipt}
\def\LARGE{\@setsize\LARGE{25pt}\xxpt\@xxpt}
\def\huge{\@setsize\huge{30pt}\xxvpt\@xxvpt}
\let\Huge=\huge
\fi
\normalsize

%%%%%%%%%%%%%%%%%%%%%% Paper Size %%%%%%%%%%%%%%%%%%%%%%%%%%
% 33mm leftmargin
\oddsidemargin=7.6mm \evensidemargin=\oddsidemargin

% rightmargin according to NEN 10mm; maybe better 33mm.
\textwidth=144mm \@rightskip=0cm plus 5cm \rightskip=\@rightskip
% no margin notes.
\marginparwidth=0pt \marginparsep=0pt \marginparpush=0pt

% topmargin 13mm
\topmargin-12.4mm
% heading up to 50mm from the top
\headheight=37mm \headsep=0mm
% textheight, the leftover
\textheight=197mm
\if@elfinch \advance\textheight by -17.6mm \fi

% a possibillity to use other windows (vensters)
\newdimen\vensterskip \vensterskip=50mm %% the default
\newdimen\@vensterskip
\newdimen\@firstheadheight \newdimen\@otherheadheight
\newdimen\@othertextheight
\newdimen\@otherheadsep \newdimen\@vervolgsep
\@otherheadsep=2mm
\def\@prepareerhoofden{\@vensterskip=\vensterskip
    \advance\@vensterskip by -50mm
    \@firstheadheight=\headheight
    \@otherheadheight=\headheight % this should not be here
    \@othertextheight=\textheight % idem
    }

% separation between text en foot
\newdimen\footsep \footsep=1.5cm % like headsep

\columnsep 10pt \columnseprule 0pt % if you want columns?!
\raggedbottom %% hm! we seem to need this.

%%%%%%%%%%%%%V we'll get to this later
\footnotesep 12pt \skip\footins 10pt plus 2pt minus 4pt
\floatsep 12pt plus 2pt minus 2pt
\textfloatsep 20pt plus 2pt minus 4pt
\intextsep 12pt plus 2pt minus 2pt
\dblfloatsep 12pt plus 2pt minus 2pt
\dbltextfloatsep 20pt plus 2pt minus 4pt
\@maxsep 20pt
\@dblmaxsep 20pt
\@fptop 0pt plus 1fil
\@fpsep 8pt plus 2fil
\@fpbot 0pt plus 1fil
\@dblfptop 0pt plus 1fil
\@dblfpsep 8pt plus 2fil
\@dblfpbot 0pt plus 1fil

%%%%%%%%%%%%%%%%%%%%%%%%%%% opening / closing %%%%%%%%%%%%%%%%%%%%%
\font\refkopfont=cmssq8
\font\kleinvet=cmbx7

\def\opening#1{\thispagestyle{firstpage}
    \adresveld
    \prevdepth=-1000pt \vskip-2pt %% ????
    \referentieregel
    \@dosubject #1\par\nobreak}
\def\ondertekening#1{\def\fromsig{#1}}\def\fromsig{}
% It is possible now to declare a signature
% (\ondertekening) after the closing (\afsluiting).
\long\def\afsluiting#1{\par\nobreak\vspace{\parskip}
 \stopbreaks \noindent
 \ifx\@empty\fromsig
     \def\ondertekening##1{\def\fromsig{##1}
         \parbox{.5\textwidth}{\raggedright
                 \ignorespaces #1\\[6\medskipamount] \fromsig \strut}}
 \else \parbox{.5\textwidth}{\raggedright
         \ignorespaces #1\\[6\medskipamount]
         \fromsig \strut}
 \fi \par}

\def\betreft#1{\def\@subject{#1}} \def\@subject{}
\def\@dosubject{\ifx\@empty\@subject
    \else \par\noindent
    \parbox[t]{\textwidth}{\@hangfrom{\refkopfont \rename
    \enspace}\rm\ignorespaces \@subject\strut}\par\fi}
\def\ps{\par\startbreaks\psname\ }
\def\cc#1{\par\noindent
    \parbox[t]{\textwidth}{\@hangfrom{\ccname\ }\ignorespaces
    #1\strut}\par}
\def\bijlage#1{\par\noindent
    \parbox[t]{\textwidth}{\@hangfrom{\rm \enclname\ }\ignorespaces
    #1\strut}\par}
\def\bijlagen#1{\par\noindent
    \parbox[t]{\textwidth}{\@hangfrom{\rm \enclnames\ }\ignorespaces
    #1\strut}\par}
\def\stopletter{}

\long\def\brief#1{\newpage
 \c@page\@ne
 \interlinepenalty=200 \@processto{#1}
 \@defrefveld{\@Ad}{\headtoname}{\toname}
%% only without any date the user will get \today.
 \ifdim\wd\@Dt=0cm \@defrefveld{\@Dt}{\datetext}{\today}\fi
%% maybe the user has a different windowsize,
%  which he specified;
%  so it is only now that we can prepare the headings.
 \@prepareerhoofden % (looks like we are cannibals)
%% maybe some more headheight and less textheight
%  for the subsequent pages. Nb: no changes of textheight
%  on the first page.
 {\setbox\@tempboxa=\vervolghoofd
  \@tempdima=\ht\@tempboxa
  \advance\@tempdima by -\@otherheadheight
  \ifdim\@tempdima>0cm
        \global\advance\@otherheadheight by \@tempdima
        \global\advance\@othertextheight by -\@tempdima \fi}
%% idem look at the foot
 {\setbox\@tempboxa=\vbox{\voetregel}
  \global\footskip=\ht\@tempboxa % maybe a little bit less?
  \global\advance\footskip by \footsep}
 } % except if it has been there already!!!

\def\endbrief{\stopletter\@@par\pagebreak\@@par
 \if@filesw \begingroup
     \def\protect{\string} \let\\=\relax
     \def\protect##1{\string##1\space}
     \immediate\write\@auxout{\string\mlabel{\returnaddress}
     {\toname\\ \toaddress}}
 \endgroup \fi
 }

\long\def\@processto#1{\@xproc #1\\@@@\ifx\toaddress\@empty
 \else \@yproc #1@@@\fi}
\long\def\@xproc #1\\#2@@@{\def\toname{#1}\def\toaddress{#2}}
\long\def\@yproc #1\\#2@@@{\def\toaddress{#2}}
\def\stopbreaks{\interlinepenalty \@M
 \def\par{\@@par\nobreak}\let\\=\@nobreakcr
 \let\vspace\@nobreakvspace}
\def\@nobreakvspace{\@ifstar{\@nobreakvspacex}{\@nobreakvspacex}}
\def\@nobreakvspacex#1{\ifvmode\nobreak\vskip #1\relax\else
 \@bsphack\vadjust{\nobreak\vskip #1}\@esphack\fi}
\def\@nobreakcr{\vadjust{\penalty\@M}\@ifstar{\@xnewline}{\@xnewline}}
\def\startbreaks{\let\\=\@normalcr
 \interlinepenalty 200\relax
 \def\par{\@@par\penalty 200\relax}}

% relics of 'letter', not used.
\def\name#1{\def\fromname{#1}}
\long\def\address#1{\def\fromaddress{#1}}\def\fromaddress{}
\def\location#1{\def\fromlocation{#1}}\def\fromlocation{}
\def\telephone#1{\def\telephonenum{#1}}\def\telephonenum{}
\def\returnaddress{}

\def\document{\endgroup
 \@colht\textheight \@colroom\textheight \vsize\textheight
 \columnwidth\textwidth \@clubpenalty\clubpenalty
 \if@twocolumn \advance\columnwidth -\columnsep
 \divide\columnwidth\tw@ \hsize\columnwidth \@firstcolumntrue
 \fi
 \hsize\columnwidth \linewidth\hsize
 \begingroup\@floatplacement\@dblfloatplacement\endgroup
 \if@filesw \immediate\openout\@mainaux=\jobname.aux
 \immediate\write\@mainaux{\string\startlabels\string\@startlabels}\fi
 \csname process@table\endcsname %% new font selection scheme
 \def\do##1{\let ##1\@notprerr}
 \@preamblecmds
 \let\do\noexpand
 \@normalsize\everypar{}}
\def\enddocument{\@checkend{document}\newpage\begingroup
 \if@filesw \immediate\closeout\@mainaux
 \makeatletter\input \jobname.aux\clearpage
 \fi\endgroup\deadcycles\z@\@@end}

\def\makelabels{\@fileswtrue}\let\maaketiketten=\makelabels
\def\@startlabels{}
\newcount\labelcount

%%%%%%%%%%%%%%%%%%%%%%%% address %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newdimen\adresveldbreedte
\newif\if@antwoordadres
\def\backaddress#1{\@antwoordadrestrue\def\@antwoordadres{#1}}
\def\@antwoordadres{}
\def\adresveld{\hbox{}\kern-\topskip
    \kern\@vensterskip
    \begingroup
     \if@adresrechts \adresveldbreedte=4\refveldbreedte
         \advance\adresveldbreedte by -76mm
         \def\@tempa{\moveright 76mm}
         \else \let\@tempa\relax \adresveldbreedte=83mm\fi
     \setbox\@tempboxa= % addressee plus address
            \vtop{\hsize=\adresveldbreedte \@normalsize
                  \rightskip=0cm plus \adresveldbreedte
                  \let\\=\@nobreakcr\toname\\ \toaddress}
     \bgroup\baselineskip=0pt %% this avoids a lot of problems.
            \lineskip=0pt     %% this also
      \if@antwoordadres\@tempa\vbox to 0cm{
             \hbox to \adresveldbreedte{\kleinvet
             \def\\{\unskip\enspace$\bullet$\enspace\ignorespaces}%
             \@antwoordadres\hfil}\kern2pt
             \hrule \vss}\fi
      \if@typhulp \@tempa\llap{\vbox to 0cm
                     {\vskip9mm\streepje\vss}} \fi
      \kern9mm \kern-\ht\@tempboxa \@tempdima=\dp\@tempboxa
      \@tempa\box\@tempboxa \kern-\@tempdima
      \vskip31mm
     \egroup\endgroup}


%%%%%%%%%%%%%%%%%%%%%% reference %%%%%%%%%%%%%%%%%%%%%%%%%%
\newdimen\refveldbreedte
\refveldbreedte=38mm %% 3/2 inch. see NEN 3516

\def\@defrefveld#1#2#3{\setbox#1=\@refveld{#2}{#3}}
\def\@refveld#1#2{\vtop{\hsize=\refveldbreedte \parskip=0cm
                        \everypar{}% this might be in the preamble!!
                        \lineskiplimit=\z@ \baselineskip=12pt
                        \lineskip=\z@
                        \rightskip=0cm plus \refveldbreedte
                                       minus .5\refveldbreedte
                        \vbox{\refkopfont\baselineskip=10pt
                              #1\@@par}\kern2pt\strut\ignorespaces#2}}

% references will stay if there are more than one letter to be processed
\newbox\@UB \newbox\@UK \newbox\@OK \newbox\@Dt
\def\yourletter#1{\@defrefveld{\@UB}{\yourlettername}{#1}}
\def\yourref#1{\@defrefveld{\@UK}{\yourrefname}{#1}}
\def\ourref#1{\@defrefveld{\@OK}{\ourrefname}{#1}}
\def\date#1{\def\@tempa{}\def\@tempb{#1}\ifx\@tempa\@tempb
    \setbox\@Dt\hbox{ }\else\@defrefveld{\@Dt}{\datetext}{#1}\fi}
% Date is initialized to \today in \brief,
% without any statement concerning date there will not be any.

\def\referentieregel{\hbox
             {\hbox to \refveldbreedte{\copy\@UB\hfil}%
              \hbox to \refveldbreedte{\copy\@UK\hfil}%
              \hbox to \refveldbreedte{\copy\@OK\hfil}%
              \hbox to \refveldbreedte{\copy\@Dt\hfil}\hss}}

\newbox\@Ad % To: initialized in \brief
\def\vervolgreferentieregel{\hbox
             {\hbox to \refveldbreedte{\copy\@Ad\hfil}%
              \hskip\refveldbreedte
              \hbox to \refveldbreedte{\copy\@Dt\hfil}%
              \@refveld{\headpagename}{\thepage}\hss}}

%%%%%%%%%%%%%%%%%%%%%%%%% headers / footers %%%%%%%%%%%%%%%%%%%%%%%
\def\briefhoofd{}\def\vervolghoofd{\vbox{}}
\def\maakbriefhoofd
   {\@ifstar {\@kortvervolgbriefhoofd}{\@langvervolgbriefhoofd}}
\def\@kortvervolgbriefhoofd
   #1#2{
    \@maakbriefhoofd{#1}{#2}
    \def\vervolghoofd{\vbox{\hsize=4\refveldbreedte
                         \hbox to \hsize{\Large \sf #1\strut\hfil}
                         \hrule \kern2mm \vervolgreferentieregel}}}
\def\@langvervolgbriefhoofd
   #1#2{
    \@maakbriefhoofd{#1}{#2}
    \def\vervolghoofd{\vbox{\briefhoofd\vskip2mm
                        \vervolgreferentieregel
                        \vbox{}}}}
\def\@maakbriefhoofd#1#2{\def\briefhoofd{%
       \vbox{\hsize=4\refveldbreedte
             \hbox to \hsize{\Large \sf #1\strut\hfil}
             \hrule
             \moveright 3\refveldbreedte\@refveld{\strut #2}{}
             \vbox{}}}}
\newbox\@voetruimte \setbox\@voetruimte=\hbox{}
\newcount\@voetteller
\def\voetregel{\copy\@voetruimte}
\def\voetitem#1#2{\advance\@voetteller by 1
    \setbox\@voetruimte=\hbox to 4\refveldbreedte
           {\unhbox\@voetruimte
            \ifcase\@voetteller \relax \or \relax \or
                                \hfil \else \hfill \fi
            \@refveld{#1}{#2}\hskip0cm plus 3\refveldbreedte}}
\def\ps@empty{
    \def\@oddhead{}\def\@oddfoot{}
    \def\@evenhead{}\def\@evenfoot{}}
\def\ps@plain{
    \def\@oddhead{}\def\@evenhead{}
    \def\@oddfoot{\rm\hfil\thepage}
    \let\@evenfoot=\@oddfoot}
%% hss because head and foot are to wide.
\def\@hss{\hskip 0cm plus 1filll minus 1filll\relax}
\def\ps@headings{
    \def\@oddhead{\vbox to \@otherheadheight
                      {\vervolghoofd\vfil
                       \if@streepjes\streepjes{\@otherheadheight}\fi}%
                  \hss}
    \let\@evenhead=\@oddhead
    \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}
\def\ps@firstpage{\global\headheight=\@otherheadheight
    \global\textheight=\@othertextheight %?? werkt dit ??
    \global\headsep=\@otherheadsep
    \def\@oddhead{\vbox to \@firstheadheight
                      {\briefhoofd\vfil
                       \if@streepjes\streepjes{\@firstheadheight}\fi}%
                  \hss}
    \def\@evenhead{}
    \def\@oddfoot{\voetregel\hss} \let\@evenfoot=\@oddfoot}

\ps@headings

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% strips %%%%%%%%%%%%%%%%%%%%%%%%%%
%% only for envelopes EN-DL-V implemented
\def\streepje{\hbox to 2mm{\hrulefill}}
\def\streepjes#1{\vbox to 0cm
         {\kern-#1 %% to the top of the heading, 13mm below
          \hbox to \textwidth %% the top of the paper
             {\llap{\perfstreepje\kern24mm}\hfill %% 7mm from the top at 33mm
              \rlap{\kern24mm\vouwstreepjes}}     %% 7mm from the top at 33mm
          \vss}}                                  %% see textwidth above.
\def\perfstreepje {\vtop{\kern\z@
                         \kern 135mm %% 297/2 - 13
                         \streepje}}
\def\vouwstreepjes{\vtop{\kern\z@
                         \kern 92mm %% 105-13
                         \streepje  %% supposed to be without any width
                         \kern 50mm %% 155-150
                         \streepje}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%% lists %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% from `artikel3'
\def\@listi{\leftmargin\leftmargini
            \labelsep=.5em
            \labelwidth=\leftmargin \advance\labelwidth by -\labelsep
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \parsep \z@ %V defaults added
 \itemsep \parsep}    %V defaults added
\def\@listii{\leftmargin\leftmarginii \labelsep=.5em
 \labelwidth\leftmarginii\advance\labelwidth-\labelsep
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \parsep \z@ %V zeroed
 \itemsep \parsep}
\def\@listiii{\leftmargin\leftmarginiii \labelsep=.5em
 \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \parsep \z@
 \partopsep \z@ %V zeroed
 \itemsep \topsep}
\def\@listiv{\leftmargin\leftmarginiv \labelsep=.5em
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \labelwidth\leftmarginiv\advance\labelwidth-\labelsep}
\def\@listv{\leftmargin\leftmarginv \labelsep=.5em
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \labelwidth\leftmarginv\advance\labelwidth-\labelsep}
\def\@listvi{\leftmargin\leftmarginvi \labelsep=.5em
 \topsep=-.5\parskip plus 1pt %V half the amount of white around lists
 \labelwidth\leftmarginvi\advance\labelwidth-\labelsep}

\leftmargini 2.5em
\leftmarginii 2.2em \leftmarginiii 1.87em
\leftmarginiv 1.7em \leftmarginv 1em
\leftmarginvi 1em
\leftmargin\leftmargini
\labelwidth\leftmargini\advance\labelwidth-\labelsep
\labelsep 5pt
\parsep 0pt

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% varia %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\parskip .7em plus .3em minus .2em
\parindent 0pt \topsep .4em \partopsep 0pt \itemsep .4em
\@lowpenalty 51 \@medpenalty 151 \@highpenalty 301
\@beginparpenalty -\@lowpenalty \@endparpenalty -\@lowpenalty \@itempenalty
-\@lowpenalty


\def\labelenumi{\arabic{enumi}.}
\def\theenumi{\arabic{enumi}}
\def\labelenumii{(\alph{enumii})}
\def\theenumii{\alph{enumii}}
\def\p@enumii{\theenumi}
\def\labelenumiii{\roman{enumiii}.}
\def\theenumiii{\roman{enumiii}}
\def\p@enumiii{\theenumi(\theenumii)}
\def\labelenumiv{\Alph{enumiv}.}
\def\theenumiv{\Alph{enumiv}}
\def\p@enumiv{\p@enumiii\theenumiii}

\def\labelitemi{$\bullet$}
\def\labelitemii{\bf --}
\def\labelitemiii{$\ast$}
\def\labelitemiv{$\cdot$}
\def\verse{\let\\=\@centercr
 \list{}{\itemsep\z@ \itemindent -15pt\listparindent \itemindent
 \rightmargin\leftmargin\advance\leftmargin 15pt}\item[]}
\let\endverse\endlist
\def\quotation{\list{}{\listparindent 1.5em
 \itemindent\listparindent
 \rightmargin\leftmargin}\item[]}
\let\endquotation=\endlist
\def\quote{\list{}{\rightmargin\leftmargin}\item[]}
\let\endquote=\endlist

\def\descriptionlabel#1{\hspace\labelsep \bf #1}
\def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
 \let\makelabel\descriptionlabel}}
\let\enddescription\endlist


\def\theequation{\arabic{equation}}

\arraycolsep 5pt \tabcolsep 6pt \arrayrulewidth .4pt \doublerulesep 2pt
\tabbingsep \labelsep
\skip\@mpfootins = \skip\footins
\fboxsep = 3pt \fboxrule = .4pt

\def\footnoterule{\kern-1\p@
 \hrule width .4\columnwidth
 \kern .6\p@}

\long\def\@makefntext#1{\noindent
    \hbox to \leftmargini{${\@thefnmark}$.\hfil}#1}


\c@topnumber=2
\def\topfraction{.7}
\c@bottomnumber=1
\def\bottomfraction{.3}
\c@totalnumber=3
\def\textfraction{.2}
\def\floatpagefraction{.5}
\c@dbltopnumber= 2
\def\dbltopfraction{.7}
\def\dblfloatpagefraction{.5}


\smallskipamount=.5\parskip \medskipamount=\parskip
\bigskipamount=2\parskip
\pagenumbering{arabic} \onecolumn \@fileswfalse

%%%%%%%%%%%%%%%%%%%%%%%%%% labels %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\startlabels{\labelcount=0 \baselineskip=0pt \lineskip=0pt
\pagestyle{empty}
\let\@texttop=\relax
\topmargin -50pt
\headsep 0pt
\oddsidemargin -35pt
\evensidemargin -35pt
\textheight 10in
\@colht\textheight \@colroom\textheight \vsize\textheight
\textwidth 550pt
\columnsep 25pt
\xpt
\baselineskip=0pt
\lineskip=0pt
\boxmaxdepth=0pt
\twocolumn\relax}
\def\mlabel#1#2{\setbox0\vbox{\parbox[b]{3.6in}{\strut\ignorespaces #2}}
 \vbox to 2in{\vss \box0 \vss}}

%% and finally, muchos against my will, emulation of original
%% LaTeX letter style.
\let\letter=\brief \let\endletter=\endbrief
\let\closing=\afsluiting
\def\signature{\ondertekening}
\def\encl{\@ifstar{\bijlage}{\bijlagen}}
\def\address#1{\maakbriefhoofd*{}{#1}}
\let\re=\betreft

%% with english translations of extra commands
\let\footitem=\voetitem
\def\windowright{\@adresrechtstrue}
\gdef\b@ckaddress#1{\def\backaddressname{#1}}
\gdef\makehead{\let\backaddress\b@ckaddress\maakbriefhoofd}
\ifx\undefined\rename\def\rename{Re}\fi
\ifx\undefined\psname\def\psname{P.S.:}\fi
\ifx\undefined\ccname\def\psname{cc.:}\fi
\ifx\undefined\enclname\def\enclname{Enclosure:}\fi
\ifx\undefined\enclnames\def\enclnames{Enclosures:}\fi
\ifx\undefined\headtoname\def\headtoname{To}\fi
\ifx\undefined\yourlettername\def\yourlettername{Your letter of}\fi
\ifx\undefined\yourrefname\def\yourrefname{Your reference}\fi
\ifx\undefined\ourrefname\def\ourrefname{Our reference}\fi
\ifx\undefined\datetext\def\datetext{Date}\fi
\ifx\undefined\headpagename\def\headpagename{Page}\fi
\endinput