%!
%3:

% 21 "bigtest.web"

%%BoundingBox: 18 18 577 824

%:3
%4:

% 25 "bigtest.web"

% 26 "bigtest.web"
 /makeoutlinedict 7 dict def

%:4
%5:

% 34 "bigtest.web"

% 35 "bigtest.web"
 /MakeOutlineFont
{makeoutlinedict begin
%6:

% 50 "bigtest.web"

% 51 "bigtest.web"
 /uniqueid exch def
 /strokewidth exch def
 /newfontname exch def
 /basefontname exch def

%:6

% 37 "bigtest.web"

%7:

% 56 "bigtest.web"

% 57 "bigtest.web"
 /basefontdict basefontname findfont def

%:7

% 38 "bigtest.web"

%8:

% 59 "bigtest.web"

% 60 "bigtest.web"
 /numentries basefontdict maxlength 1 add def

%:8

% 39 "bigtest.web"

%9:

% 65 "bigtest.web"

% 66 "bigtest.web"
basefontdict /UniqueID known not
{ /numentries numentries 1 add def}if

%:9

% 40 "bigtest.web"

%10:

% 69 "bigtest.web"

% 70 "bigtest.web"
 /outfontdict numentries dict def

%:10

% 41 "bigtest.web"

%11:

% 72 "bigtest.web"

% 73 "bigtest.web"
basefontdict
{exch dup /FID ne
{exch outfontdict 3 1 roll put}
{pop pop}
ifelse
}forall

%:11

% 43 "bigtest.web"

%12:

% 85 "bigtest.web"

% 86 "bigtest.web"
outfontdict /FontName newfontname put
outfontdict /PaintType 2 put
outfontdict /StrokeWidth strokewidth put
outfontdict /UniqueID uniqueid put

%:12

% 44 "bigtest.web"

%13:

% 93 "bigtest.web"

% 94 "bigtest.web"
newfontname outfontdict definefont pop

%:13

% 45 "bigtest.web"

end
}def

%:5
%14:

% 100 "bigtest.web"

% 101 "bigtest.web"
 /Helvetica-Bold /Helvetica-Outline1%15:

% 110 "bigtest.web"

% 111 "bigtest.web"
 1000 54 div

%:15

% 101 "bigtest.web"

%16:

% 116 "bigtest.web"

% 117 "bigtest.web"
 /Helvetica-Bold findfont dup /UniqueID known
{ /UniqueID get 1 add}
{pop 1}
ifelse
%:16

% 102 "bigtest.web"

MakeOutlineFont

%:14
%17:

% 122 "bigtest.web"

% 123 "bigtest.web"
 /Helvetica-Outline1 findfont 36 scalefont setfont
72 504 moveto(outline)show
 /Helvetica-Outline1 findfont 54 scalefont setfont
(outline)show

%:17
%18:

% 133 "bigtest.web"

% 134 "bigtest.web"
 /Helvetica-Bold /Helvetica-Outline2 1000 36 div
%16:

% 116 "bigtest.web"

% 117 "bigtest.web"
 /Helvetica-Bold findfont dup /UniqueID known
{ /UniqueID get 1 add}
{pop 1}
ifelse
%:16

% 135 "bigtest.web"

MakeOutlineFont

%:18
%19:

% 139 "bigtest.web"

% 140 "bigtest.web"
 /Helvetica-Outline2 findfont 36 scalefont setfont
72 444 moveto(outline)show
 /Helvetica-Outline2 findfont 54 scalefont setfont
(outline)show

%:19
%20:

% 146 "bigtest.web"

% 147 "bigtest.web"
showpage

%:20