% First extra symbol font in AMSFonts 2.2.
%
% font v 2.2 04-JAN-1995, sauterised v 1.0 23/11/1995
%
% Author : American Mathematical Society
% sauterisation : Hubert HOLIN
if unknown cmbase: input cmbase fi
font_identifier:="MSAM V2.2"; font_size design_size * pt#;
input c-cmmi;
crisp#:=0;
slant:=0;
subs:= % subscript point size
(if design_size < 7.5: (5/design_size)
elseif design_size < 9.5: (6/design_size)
elseif design_size < 10.5: (7/design_size)
elseif design_size < 12.5: (8/design_size)
elseif design_size < 12.96: (1/1.44)
else: (1/1.2)fi);
input c-sigma;
% The following parameters seem to be used only for the R and S in circles.
% Despite the following attempts, it might prove better to use another font
% (or another method) if you really want to use these symbols at sizes other
% than 5, 6, 7, 8, 9 and 10 points.
lower.u#:= % unit width
(if design_size < 10: ((design_size*15)+10)
else: (-(0.062437562437*design_size*design_size) +
(18.8736263736*design_size) -
(22.492507493))fi)/360pt#;
lower.width_adj#:= % width adjustment for certain characters
0pt#;
lower.letter_fit#:= % extra space added to all sidebars
(if design_size < 8: (40)
elseif design_size < 9: (-(design_size*5)+80)
elseif design_size < 10: (-(design_size*11)+134)
else: (24)fi)/360pt#;
lower.cap_serif_fit#:= % extra sidebar near uppercase serifs
(if design_size < 6: (15)
elseif design_size < 7: ((design_size*5)-15)
elseif design_size < 9: ((design_size*7)-29)
elseif design_size < 10: ((design_size*6)-20)
else: (((0.022893772893*design_size*design_size) +
(3.4963369963*design_size) +
(2.7472527472))+0.002)fi)/360pt#;
lower.body_height#:= % height of tallest characters
(if design_size < 6: ((design_size*70)+630)
elseif design_size < 7: ((design_size*150)+150)
elseif design_size < 8: ((design_size*180)-60)
elseif design_size < 10: ((design_size*270)-700)
else: (-(0.14568764568*design_size*design_size) +
(273.205128205*design_size) -
(17.482517482)-700)fi)/360pt#;
lower.cap_height#:= % height of caps
(if design_size < 6: ((design_size*70)+630)
elseif design_size < 7: ((design_size*140)+210)
elseif design_size < 8: ((design_size*268)-686)
elseif design_size < 9: ((design_size*246)+510)
elseif design_size < 10: ((design_size*146)+390)
else: (-(0.0228937728937*design_size*design_size) +
(246.503663003*design_size) -
(2.74725274725)-610)fi)/360pt#;
lower.x_height#:= % height of lowercase without ascenders
(if design_size < 7: ((design_size*130)-200)
elseif design_size < 8: ((design_size*140)-270)
elseif design_size < 10: ((design_size*155)-390)
else: (-(0.010406260406*design_size*design_size) +
(155.22893772*design_size) -
(1.2487512487)-390)fi)/360pt#;
lower.bar_height#:= % height of crossbar in lowercase e
(if design_size < 7: ((design_size*80)-170)
elseif design_size < 8: ((design_size*86)-212)
elseif design_size < 10: ((design_size*87)-220)
else: ((-(0.087412587412*design_size*design_size) +
(88.923076923*design_size) -
(10.4895104895))+0.0008-220)fi)/360pt#;
lower.comma_depth#:= % depth of comma below baseline
(if design_size < 10: ((design_size*70)-180)
else: ((0.010406260406*design_size*design_size) +
(69.771062271*design_size) +
(1.2487512487)-180)fi)/360pt#;
lower.flare#:= % diameter of bulbs or breadth of terminals
(if design_size < 8: ((design_size*10)+120)
elseif design_size < 9: ((design_size*20)+40)
elseif design_size < 10: ((design_size*30)-50)
else: ((0.280969030969*design_size*design_size) +
(8.8186813186*design_size) +
(143.71628317))fi)/360pt#;
lower.cap_hair#:= % uppercase hairline breadth
(if design_size < 10: ((design_size*5)+41)
else: ((0.046828171828*design_size*design_size) +
(1.4697802197*design_size) +
(71.6193806193))fi)/360pt#;
lower.stem#:= % lowercase stem breadth
(if design_size < 10: ((design_size*20)+10)
else: ((design_size*9.4696969696)+115.30303030)fi)/360pt#;
lower.cap_stem#:= % uppercase stem breadth
(if design_size < 10: ((design_size*25)+10)
else: ((-0.4995004995*design_size*design_size) +
(25.989010989*design_size) +
(50.059940059))fi)/360pt#;
lower.cap_curve#:= % uppercase curve breadth
(if design_size < 10: ((design_size*30)+10)
else: ((-0.23934398934*design_size*design_size) +
(10.2131202132*design_size) +
(231.803196802))fi)/360pt#;
lower.cap_ess#:= % breadth in middle of uppercase s
(if design_size < 6: (120)
elseif design_size < 10: ((design_size*40)-120)
else: ((design_size*9.46969696)+185.3030303030)fi)/360pt#;
lower.cap_jut#:= % protrusion of uppercase serifs
(if design_size < 6: (140)
elseif design_size < 10: ((design_size*30)-40)
else: ((design_size*17.0454545454)+89.54545454)fi)/360pt#;
lower.beak_jut#:= % horizontal protrusion of beak serifs
(if design_size < 10: ((design_size*8)-10)
else: (-(0.024975024975*design_size*design_size) +
(7.5494505494*design_size) -
(2.9965029971))fi)/360pt#;
lower.beak#:= % vertical protrusion of beak serifs
(if design_size < 10: ((design_size*70)-180)
else: ((0.010406260406*design_size*design_size) +
(69.771062271*design_size) -
(178.751487513))fi)/360pt#;
lower.slab#:= % serif and arm thickness
(if design_size < 10: ((design_size*5)+41)
else: ((design_size*6.6287878787)+24.71212121212)fi)/360pt#;
lower.cap_bar#:= % uppercase bar thickness
lower.slab#;
lower.cap_band#:= % uppercase thickness above/below lobes
lower.slab#;
lower.cap_notch_cut#:= % max breadth above/below uppercase notches
(if design_size < 10: (design_size*100)
else: (-(0.72843822843*design_size*design_size) +
(116.025641025*design_size) -
(87.412587412))fi)/100pt#;
lower.o#:= % amount of overshoot for curves
(if design_size < 12: ((design_size*5))
else: ((design_size*1.8939393939)+50.5303030303)fi)/360pt#;
lower.apex_o#:= % amount of overshoot for diagonal junctions
(if design_size < 7: (20)
elseif design_size < 8: ((design_size*10)-50)
elseif design_size < 9: (30)
elseif design_size < 10: ((design_size*10)-60)
else: ((design_size*1.8939393939)+40.5303030303)fi)/360pt#;
lower.fudge:= % factor applied to weights of heavy characters
1;
generate amsya % switch to the driver file
|
