system/std.zusatz/1.7.3/src/minimal fonts routines


1
2
3
4
5
6
7
8
9

PACKET minimal fonts routines DEFINES lf height of current font, 
                                      x factor per inch, 
                                      y factor per inch: 
 
REAL CONST lf height of current font :: 2.54 / 6.0;
INT CONST x factor per inch         :: 10,
          y factor per inch         ::  6;
 
END PACKET minimal fonts routines;