summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metafont/misc/mode2dpixy.mf
blob: 6a5a94abd7504c04e115afb62b644c5e2cd5919a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
% Usage: mf '\mode=what_ever_mode; \input mode2dpi'

let myexit = primitive_end_;
mode_setup;
string xdpi;
xdpi := decimal round pixels_per_inch;
message "XDPI = " & xdpi;
string ydpi;
ydpi := decimal round (pixels_per_inch * aspect_ratio);
message "YDPI = " & ydpi;
fontmaking := 0;
myexit;