home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fresh Fonts 1
/
freshfonts1.bin
/
bbs
/
programs
/
amiga
/
pastex13.lha
/
DVIPS
/
dvips5519.lha
/
dvips
/
finclude.lpro
< prev
next >
Wrap
Text File
|
1993-05-11
|
446b
|
21 lines
%!
% Define tfm-name to be a dictionary of included fonts indexed by size:
% /tfm-name scaled-size1 /font-select1 ... scsize_k /fselect_k k fstore -
/fstore
{
dup dict exch
{dup 4 2 roll put} repeat
def
} bind def
/fshow % (text to show) tfm_name scaled-size fshow -
{
gsave
72 TeXDict /Resolution get div
-72 TeXDict /VResolution get div scale
1 DVImag div dup scale
get cvx exec
show
grestore
}bind def