blob: 9f116e3798d72b2ba6174fb1b815281b6875b134 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
% Computer Modern Bold Roman
% Changes[Sauter-2.2] formula for u# matches cmr value;
if unknown cmbase: input cmbase fi
font_identifier:="CMB"; font_size design_size * pt#;
% This font is a modification of Computer Modern Bold Extended.
input c-cmbx;
%u#:=(20*(design_size/10))/36pt#; % unit width
u#:= % unit width, the same as for cmr fonts.
(if design_size < 10: ((design_size*15)+50)
%elseif design_size < 12: ((design_size*17.5)+25)
else: (-(0.062437562437*design_size*design_size) +
(18.8736263736*design_size) +
(17.5074925074))fi)/360pt#;
width_adj#:=(10*(design_size/10))/36pt#;
% width adjustment for certain characters
cap_serif_fit#:=(6*(design_size/10))/36pt#;
% extra sidebar near uppercase serifs
cap_jut#:=(34*(design_size/10))/36pt#; % protrusion of uppercase serifs
generate roman % switch to the driver file
|