You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
14 lines
855 B
14 lines
855 B
%!
|
|
TeXDict begin/rf{findfont dup length 1 add dict begin{1 index/FID ne 2
|
|
index/UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll
|
|
exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]FontType 0
|
|
ne{/Metrics exch def dict begin Encoding{exch dup type/integertype ne{
|
|
pop pop 1 sub dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get
|
|
div def}ifelse}forall Metrics/Metrics currentdict end def}{{1 index type
|
|
/nametype eq{exit}if exch pop}loop}ifelse[2 index currentdict end
|
|
definefont 3 -1 roll makefont/setfont cvx]cvx def}def/ObliqueSlant{dup
|
|
sin S cos div neg}B/SlantFont{4 index mul add}def/ExtendFont{3 -1 roll
|
|
mul exch}def/ReEncodeFont{CharStrings rcheck{/Encoding false def dup[
|
|
exch{dup CharStrings exch known not{pop/.notdef/Encoding true def}if}
|
|
forall Encoding{]exch pop}{cleartomark}ifelse}if/Encoding exch def}def
|
|
end
|
|
|