Plan 9 from Bell Labs’s /usr/web/sources/contrib/steve/root/sys/lib/texmf/fonts/source/ams/euler/eusbch.mf

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


%% @metafontfile{
%%     filename="eusbch.mf",
%%     version="2.2",
%%     date="04-JAN-1995",
%%     filetype="Metafont: driver",
%%     copyright="Copyright (C) American Mathematical Society,
%%            all rights reserved.  Copying of this file is
%%            authorized only if either:
%%            (1) you make absolutely no changes to your copy
%%                including name; OR
%%            (2) if you do make changes, you first rename it to some
%%                other name.",
%%     author="American Mathematical Society",
%%     address="American Mathematical Society,
%%            Technical Support, Electronic Products and Services,
%%            P. O. Box 6248,
%%            Providence, RI 02940,
%%            USA",
%%     telephone="401-455-4080 or (in the USA) 800-321-4AMS",
%%     email="Internet: Tech-Support@Math.AMS.org",
%%     codetable="ISO/ASCII",
%%     checksum = "17832 3499 10533 114147"
%%     keywords="amsfonts, tex, metafont , euler ",
%%     abstract="This is the driver file for use with 
%%            the Euler script bold fonts in AMSFonts 2.2."
%%     docstring       = "The checksum field above contains a CRC-16
%%                        checksum as the first value, followed by the
%%                        equivalent of the standard UNIX wc (word
%%                        count) utility output of lines, words, and
%%                        characters.  This is produced by Robert
%%                        Solovay's checksum utility.",
%%     }
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Euler Symbol Bold

% ----- This font is set up as Math Symbol Font, \textfont2, page 427 of TeXbook
% however, there are some alternate characters in nonstandard positions

mode_setup;
font_coding_scheme "TeX math symbols subset";

%     EULER MATH SYMBOLS BOLD PARAMETERS

%     These all in bitpad numbers (.001"):

     programem =      3700;     
     baseline  =     0;
     ascender  =     capheight;
     descender =     700;
     depthy    =     700;     % depthy   =     500;
     capheight =     2600;
      lcbody    =     1800;     %1700 for medium, 1800 for bold.
     dotheight =     2600;
     theight       =     2330;
     lfigheight =     capheight;
     nfigbody  =     lcbody;
     nfigascender =     ascender;
     nfigdescender =     descender;

input eubase;

more_side(100h#); % DEK

% information for positioning of math accents --- DEK
skewchar=oct"060"; skew#=1/36programem*h#;
ligtable "A": skewchar kern 5skew#;
ligtable "I": "J": skewchar kern 2skew#;
charcode:=skewchar; shipout nullpicture;


"aleph";

charbegin( 64, 2668h#, capheight*v#, baseline );

n := 10;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 4;
t5 := 5;
t6 := 6;
t7 := 7;
t8 := 8;
t9 := 10;
t10 := 11;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ((2,1), (3,2), (7,3), (8,4))          % tied points
     ((4,5), (9,10))                    % verticals
     ((5,6), (1,10))                    % horizontals
     ((2449,529){-321,229}...{-1,1}          % 0
      (1915,952){-314,259}...          % 1
      (1601,1211){-1.551,1.262}...          % 2
      (669,1959){-932,748}...{-63,638}     % 3
      (302,2549){-112,0}...{-112,0}          % 4
      (190,2549)--                    % 5
      (190,1820){1,-1}...{257,-205}          % 6
      (699,1347){105,-87}...{105,-87}     % 7
      (804,1260){555,-387}...          % 8
      (1525,704){998,-815}...{1,-1}          % 9
      (2294,2){79,0}...{79,0}          % 10
      (2373,2)--cycle);               % 11

n := 7;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 4;
t5 := 7;
t6 := 10;
t7 := 11;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((3,3), (4,4))                    % tied points
     ((2,5), (1,7))                    % verticals
     ((6,7))                         % horizontals
     ((250,5){111,384}...{111,384}          % 0
      (361,389){0,1}...               % 1
      (426,986){337,550}...{1,1}          % 2
      (699,1347)--                    % 3
      (804,1260){-31,-7}...               % 4
      (773,1253){-580,-590}...          % 5
      (614,1051){-215,-375}...          % *6
      (558,878){0,-1}...               % 7
      (668,550){1,-1}...               % 8
      (842,462){448,-119}...{1,0}          % *9
      (1116,431){-65,-426}...{-65,-426}     % 10
      (1051,5)--cycle);               % 11

n := 7;
t1 := 0;
t2 := 3;
t3 := 4;
t4 := 7;
t5 := 8;
t6 := 10;
t7 := 12;

adj_fill.C(1, 7)                    % fixed x points
     ()                         % fixed y points
     ((2,6), (3,5))                    % tied points
     ((4,5))                         % verticals
     ((2,6))                         % horizontals
     ((2450,1894){-58,-19}...{-58,-19}     % 0
      (2392,1875){-10,14}...               % 1
      (2230,1977){-1,0}...{-1,0}          % 2
      (2003,1977){-156,-16}...{-156,-16}     % 3
      (1847,1961){-1,0}...               % 4
      (1593,2001){-1,1}...               % 5
      (1536,2157){0,1}...{0,392}          % 6
      (1536,2549)--                    % 7
      (1625,2549){126,-501}...          % 8
      (1684,2439){1,-1}...               % 9
      (1843,2406){1,0}...               % 10
      (2288,2406){1,0}...{0,-1}          % 11
      (2450,2259)--cycle);               % 12

n := 6;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;
t5 := 4;
t6 := 7;

adj_fill.D()                         % fixed x points
     ()                         % fixed y points
     ((1,5), (3,2), (4,1), (6,6))          % tied points
     ((2,5))                         % verticals
     ()                         % horizontals
     ((1847,1961){-1,-1}...               % 0
      (1601,1300){0,-1}...{0,-1}          % 1
      (1601,1211)--                    % 2
      (1915,952){-1,1}...               % 3
      (1800,1228){0,1}...               % 4
      (1855,1732){203,749}...          % *5
      (1920,1894){147.8,245.5}...{413,187}     % *6
      (2003,1977)--cycle);               % 7

endchar(0);

% UPPER CASE
set_stem_round(375,380,395,395,400,420);

"sbua";

%charbegin( "A", 2653h#, capheight*v#, baseline );
charbegin( "A", (2653+50)*h#, capheight*v#, baseline ); % DEK

n := 11;
t1 := 0;
t2 := 1;
t3 := 8;
t4 := 10;
t5 := 11;
t6 := 13;
t7 := 15;
t8 := 18;
t9 := 19;
t10 := 22;
t11 := 23;

adj_fill.A(1)                         % fixed x points
     ()                         % fixed y points
     ((4,1), (5,1), (8,2), (9,3), (10,4), (11,5))% tied points
     ((3,6))                         % verticals
     ((4,7), (2,11))                    % horizontals
     ((2281,2552){-445,111}...          % 0
      (2047,2594){-1,0}...               % 1
      (1333,2313){-1,-1}...               % 2
      (1049,1852){-535,-1227}...          % *3
      (798,1086){-498,-1977}...          % 4
      (486,215){-1,-1}...               % 5
      (384,165){-1,0}...               % 6
      (306,193){-1,1}...               % 7
      (262,311){-111,503}...               % 8
      (213,437){-1,1}...{-1,0}          % 9
      (97,488)--                    % 10
      (97,488){-1,0}...               % 11
      (-49,437){-1,-1}...               % 12
      (-116,276){0,-1}...               % 13
      (-42,59){1,-1}...               % 14
      (231,-39){1,0}...               % 15
      (604,143){1,1}...               % 16
      (812,418){424,689}...{184,406}          % *17
      (1028,832){58,188}...               % 18
      (1086,1020){140,590}...          % 19
      (1322,1920){425,1266}...          % *20
      (1511,2286){1,1}...{801,184}          % 21
      (1738,2391){413,24}...{413,24}          % 22
      (2151,2415)--cycle);               % 23

n := 9;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 6;
t5 := 7;
t6 := 8;
t7 := 9;
t8 := 11;
t9 := 13;

adj_fill.B(1)                         % fixed x points
     (9)                         % fixed y points
     ((3,6), (4,7), (5,4), (6,5))          % tied points
     ((4,7))                         % verticals
     ((2,8))                         % horizontals
     ((2666,323){-240,-505}...          % 0
      (2500,105){-1,-1}...               % 1
      (2143,-63){-1,0}...               % 2
      (1902,36){-1,1}...               % 3
      (1781,322){-164,796}...{0,1}          % *4
      (1738,832){0,188}...{0,188}          % 5
      (1738,1020){0,1371}...{0,1371}          % 6
      (1738,2391)--                    % 7
      (2151,2415){0,-1649}...          % 8
      (2151,766){0,-1}...               % 9
      (2225,212){1,-1}...               % 10
      (2345,168){1,0}...               % 11
      (2502,245){1,1}...{190,359}          % 12
      (2615,391)--cycle);               % 13

n := 4;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,7), (2,3), (3,2), (4,6))          % tied points
     ((1,2))                         % verticals
     ((2,3))                         % horizontals
     ((1738,1020){-652,0}...{-652,0}          % 0
      (1086,1020)--                    % 1
      (1028,832){710,0}...{710,0}          % 2
      (1738,832)--cycle);               % 3

%endchar(0);
endchar(50h#); % DEK

"sbub";

charbegin( "B", 2632h#, capheight*v#, baseline );

n := 7;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 6;
t5 := 7;
t6 := 8;
t7 := 11;

adj_fill.A(1)                         % fixed x points
     ()                         % fixed y points
     ((1,6), (3,1), (4,2), (5,3), (6,4), (7,5))% tied points
     ((2,5))                         % verticals
     ()                         % horizontals
     ((286,322){1,0}...               % 0
      (584,370){483,182}...               % *1
      (769,504){235,352}...               % 2
      (878,844){147,908}...{0,1}          % *3
      (916,1412){0,998}...{0,998}          % 4
      (916,2410)--                    % 5
      (1297,2445){0,-985}...{0,-985}          % 6
      (1297,1460){-18,-210}...{-18,-210}     % 7
      (1279,1250){-118,-696}...          % 8
      (1163,817){-218,-400}...          % 9
      (1059,659){-301,-337}...{-301,-337}     % 10
      (758,322)--cycle);               % 11

n := 22;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 4;
t5 := 7;
t6 := 8;
t7 := 9;
t8 := 10;
t9 := 13;
t10 := 16;
t11 := 17;
t12 := 21;
t13 := 23;
t14 := 24;
t15 := 26;
t16 := 28;
t17 := 33;
t18 := 36;
t19 := 37;
t20 := 38;
t21 := 41;
t22 := 45;

adj_fill.B(19)                         % fixed x points
     (13, 14)                    % fixed y points
     ((1,6), (2,5), (6,4), (7,3), (10,2), (11,1), (13,7), (14,7), (18,8),% tied points
      (20,8))
     ((12,15), (9,17), (4,21))          % verticals
     ((11,16), (5,8), (3,22))          % horizontals
     ((286,322){472,0}...{472,0}          % 0
      (758,322){947,-3}...               % 1
      (1705,319){947,-3}...               % 2
      (2033,425){1,1}...               % 3
      (2131,744){0,1}...               % 4
      (2007,1095){-1,1}...               % 5
      (1632,1272){-460,40}...          % 6
      (1350,1275){-675,-25}...{0,-1}          % 7
      (1279,1250){18,210}...               % 8
      (1297,1460){0,-1}...               % 9
      (1338,1430){1,0}...               % 10
      (1615,1444){386,69}...               % 11
      (1930,1604){1,1}...               % 12
      (2021,1890){0,1}...               % 13
      (1907,2254){-1,1}...               % 14
      (1657,2395){-610,191}...{-1,0}          % *15
      (1297,2445){-381,-35}...{-381,-35}     % 16
      (916,2410){-406,-65}...          % 17
      (534,2251){-534,-430}...          % *18
      (382,1980){0,-1}...               % 19
      (388,1899){174,-985}...          % 20
      (404,1752){0,-1}...               % 21
      (356,1631){-1,-1}...{-1,0}          % 22
      (202,1578)--                    % 23
      (202,1578){-1,0}...               % 24
      (86,1618){-1,1}...               % 25
      (24,1806){0,1}...               % 26
      (225,2209){1,1}...{381,68}          % 27
      (954,2554){349,106}...{349,106}     % 28
      (1303,2660){3,-93}...{3,-93}          % 29
      (1306,2567){1,0}...               % 30
      (1921,2509){977,-225}...          % *31
      (2283,2342){1,-1}...               % 32
      (2383,2043){0,-1}...               % 33
      (2229,1638){-1,-1}...{-335,-133}     % 34
      (1941,1432){-3,-12}...               % 35
      (1938,1420){-1.243,-.9701}...{-600,0}     % 36
      (1338,1420){600,0}...               % 37
      (1938,1420){1.6,-.8}...{9,-12}          % 38
      (1947,1408){1,0}...               % 39
      (2351,1249){1,-1}...               % 40
      (2499,892){0,-1}...               % 41
      (2319,456){-1,-1}...               % 42
      (1959,173){-638,-507}...          % 43
      (1755,43){-378,-175}...          % *44
      (1581,-2){-1471,0}...{-1471,0}          % 45
      (110,-2)--cycle);               % 46

endchar(0);

"sbuc";

charbegin( "C", 2031h#, capheight*v#, baseline );

n := 17;
t1 := 0;
t2 := 3;
t3 := 6;
t4 := 8;
t5 := 10;
t6 := 13;
t7 := 16;
t8 := 18;
t9 := 19;
t10 := 20;
t11 := 22;
t12 := 25;
t13 := 27;
t14 := 29;
t15 := 31;
t16 := 33;
t17 := 35;

adj_fill.A(8, 10)                    % fixed x points
     (1, 9, 17)                    % fixed y points
     ((1,1), (17,1))                    % tied points
     ((2,16), (4,14), (6,12))          % verticals
     ((3,15), (5,13), (7,11))          % horizontals
     ((1004,1980){1,0}...               % 0
      (1125,1941){1,-1}...               % 1
      (1177,1834){0,-1}...               % 2
      (1177,1759){-102,-650}...          % 3
      (1159,1644){.1841,-1.929}...          % 4
      (1177,1594){1,-1}...               % 5
      (1337,1535){1,0}...               % 6
      (1547,1647){1,1}...               % 7
      (1681,2037){0,1}...               % 8
      (1571,2368){-1,1}...               % 9
      (1227,2489){-1,0}...               % 10
      (810,2330){-1,-1}...               % 11
      (575,1899){-318,-1070}...          % *12
      (492,1260){0,-1}...               % 13
      (575,686){318,-982}...               % *14
      (810,278){1,-1}...               % 15
      (1258,94){1,0}...               % 16
      (1563,214){1,1}...{0,1}          % 17
      (1702,581){48,28}...{48,28}          % 18
      (1750,609)--                    % 19
      (1969,382){-335,-594}...          % 20
      (1862,229){-1,-1}...               % 21
      (1095,-55){-1,0}...               % 22
      (441,173){-1,1}...               % 23
      (184,608){-347,1032}...          % *24
      (94,1205){0,1}...               % 25
      (469,2299){1,1}...               % 26
      (1339,2624){1,0}...               % 27
      (1879,2454){1,-1}...               % 28
      (2010,2073){0,-1}...               % 29
      (1830,1602){-1,-1}...               % 30
      (1334,1416){-1,0}...               % 31
      (894,1549){-1,1}...               % 32
      (800,1748){0,1}...               % 33
      (872,1933){1,1}...{1,0}          % 34
      (1004,1980)--cycle);               % 35

endchar(0);

"sbud";

charbegin( "D", 2875h#, capheight*v#, baseline );
%call charbegin( `D, 2582h, capheight*v, baseline );

n := 6;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 6;
t5 := 7;
t6 := 10;

adj_fill.A(1)                         % fixed x points
     ()                         % fixed y points
     ((1,4), (3,1), (4,2), (6,3))          % tied points
     ((2,5))                         % verticals
     ()                         % horizontals
     ((261,328){1,0}...               % 0
      (569,359){494,119}...               % *1
      (755,447){1,1}...               % 2
      (857,685){138,661}...               % *3
      (893,1108){0,1}...{0,1302}          % 4
      (893,2410)--                    % 5
      (1270,2423){0,-936}...               % 6
      (1270,1487){0,-1}...               % 7
      (1221,955){-191,-855}...          % *8
      (1079,632){-276,-304}...{-276,-304}     % 9
      (803,328)--cycle);               % 10

n := 13;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 5;
t5 := 9;
t6 := 10;
t7 := 14;
t8 := 16;
t9 := 17;
t10 := 19;
t11 := 21;
t12 := 26;
t13 := 29;

adj_fill.B()                         % fixed x points
     (8, 9)                         % fixed y points
     ((1,4), (2,3), (5,2), (6,1), (8,5), (9,5))% tied points
     ((7,10), (4,12))               % verticals
     ((6,11), (3,13))               % horizontals
     ((261,328){542,0}...{542,0}          % 0
      (803,328){931,0}...               % 1
      (1734,328){1,0}...               % 2
      (2218,516){1,1}...               % 3
      (2341,781){166,714}...               % *4
      (2384,1230){0,1}...               % 5
      (2302,1784){-314,952}...          % *6
      (2070,2182){-1,1}...               % 7
      (1746,2360){-800,241}...{-1,0}          % *8
      (1270,2423){-377,-13}...{-377,-13}     % 9
      (893,2410){-1,0}...               % 10
      (497,2272){-1,-1}...               % 11
      (383,2015){0,-1}...               % 12
      (386,1907){79,-584}...               % 13
      (404,1775){0,-1}...               % 14
      (365,1638){-1,-1}...{-1,0}          % 15
      (205,1572)--                    % 16
      (205,1572){-1,0}...               % 17
      (61,1624){-1,1}...               % 18
      (18,1795){0,1}...               % 19
      (215,2243){1,1}...{1,0}          % 20
      (893,2523){377,140}...{377,140}     % 21
      (1270,2663){0,-99}...{0,-99}          % 22
      (1270,2564){1,0}...               % 23
      (2035,2486){1227,-299}...          % *24
      (2497,2265){1,-1}...               % 25
      (2784,1437){0,-1}...               % 26
      (2444,532){-1,-1}...               % 27
      (1938,134){-779,-493}...          % 28
      (1479,0){-1,0}...{-1381,0}          % 29
      (98,0)--cycle);               % 30

endchar(0);

"sbue";

charbegin( "E", 2052h#, capheight*v#, baseline );

n := 17;
t1 := 0;
t2 := 2;
t3 := 6;
t4 := 8;
t5 := 11;
t6 := 12;
t7 := 15;
t8 := 17;
t9 := 19;
t10 := 20;
t11 := 23;
t12 := 26;
t13 := 28;
t14 := 30;
t15 := 32;
t16 := 35;
t17 := 37;

adj_fill.A()                         % fixed x points
     (1, 10, 17)                    % fixed y points
     ((1,1), (17,1))                    % tied points
     ((9,10), (7,12), (5,13), (4,14), (2,16))% verticals
     ((8,11), (5,6), (3,15))               % horizontals
     ((1564,1955){-1,0}...               % 0
      (1422,2012){-1,1}...               % 1
      (1382,2108){0,1}...               % 2
      (1408,2212){232,508}...          % 3
      (1435,2325){0,1}...               % 4
      (1386,2446){-1,1}...               % 5
      (1187,2506){-1,0}...               % 6
      (891,2379){-1,-1}...               % 7
      (735,1968){0,-1}...               % 8
      (875,1611){1,-1}...               % 9
      (1107,1504){624,-145}...{1,0}          % *10
      (1499,1466){0,-107}...{0,-107}          % 11
      (1499,1359){-1,0}...               % 12
      (985,1307){-825,-201}...          % *13
      (674,1158){-1,-1}...               % 14
      (514,705){0,-1}...               % 15
      (707,248){1,-1}...               % 16
      (1109,95){1,0}...               % 17
      (1494,261){1,1}...               % 18
      (1620,611){86,768}...{73,33}          % 19
      (1693,644)--                    % 20
      (1956,391){-275,-640}...          % 21
      (1849,234){-1,-1}...               % 22
      (1084,-43){-1,0}...               % 23
      (606,7){-771,192}...               % *24
      (313,149){-1,1}...               % 25
      (100,606){0,1}...               % 26
      (307,1165){1,1}...{545,86}          % 27
      (811,1405){-520,156}...          % 28
      (497,1572){-1,1}...               % 29
      (342,1960){0,1}...               % 30
      (504,2395){1,1}...               % 31
      (1186,2620){1,0}...               % 32
      (1483,2583){493,-142}...          % *33
      (1679,2478){1,-1}...               % 34
      (1784,2241){0,-1}...               % 35
      (1709,2027){-1,-1}...{-1,0}          % 36
      (1564,1955)--cycle);               % 37

endchar(0);

"sbuf";

%charbegin( "F", 2225h#, capheight*v#, baseline );
charbegin( "F", (2225+50)*h#, capheight*v#, baseline ); % DEK

n := 14;
t1 := 0;
t2 := 3;
t3 := 5;
t4 := 6;
t5 := 7;
t6 := 11;
t7 := 12;
t8 := 13;
t9 := 14;
t10 := 16;
t11 := 18;
t12 := 20;
t13 := 23;
t14 := 25;

adj_fill.A(1, 12)                    % fixed x points
     (7, 9, 12, 14)                    % fixed y points
     ((3,1), (4,2), (7,3), (8,3))          % tied points
     ((6,10))                    % verticals
     ((5,11), (2,13))               % horizontals
     ((2533,2553){-141,-335}...          % 0
      (2369,2274){-482,-687}...          % 1
      (2251,2138){-216,-185}...          % *2
      (2153,2089){-1,0}...               % 3
      (1983,2128){-436,149}...          % 4
      (1547,2277){-1.915,.5712}...{-391,100}     % 5
      (1156,2377){-533,154}...          % 6
      (928,2424){-1,0}...               % 7
      (569,2295){-1,-1}...               % 8
      (418,2006){0,-1}...               % 9
      (436,1880){122,-737}...          % 10
      (461,1771){0,-1}...{-1,-1}          % 11
      (388,1615)--                    % 12
      (388,1615){-1,-1}...               % 13
      (247,1574){-1,0}...               % 14
      (128,1612){-1,1}...               % 15
      (64,1805){0,1}...               % 16
      (332,2332){1,1}...               % 17
      (1042,2576){1,0}...{643,-80}          % 18
      (1251,2562){295,120}...{295,120}     % 19
      (1546,2682){0,-145}...{0,-145}          % 20
      (1546,2537){586,-138}...          % 21
      (2132,2399){586,-138}...          % 22
      (2233,2383){1.895,.2631}...          % 23
      (2339,2432){123,165}...{123,165}     % 24
      (2462,2597)--cycle);               % 25

n := 12;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 10;
t5 := 11;
t6 := 12;
t7 := 13;
t8 := 14;
t9 := 15;
t10 := 16;
t11 := 22;
t12 := 25;

adj_fill.B(4, 10)                    % fixed x points
     (3)                         % fixed y points
     ((1,4), (7,2), (8,1), (12,4))          % tied points
     ((6,9))                         % verticals
     ((4,5), (2,11))                    % horizontals
     ((73,453){1,1}...               % 0
      (221,507){1,0}...               % 1
      (355,450){1,-1}...               % 2
      (436,291){216,-578}...               % 3
      (496,160){1,-1}...               % 4
      (634,110){1,0}...               % 5
      (977,284){1,1}...               % 6
      (1109,540){179,655}...               % *7
      (1156,939){0,1}...{0,1}          % 8
      (1156,1262){-579,-17}...{-579,-17}     % 9
      (577,1245){109,197}...{109,197}     % 10
      (686,1442){470,0}...{470,0}          % 11
      (1156,1442){0,935}...{0,935}          % 12
      (1156,2377)--                    % 13
      (1547,2277){-1,-835}...{-1,-835}     % 14
      (1546,1442){554,0}...{554,0}          % 15
      (2100,1442){-125,-180}...{-125,-180}     % 16
      (1975,1262){-429,0}...{-429,0}          % 17
      (1546,1262){0,-1}...               % 18
      (1474,695){-277,-946}...          % *19
      (1269,316){-1,-1}...               % 20
      (904,56){-447,-230}...               % 21
      (496,-50){-1,0}...               % 22
      (86,84){-1,1}...               % 23
      (0,289){0,1}...{1,1}               % 24
      (73,453)--cycle);               % 25

endchar(0);

"sbug";

%charbegin( "G", 2038h#, capheight*v#, depthy*v#);
charbegin( "G", 2038h#, capheight*v#, 2/3descender*v#); % DEK

n := 12;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 5;
t5 := 8;
t6 := 11;
t7 := 12;
t8 := 15;
t9 := 17;
t10 := 19;
t11 := 21;
t12 := 23;

adj_fill.A(1, 6, 12)                    % fixed x points
     (12)                         % fixed y points
     ((1,2), (12,1))                    % tied points
     ((5,8), (3,10))                    % verticals
     ((6,7), (4,9), (2,11))               % horizontals
     ((1484,999){-244,-154}...          % 0
      (937,844){-1,0}...               % 1
      (346,1053){-1,1}...               % 2
      (104,1690){0,1}...               % 3
      (352,2325){1,1}...               % 4
      (1203,2615){1,0}...               % 5
      (1543,2575){559,-154}...          % *6
      (1762,2461){1,-1}...               % 7
      (1881,2184){0,-1}...               % 8
      (1787,1918){-1,-1}...               % 9
      (1483,1759){-1,0}...{-278,53}          % 10
      (1232,1795)--                    % 11
      (1251,1873){1,0}...               % 12
      (1395,1888){233,59}...               % *13
      (1484,1932){1,1}...               % 14
      (1539,2143){0,1}...               % 15
      (1484,2359){-1,1}...               % 16
      (1132,2474){-1,0}...               % 17
      (719,2316){-1,-1}...               % 18
      (520,1714){0,-1}...               % 19
      (749,1100){1,-1}...               % 20
      (1065,976){1,0}...               % 21
      (1401,1104){1,1}...{0,1}          % 22
      (1484,1394)--cycle);               % 23

n := 10;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 5;
t5 := 9;
t6 := 10;
t7 := 11;
t8 := 15;
t9 := 18;
t10 := 19;

adj_fill.B()                         % fixed x points
     (2, 10)                         % fixed y points
     ((1,3), (5,2), (6,1), (10,3))          % tied points
     ((6,7), (3,9))                    % verticals
     ((4,8))                         % horizontals
     ((130,59){1,1}...               % 0
      (280,112){1,0}...               % 1
      (432,63){1,-1}...               % 2
      (485,-86){61,-531}...               % 3
      (579,-306){1,-1}...               % 4
      (828,-365){1,0}...               % 5
      (1287,-157){1,1}...               % 6
      (1433,108){197,654}...               % *7
      (1484,497){0,1}...               % 8
      (1484,999){0,2}...{0,395}          % 9
      (1484,1394)--                    % 10
      (1859,1499){0,-760}...               % 11
      (1859,739){0,-1}...               % 12
      (1784,183){-289,-939}...          % *13
      (1570,-200){-1,-1}...               % 14
      (794,-511){-1,0}...               % 15
      (399,-469){-639,162}...          % *16
      (155,-349){-1,1}...               % 17
      (71,-113){0,1}...{1,1}               % 18
      (130,59)--cycle);               % 19

endchar(0);

"sbuh";

charbegin( "H", 3075h#, capheight*v#, baseline );

n := 9;
t1 := 0;
t2 := 1;
t3 := 6;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 11;
t8 := 14;
t9 := 15;

adj_fill.A(9)                         % fixed x points
     (4, 6)                         % fixed y points
     ((1,3), (2,1), (4,2), (5,2))          % tied points
     ((3,7))                         % verticals
     ((2,8))                         % horizontals
     ((1322,2441){-400,0}...               % 0
      (922,2441){-1,0}...               % 1
      (627,2405){-488,-138}...          % *2
      (434,2303){-1,-1}...               % 3
      (333,2103){0,-1}...               % 4
      (372,1947){360,-826}...          % 5
      (418,1784){0,-1}...{-1,-1}          % 6
      (356,1624)--                    % 7
      (356,1624){-1,-1}...               % 8
      (211,1563){-1,0}...               % 9
      (100,1610){-1,1}...               % 10
      (16,1861){0,1}...               % 11
      (213,2302){1,1}...               % 12
      (581,2508){900,279}...               % *13
      (1113,2581){1,0}...{459,-43}          % 14
      (1422,2558)--cycle);               % 15

n := 12;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 5;
t5 := 9;
t6 := 10;
t7 := 11;
t8 := 12;
t9 := 13;
t10 := 15;
t11 := 17;
t12 := 18;

adj_fill.B()                         % fixed x points
     (2, 12)                         % fixed y points
     ((1,6), (6,1), (7,3), (8,4), (9,5), (12,6))% tied points
     ((5,8), (3,11))                    % verticals
     ((4,10))                    % horizontals
     ((42,364){1,1}...               % 0
      (183,424){1,0}...               % 1
      (280,393){1,-1}...               % 2
      (350,238){219,-688}...               % 3
      (406,164){1,-1}...               % 4
      (516,123){1,0}...               % 5
      (715,222){1,1}...               % 6
      (803,370){153.5,389.3}...          % *7
      (869,611){207,1120}...               % *8
      (922,1342){0,1}...{0,1099}          % 9
      (922,2441)--                    % 10
      (1322,2441){0,-1005}...{0,-1005}     % 11
      (1322,1436){0,-183}...{0,-183}          % 12
      (1322,1253){0,-1}...               % 13
      (971,250){-1,-1}...               % 14
      (352,-42){-1,0}...               % 15
      (70,65){-1,1}...               % 16
      (-4,225){0,1}...{1,1}               % 17
      (42,364)--cycle);               % 18

n := 4;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,8), (2,4), (3,5), (4,7))          % tied points
     ()                         % verticals
     ((2,3))                         % horizontals
     ((2040,1436){-718,0}...{-718,0}          % 0
      (1322,1436)--                    % 1
      (1322,1253){701,0}...{701,0}          % 2
      (2023,1253)--cycle);               % 3

n := 12;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 9;
t5 := 12;
t6 := 14;
t7 := 15;
t8 := 17;
t9 := 21;
t10 := 22;
t11 := 24;
t12 := 27;

adj_fill.D(1, 7)                    % fixed x points
     (2, 6)                         % fixed y points
     ((1,9), (9,7), (10,8), (12,9))          % tied points
     ((4,9))                         % verticals
     ((5,8), (3,11))                    % horizontals
     ((3100,2281){-1,-1}...               % 0
      (2970,2206){-1,0}...               % 1
      (2871,2240){-1,1}...               % 2
      (2826,2306){-178,585}...          % 3
      (2796,2372){-1,1}...               % 4
      (2722,2384){-1,0}...               % 5
      (2618,2337){-1,-1}...               % 6
      (2511,2145){-169,-502}...          % *7
      (2449,1835){-122,-1166}...          % 8
      (2410,1091){0,-1}...               % 9
      (2452,524){163,-872}...          % *10
      (2573,219){1,-1}...               % 11
      (2709,167){1,0}...               % 12
      (2887,270){1,1}...{270,454}          % 13
      (2994,406)--                    % 14
      (3059,340){-338,-529}...          % 15
      (2959,176){-1,-1}...               % 16
      (2465,-46){-1,0}...               % 17
      (2215,76){-1,1}...               % 18
      (2129,221){-145.6,385.1}...          % *19
      (2069,461){-192,1177}...{0,1}          % *20
      (2023,1253){17,183}...{17,183}          % 21
      (2040,1436){161,1254}...          % 22
      (2453,2380){1,1}...               % 23
      (2916,2598){1,0}...               % 24
      (3084,2542){1,-1}...               % 25
      (3150,2416){0,-1}...{-1,-1}          % 26
      (3100,2281)--cycle);               % 27

endchar(0);

"sbui";

charbegin( "I", 1646h#, capheight*v#, baseline );

n := 8;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 7;
t5 := 8;
t6 := 10;
t7 := 13;
t8 := 14;

adj_fill.A(8)                         % fixed x points
     (4, 5)                         % fixed y points
     ((1,3), (2,1), (4,2), (5,2))          % tied points
     ((3,6))                         % verticals
     ((2,7))                         % horizontals
     ((1434,2435){-414,17}...{-414,17}     % 0
      (1020,2452){-1,0}...               % 1
      (553,2302){-1,-1}...               % 2
      (490,2077){0,-1}...               % 3
      (521,1977){271,-696}...          % 4
      (561,1805){0,-1}...               % 5
      (502,1646){-1,-1}...{-1,0}          % 6
      (329,1573)--                    % 7
      (329,1573){-1,0}...               % 8
      (205,1628){-1,1}...               % 9
      (130,1864){0,1}...               % 10
      (341,2324){1,1}...               % 11
      (711,2527){917,274}...               % *12
      (1258,2598){1,0}...{552,-71}          % 13
      (1543,2569)--cycle);               % 14

n := 9;
t1 := 0;
t2 := 4;
t3 := 7;
t4 := 8;
t5 := 9;
t6 := 10;
t7 := 14;
t8 := 16;
t9 := 18;

adj_fill.B(1, 8)                    % fixed x points
     (1, 9)                         % fixed y points
     ((1,4), (4,1), (5,3), (9,4))          % tied points
     ((3,6))                         % verticals
     ((2,7))                         % horizontals
     ((210,489){1,0}...               % 0
      (361,413){1,-1}...               % 1
      (426,258){233,-681}...               % 2
      (466,163){1,-1}...               % 3
      (622,102){1,0}...               % 4
      (826,199){1,1}...               % 5
      (970,514){194,853}...               % *6
      (1020,1052){0,1}...{0,1400}          % 7
      (1020,2452)--                    % 8
      (1434,2435){-1,-726}...          % 9
      (1433,1709){0,-1}...               % 10
      (1402,1078){-122,-1070}...          % *11
      (1311,639){-145,-405}...          % 12
      (1071,223){-1,-1}...               % 13
      (453,-65){-1,0}...               % 14
      (100,71){-1,1}...               % 15
      (-9,284){0,1}...               % 16
      (58,447){1,1}...{1,0}               % 17
      (210,489)--cycle);               % 18

endchar(0);

"sbuj";

%charbegin( "J", 1674h#, capheight*v#, depthy*v#);
charbegin( "J", 1674h#, capheight*v#, 2/3descender*v#); % DEK

n := 9;
t1 := 1;
t2 := 2;
t3 := 5;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 11;
t8 := 13;
t9 := 14;

adj_fill.A(9)                         % fixed x points
     (4, 6)                         % fixed y points
     ((1,3), (2,1), (4,2), (5,2))          % tied points
     ((3,7))                         % verticals
     ((1,8))                         % horizontals
     ((1658,2523){-201,-120}...{-201,-120}     % 0
      (1457,2403){-414,0}...{-414,0}          % 1
      (1043,2403){-324,-59}...          % 2
      (640,2210){-1,-1}...               % 3
      (509,1954){0,-1}...               % 4
      (514,1864){80,-769}...               % 5
      (530,1761){0,-1}...{-1,-1}          % 6
      (479,1627)--                    % 7
      (479,1627){-1,-1}...               % 8
      (313,1549){-1,0}...               % 9
      (198,1576){-1,1}...               % 10
      (128,1754){0,1}...               % 11
      (353,2186){1,1}...               % 12
      (1467,2592){1,0}...{310,-35}          % 13
      (1667,2581)--cycle);               % 14

n := 11;
t1 := 0;
t2 := 3;
t3 := 5;
t4 := 10;
t5 := 11;
t6 := 12;
t7 := 13;
t8 := 14;
t9 := 17;
t10 := 19;
t11 := 23;

adj_fill.B(1, 11)                    % fixed x points
     (1, 11)                         % fixed y points
     ((1,4), (4,4), (5,5), (6,1), (7,3), (11,5))% tied points
     ((5,8), (2,10))                    % verticals
     ((3,9))                         % horizontals
     ((1043,1123){-1,0}...               % 0
      (987,1111){-629,-376}...          % 1
      (626,841){-1,-1}...               % 2
      (279,0){0,-1}...               % 3
      (393,-295){1,-1}...               % 4
      (582,-361){1,0}...               % 5
      (701,-323){257,148}...               % *6
      (839,-213){1,1}...               % 7
      (990,124){204,920}...               % *8
      (1043,707){0,1}...{0,416}          % 9
      (1043,1123){0,136}...{0,136}          % 10
      (1043,1259){0,1144}...{0,1144}          % 11
      (1043,2403)--                    % 12
      (1457,2403){-5,-1369}...          % 13
      (1452,1034){0,-1}...               % 14
      (1371,265){-313,-1242}...          % *15
      (1139,-208){-1,-1}...               % 16
      (467,-508){-1,0}...               % 17
      (131,-397){-1,1}...               % 18
      (0,-41){0,1}...               % 19
      (127,413){488,930}...               % *20
      (488,889){1,1}...               % 21
      (956,1218){599,296}...{749,285}     % 22
      (1043,1259)--cycle);               % 23

endchar(0);

"sbuk";

charbegin( "K", 2847h#, capheight*v#, baseline );

n := 9;
t1 := 0;
t2 := 1;
t3 := 6;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 11;
t8 := 14;
t9 := 15;

adj_fill.A(9)                         % fixed x points
     (4, 6)                         % fixed y points
     ((1,3), (2,1), (4,2), (5,2))          % tied points
     ((3,7))                         % verticals
     ((2,8))                         % horizontals
     ((1324,2429){-381,0}...               % 0
      (943,2429){-1,0}...               % 1
      (654,2395){-474,-129}...          % *2
      (469,2300){-1,-1}...               % 3
      (347,2078){0,-1}...               % 4
      (385,1956){264,-501}...          % 5
      (430,1807){0,-1}...{-1,-1}          % 6
      (377,1647)--                    % 7
      (377,1647){-1,-1}...               % 8
      (207,1567){-1,0}...               % 9
      (81,1637){-1,1}...               % 10
      (-3,1876){0,1}...               % 11
      (236,2334){1,1}...               % 12
      (589,2523){885,256}...               % *13
      (1121,2590){1,0}...{198,-12}          % 14
      (1409,2558)--cycle);               % 15

n := 11;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 9;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 13;
t9 := 15;
t10 := 17;
t11 := 18;

adj_fill.B(1, 10)                    % fixed x points
     (2, 11)                         % fixed y points
     ((1,6), (5,1), (6,3), (7,4), (8,5), (11,6))% tied points
     ((4,7))                         % verticals
     ((3,9))                         % horizontals
     ((32,374){1,1}...               % 0
      (199,433){1,0}...               % 1
      (290,403){1,-1}...               % 2
      (365,263){265,-649}...               % 3
      (410,171){1,-1}...               % 4
      (539,132){1,0}...               % 5
      (624,163){192,118}...               % *6
      (731,250){1,1}...               % 7
      (888,586){212,901}...{0,1}          % *8
      (943,1151){0,1278}...{0,1278}          % 9
      (943,2429)--                    % 10
      (1324,2429){0,-1043}...{0,-1043}     % 11
      (1324,1386){0,-156}...{0,-156}          % 12
      (1324,1230){0,-1}...               % 13
      (943,252){-1,-1}...               % 14
      (355,-31){-1,0}...               % 15
      (65,71){-1,1}...               % 16
      (-12,238){0,1}...{1,1}               % 17
      (32,374)--cycle);               % 18

n := 3;
t1 := 1;
t2 := 2;
t3 := 3;

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,4), (2,5), (3,7))               % tied points
     ()                         % verticals
     ((1,2))                         % horizontals
     ((1378,1386){-54,0}...{-54,0}          % 0
      (1324,1386)--                    % 1
      (1324,1230){48,0}...{48,0}          % 2
      (1372,1230)--cycle);               % 3

n := 9;
t1 := 2;
t2 := 5;
t3 := 9;
t4 := 12;
t5 := 13;
t6 := 14;
t7 := 17;
t8 := 23;
t9 := 25;

adj_fill.D()                         % fixed x points
     (6, 9)                         % fixed y points
     ((2,7), (4,8), (5,8))               % tied points
     ()                         % verticals
     ((3,7), (1,8))                    % horizontals
     ((2857,482){-138,-276}...          % 0
      (2605,82){-1,-1}...               % 1
      (2342,-34){-1,0}...               % 2
      (2016,100){-1,1}...               % 3
      (1809,396){-220,413}...{-437,834}     % 4
      (1372,1230){0,156}...{0,156}          % 5
      (1372,1386){818,1005}...          % 6
      (2190,2391){1,1}...               % 7
      (2404,2563){391,233}...          % *8
      (2581,2624){1,0}...               % 9
      (2781,2539){1,-1}...               % 10
      (2847,2381){0,-1}...{-1,-1}          % 11
      (2773,2190)--                    % 12
      (2773,2190){-1,-1}...               % 13
      (2631,2117){-1,0}...               % 14
      (2503,2147){-1,1}...               % 15
      (2468,2212){-121,575}...          % 16
      (2385,2303){-1,0}...               % 17
      (2211,2197){-1,-1}...               % 18
      (2055,2032){-384,-506}...{-384,-506}     % 19
      (1671,1526){285,-564}...          % 20
      (1956,962){285,-564}...          % 21
      (2358,369){1,-1}...               % 22
      (2533,302){1,0}...               % 23
      (2655,364){1,1}...{163,277}          % 24
      (2793,540)--cycle);               % 25

endchar(0);

"sbul";

charbegin( "L", 2449h#, capheight*v#, baseline );
rot := identity slanted -1/6; % DEK

n := 9;
t1 := 0;
t2 := 4;
t3 := 6;
t4 := 7;
t5 := 10;
t6 := 11;
t7 := 13;
t8 := 17;
t9 := 20;

adj_fill.A(5)                         % fixed x points
     (6, 9)                         % fixed y points
     ((3,1), (4,2))                    % tied points
     ((1,9))                         % verticals
     ((3,7), (2,8))                    % horizontals
%     ((2231,1026){0,-1}...               % 0
%      (2205,845){-26,-181}...          % 1
%      (2147,599){-146,-399}...          % *2
%      (2059,446){-1,-1}...               % 3
%      (1762,330){-1,0}...               % 4
     (((2231,1026){0,-1}...               % 0 % DEK
      (2205,845){-26,-181}...          % 1
      (2147,599){-146,-399}...          % *2
      (2059,446){-1,-1}...               % 3
      (1762,330){-1,0})slanted1/6{-1,0}...     % 4
      (1171,501){-752,300}...{-1,0}          % 5
      (559,677){-64,94}...{-64,94}          % 6
      (495,771){-1,-1}...               % 7
      (376,665){-348,-280}...          % 8
      (220,530){-1,-1}...{-105,-473}          % 9
      (-8,49)--                    % 10
      (73,4){172,441}...               % 11
      (232,297){1,1}...               % 12
      (452,377){1,0}...               % 13
      (649,334){478,-168}...               % *14
      (930,209){1115,-578}...          % 15
      (1350,19){701,-255}...               % *16
%      (1631,-46){1,0}...               % 17
%      (2090,168){1,1}...               % 18
%      (2326,775){1,252}...{0,1}          % 19
%      (2327,1027)--cycle);               % 20
      {1,0}((1631,-46){1,0}...          % 17 % DEK
      (2090,168){1,1}...               % 18
      (2326,775){1,252}...{0,1}          % 19
      (2327,1027))slanted1/6--cycle);     % 20

n := 8;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 9;
t5 := 10;
t6 := 16;
t7 := 18;
t8 := 20;

adj_fill.B()                         % fixed x points
     (1, 8)                         % fixed y points
     ((1,3), (4,2), (5,1), (8,3))          % tied points
     ((2,7))                         % verticals
     ((3,6))                         % horizontals
     ((1968,2050){1,0}...               % 0
      (2108,2106){1,1}...               % 1
      (2189,2315){0,1}...               % 2
      (2110,2518){-1,1}...               % 3
      (1744,2628){-1,0}...               % 4
      (1077,2388){-1,-1}...               % 5
      (830,1978){-377,-1010}...          % *6
      (700,1378){-100,-1036}...          % 7
      (626,1006){-205,-607}...{-1,-1}     % *8
      (495,771)--                    % 9
      (559,677){445,342}...               % 10
      (912,969){1,1}...               % 11
      (1066,1258){275,802}...          % *12
      (1187,1771){172,1050}...          % 13
      (1284,2201){211,658}...          % *14
      (1398,2429){1,1}...               % 15
      (1577,2478){1,0}...               % 16
      (1712,2429){1,-1}...               % 17
      (1763,2267){93,-883}...          % 18
      (1820,2089){1,-1}...{1,0}          % 19
      (1968,2050)--cycle);               % 20

endchar(0);

"sbum";

charbegin( "M", 3437h#, capheight*v#, baseline );

n := 8;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 8;
t5 := 9;
t6 := 13;
t7 := 15;
t8 := 16;

adj_fill.A()                         % fixed x points
     (4)                         % fixed y points
     ((1,3), (4,1), (5,2), (8,3))          % tied points
     ((4,5), (3,7))                    % verticals
     ((2,6))                         % horizontals
     ((40,332){1,1}...               % 0
      (184,397){1.846,.05676}...          % 1
      (300,353){1,-1}...               % 2
      (342,255){127,-397}...               % 3
      (429,166){1,0}...               % 4
      (567,220){1,1}...               % 5
      (708,505){190,746}...               % *6
      (757,966){0,1}...{0,1134}          % 7
      (757,2100)--                    % 8
      (917,1912){0,-825}...               % 9
      (917,1087){0,-1}...               % 10
      (843,508){-285,-967}...          % *11
      (632,120){-1,-1}...               % 12
      (270,-47){-1,0}...               % 13
      (63,31){-1,1}...               % 14
      (-9,205){0,1}...{1,1}               % 15
      (40,332)--cycle);               % 16

n := 15;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 8;
t5 := 9;
t6 := 12;
t7 := 13;
t8 := 15;
t9 := 17;
t10 := 18;
t11 := 20;
t12 := 24;
t13 := 27;
t14 := 29;
t15 := 31;

adj_fill.B(1, 14)                    % fixed x points
     (1, 5, 9, 12, 15)               % fixed y points
     ((1,6), (2,4), (3,5), (6,2), (7,1), (15,6))% tied points
     ((9,10), (4,5))                    % verticals
     ((8,11), (2,13))               % horizontals
     ((3275,2242){-1,0}...               % 0
      (3191,2281){-1,1}...               % 1
      (3143,2359){-87,437}...          % 2
      (3056,2457){-1,0}...{-1,-1}          % 3
      (2983,2421){-466,-299}...{-466,-299}     % 4
      (2517,2122){-152,-190}...          % 5
      (2057,1265){-712,-1994}...{-107,-958}     % *6
      (1805,128){-16,-44}...{-16,-44}     % 7
      (1789,84){-302,-130}...{-302,-130}     % 8
      (1487,-46){-41,561}...               % 9
      (1216,1256){-110,370}...          % 10
      (1074,1647){-299,656}...{-378,465}     % *11
      (917,1912){-160,188}...{-160,188}     % 12
      (757,2100){-329,438}...          % 13
      (655,2216){-1,1}...               % 14
      (357,2365){-1,0}...               % 15
      (209,2304){-1,-1}...{-35,-284}          % 16
      (68,1990)--                    % 17
      (-12,2005){0,1}...               % 18
      (168,2494){1,1}...               % 19
      (587,2627){1,0}...               % 20
      (1017,2434){1,-1}...               % 21
      (1307,2022){540,-1022}...          % *22
      (1557,1412){358,-1107}...{122,-476}     % 23
      (1746,778){433,1546}...          % 24
      (2087,1670){788,1526}...          % *25
      (2534,2304){1,1}...               % 26
      (3189,2599){1,0}...               % 27
      (3408,2527){1,-1}...               % 28
      (3451,2429){0,-1}...               % 29
      (3408,2313){-1,-1}...{-1,0}          % 30
      (3275,2242)--cycle);               % 31

n := 9;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 5.587;
t5 := 6;
t6 := 7;
t7 := 8;
t8 := 12;
t9 := 14;

adj_fill.C(1, 4)                    % fixed x points
     (9)                         % fixed y points
     ((5,5), (6,4))                    % tied points
     ((3,7))                         % verticals
     ((2,8))                         % horizontals
     ((3434,312){-207,-382}...          % 0
      (3271,90){-1,-1}...               % 1
      (2932,-64){-1,0}...               % 2
      (2673,29){-1,1}...               % 3
      (2566,283){-155,722}...          % *4
      (2518,751){-14,519}...{47,836}          % 5
      (2517,2122)--                    % 6
      (2983,2421){-1,-1}...               % 7
      (2891,1722){0,-1}...               % 8
      (2921,595){34,-462}...               % 9
      (2960,319){105,-424}...          % *10
      (3026,171){1,-1}...               % 11
      (3117,140){1,0}...               % 12
      (3243,221){1,1}...{288,408}          % 13
      (3375,369)--cycle);               % 14

endchar(0);

"sbun";

charbegin( "N", 2666h#, capheight*v#, baseline );

n := 8;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 8;
t5 := 9;
t6 := 14;
t7 := 16;
t8 := 17;

adj_fill.A(1, 7)                    % fixed x points
     (2, 4)                         % fixed y points
     ((1,3), (4,1), (5,2), (8,3))          % tied points
     ((4,5))                         % verticals
     ((3,6))                         % horizontals
     ((47,336){1,1}...               % 0
      (183,393){1,0}...               % 1
      (302,355){1,-1}...               % 2
      (352,274){156,-292}...               % 3
      (444,192){1,0}...               % 4
      (546,242){1,1}...               % 5
      (671,598){153,1240}...               % *6
      (699,1482){0,1}...{0,630}          % 7
      (699,2112)--                    % 8
      (853,1912){0,-402}...               % 9
      (853,1510){0,-1}...               % 10
      (778,598){-287,-1419}...          % *11
      (688,287){-212.4,-506.6}...          % *12
      (566,91){-1,-1}...               % 13
      (271,-40){-1,0}...               % 14
      (45,50){-1,1}...               % 15
      (2,172){0,1}...{1,1}               % 16
      (47,336)--cycle);               % 17

n := 15;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 6.49;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 14;
t9 := 15;
t10 := 18;
t11 := 22;
t12 := 23;
t13 := 26;
t14 := 28;
t15 := 30;

adj_fill.B()                         % fixed x points
     (3, 9, 11)                    % fixed y points
     ((1,4), (5,2), (6,1), (15,4))          % tied points
     ((8,9), (4,12), (2,14))               % verticals
     ((7,10), (1,13))               % horizontals
     ((2626,2265){-1,0}...               % 0
      (2515,2346){-60,317}...          % 1
      (2501,2414){-1,1}...               % 2
      (2448,2446){-1,0}...               % 3
      (2404,2429){-1,-1}...               % 4
      (2338,2250){-92,-652}...          % *5
      (2312,1777){-13,-392}...{42,-767}     % 6
      (2319,100){-265,-147}...{-265,-147}     % 7
      (2054,-47){-183,340}...          % 8
      (1420,1069){-351,559}...{-411,584}     % 9
      (853,1912){-154,200}...{-154,200}     % 10
      (699,2112){-282,314}...          % 11
      (342,2314){-1,0}...               % 12
      (181,2258){-1,-1}...{-96,-539}          % 13
      (70,1979)--                    % 14
      (-18,1978){0,1}...               % 15
      (18,2261){137,471}...               % *16
      (119,2449){1,1}...               % 17
      (549,2599){1,0}...               % 18
      (968,2408){1,-1}...               % 19
      (1294,2014){700,-972}...          % *20
      (1668,1436){501,-843}...{501,-843}     % 21
      (2169,593){0,1293}...               % 22
      (2169,1886){0,1293}...               % 23
      (2208,2266){151,612}...          % *24
      (2320,2498){1,1}...               % 25
      (2614,2634){1,0}...               % 26
      (2770,2568){1,-1}...               % 27
      (2826,2457){0,-1}...               % 28
      (2783,2331){-1,-1}...{-1,0}          % 29
      (2626,2265)--cycle);               % 30

endchar(0);

"sbuo";

charbegin( "O", 2420h#, capheight*v#, baseline );

n := 15;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 7;
t5 := 10;
t6 := 13;
t7 := 16;
t8 := 18;
t9 := 19;
t10 := 21;
t11 := 24;
t12 := 27;
t13 := 30;
t14 := 32;
t15 := 34;

adj_fill.A(8)                         % fixed x points
     (9, 11)                         % fixed y points
     ((1,1), (15,1))                    % tied points
     ((2,14), (5,12), (7,10))          % verticals
     ((1,3), (4,13), (6,10))               % horizontals
     ((1031,1539){1,0}...               % 0
      (1176,1606){1,1}...               % 1
      (1236,1776){0,1}...               % 2
      (1200,1866){-136,191}...          % *3
      (1100,1967){-605,479}...          % 4
      (996,2144){0,1}...               % 5
      (1076,2326){1,1}...               % 6
      (1365,2447){1,0}...               % 7
      (1641,2319){1,-1}...               % 8
      (1836,1920){263,-1049}...          % *9
      (1904,1270){0,-1}...               % 10
      (1835,657){-267,-1002}...          % *11
      (1637,268){-1,-1}...               % 12
      (1162,84){-1,0}...               % 13
      (762,255){-1,1}...               % 14
      (522,692){-324,1081}...          % *15
      (438,1336){0,1}...               % 16
      (507,2025){266,1104}...{1,1}          % *17
      (704,2440)--                    % 18
      (654,2480){-294,-143}...          % 19
      (419,2316){-1,-1}...               % 20
      (47,1274){0,-1}...               % 21
      (132,647){327,-1060}...          % *22
      (374,214){1,-1}...               % 23
      (1105,-73){1,0}...               % 24
      (1962,262){1,1}...               % 25
      (2225,723){356,1117}...          % *26
      (2318,1379){0,1}...               % 27
      (2239,2009){-305,1049}...          % *28
      (2013,2428){-1,1}...               % 29
      (1551,2617){-1,0}...               % 30
      (965,2393){-1,-1}...               % 31
      (780,1908){0,-1}...               % 32
      (882,1605){1,-1}...{1,0}          % 33
      (1031,1539)--cycle);               % 34

endchar(0);

"sbup";

charbegin( "P", 2246h#, capheight*v#, baseline );

n := 12;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 5;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 13;
t9 := 15;
t10 := 17;
t11 := 22;
t12 := 24;

adj_fill.A(1, 12)                    % fixed x points
     (6, 8)                         % fixed y points
     ((1,5), (3,1), (4,2), (6,3), (7,3), (12,4))% tied points
     ((5,9), (2,11))                    % verticals
     ((4,10), (1,12))               % horizontals
     ((1277,1171){287,36}...               % 0
      (1677,1344){1,1}...               % 1
      (1830,1816){0,1}...               % 2
      (1675,2256){-1,1}...{-1,0}          % 3
      (1277,2406){-380,0}...{-380,0}          % 4
      (897,2406){-1,0}...               % 5
      (610,2373){-469,-126}...          % *6
      (428,2280){-1,-1}...               % 7
      (326,2091){0,-1}...               % 8
      (382,1913){265,-570}...          % 9
      (424,1806){0,-1}...{-1,-1}          % 10
      (367,1622)--                    % 11
      (367,1622){-1,-1}...               % 12
      (209,1560){-1,0}...               % 13
      (76,1601){-1,1}...               % 14
      (4,1861){0,1}...               % 15
      (203,2298){1,1}...{1,0}          % 16
      (978,2558){299,78}...{299,78}          % 17
      (1277,2636){0,-84}...{0,-84}          % 18
      (1277,2552){1,0}...               % 19
      (1773,2489){827,-241}...          % *20
      (2104,2311){1,-1}...               % 21
      (2230,1889){0,-1}...               % 22
      (2009,1332){-1,-1}...{-354,-14}     % 23
      (1277,1050)--cycle);               % 24

n := 11;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 4;
t5 := 8;
t6 := 9;
t7 := 10;
t8 := 11;
t9 := 13;
t10 := 15;
t11 := 16;

adj_fill.B()                         % fixed x points
     (2, 11)                         % fixed y points
     ((1,6), (5,2), (6,1), (7,5), (8,4), (11,6))% tied points
     ((5,6), (3,10))                    % verticals
     ((4,9))                         % horizontals
     ((58,351){1,1}...               % 0
      (236,437){1,0}...               % 1
      (399,268){119,-395}...               % 2
      (462,152){150,-160}...               % *3
      (549,108){1,0}...               % 4
      (714,195){1,1}...               % 5
      (849,510){183,875}...               % *6
      (897,1070){0,1}...{0,1336}          % 7
      (897,2406)--                    % 8
      (1277,2406){0,-1235}...{0,-1235}     % 9
      (1277,1171){0,-121}...{0,-121}          % 10
      (1277,1050){-75,-770}...          % 11
      (930,183){-1,-1}...               % 12
      (382,-47){-1,0}...               % 13
      (80,62){-1,1}...               % 14
      (8,235){0,1}...{1,1}               % 15
      (58,351)--cycle);               % 16

endchar(0);

"sbuq";

addleft:=55h#;

charbegin( "Q", 2253h#+addleft, capheight*v#, baseline );

n := 10;
t1 := 0;
t2 := 3;
t3 := 6;
t4 := 9;
t5 := 13;
t6 := 14;
t7 := 17;
t8 := 19;
t9 := 22;
t10 := 24;

adj_fill.A(1, 5, 6)                    % fixed x points
     (10)                         % fixed y points
     ((1,2), (10,1))                    % tied points
     ((4,7), (2,9))                    % verticals
     ((5,6), (3,8))                    % horizontals
     ((1105,435){175,31}...               % 0
      (1464,632){1,1}...               % 1
      (1655,1000){258,939}...          % *2
      (1722,1571){0,1}...               % 3
      (1662,2036){-231,778}...          % *4
      (1491,2349){-1,1}...               % 5
      (1118,2493){-1,0}...               % 6
      (636,2316){-1,-1}...               % 7
      (455,2000){-245,-763}...          % *8
      (391,1553){0,-1}...               % 9
      (433,1147){163,-654}...          % *10
      (554,899){1,-1}...               % 11
      (689,818){351,-138}...{347,-60}     % *12
      (905,761)--                    % 13
      (905,676){-419,18}...               % 14
      (516,743){-656,222}...               % *15
      (249,898){-1,1}...               % 16
      (-16,1570){0,1}...               % 17
      (253,2303){1,1}...               % 18
      (1166,2609){1,0}...               % 19
      (1574,2553){692,-217}...          % *20
      (1858,2392){1,-1}...               % 21
      (2143,1587){0,-1}...               % 22
      (1846,699){-1,-1}...{-327,-94}          % 23
      (1281,388)--cycle);               % 24

n := 8;
t1 := 2;
t2 := 4;
t3 := 6;
t4 := 9;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 14;

adj_fill.B()                         % fixed x points
     (3, 8)                         % fixed y points
     ((5,2), (6,1))                    % tied points
     ()                         % verticals
     ((2,4), (1,7))                    % horizontals
     ((2220,656){-116,-337}...          % 0
      (1925,109){-1,-1}...               % 1
      (1601,-47){-1,0}...               % 2
      (1052,41){-959,204}...               % 3
      (499,118){-1,0}...               % 4
      (276,38){-1,-1}...{-172,-337}          % 5
      (148,-156)--                    % 6
      (71,-110){151,468}...               % 7
      (349,376){1,1}...               % 8
      (654,472){1,0}...{264,-34}          % 9
      (1105,435){176,-47}...{176,-47}     % 10
      (1281,388){469,-103}...          % 11
      (1704,334){1,0}...               % 12
      (2030,468){1,1}...{163,473}          % 13
      (2153,679)--cycle);               % 14

endchar(addleft);

"sbur";

charbegin( "R", 2476h#, capheight*v#, baseline );

n := 14;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 6;
t5 := 11;
t6 := 12;
t7 := 13;
t8 := 14;
t9 := 16;
t10 := 18;
t11 := 23;
t12 := 25;
t13 := 26;
t14 := 27;

adj_fill.A(1, 14)                    % fixed x points
     (6, 8)                         % fixed y points
     ((1,6), (3,1), (6,2), (7,2), (12,3), (13,4), (14,5))% tied points
     ((5,9), (2,11))                    % verticals
     ((4,10), (1,13))               % horizontals
     ((1346,1233){1,0}...               % 0
      (1757,1422){1,1}...               % 1
      (1910,1921){0,1}...               % 2
      (1780,2306){-1,1}...               % 3
      (1609,2396){-434,121}...{-1,0}          % *4
      (1346,2427){-409,0}...{-409,0}          % 5
      (937,2427){-1,0}...               % 6
      (642,2388){-496,-151}...          % *7
      (441,2276){-1,-1}...               % 8
      (356,2075){0,-1}...               % 9
      (388,1965){247,-407}...          % 10
      (446,1814){0,-1}...{-1,-1}          % 11
      (407,1650)--                    % 12
      (407,1650){-1,-1}...               % 13
      (249,1573){-1,0}...               % 14
      (123,1617){-1,1}...               % 15
      (17,1884){0,1}...               % 16
      (216,2299){1,1}...{1,0}          % 17
      (1019,2565){327,83}...{327,83}          % 18
      (1346,2648){0,-82}...{0,-82}          % 19
      (1346,2566){1,0}...               % 20
      (1891,2509){878,-219}...          % *21
      (2224,2347){1,-1}...               % 22
      (2345,1992){0,-1}...               % 23
      (2176,1510){-1,-1}...               % 24
      (1827,1265){-341,-153}...{-341,-153}     % 25
      (1486,1112){-140,28}...{-140,28}     % 26
      (1346,1140)--cycle);               % 27

n := 8;
t1 := 0;
t2 := 4;
t3 := 7;
t4 := 9;
t5 := 10;
t6 := 11;
t7 := 13;
t8 := 17;

adj_fill.B(1)                         % fixed x points
     (1, 8)                         % fixed y points
     ((1,7), (4,1), (5,6), (6,5), (8,7))     % tied points
     ((3,5))                         % verticals
     ((2,7))                         % horizontals
     ((166,445){1,0}...               % 0
      (310,399){1,-1}...               % 1
      (370,293){102,-469}...               % 2
      (427,171){1,-1}...               % 3
      (534,136){1,0}...               % 4
      (697,209){1,1}...               % 5
      (899,586){273,946}...               % *6
      (970,1155){0,1}...{0,1272}          % 7
      (970,2427)--                    % 8
      (1346,2427){0,-1194}...{0,-1194}     % 9
      (1346,1233){0,-93}...{0,-93}          % 10
      (1346,1140){-66,-608}...          % 11
      (967,255){-1,-1}...               % 12
      (369,-38){-1,0}...               % 13
      (75,73){-1,1}...               % 14
      (-6,249){0,1}...               % 15
      (47,392){1,1}...{1,0}               % 16
      (166,445)--cycle);               % 17

n := 5;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 6;
t5 := 9;

adj_fill.C()                         % fixed x points
     (1)                         % fixed y points
     ((3,3), (4,4))                    % tied points
     ()                         % verticals
     ((2,5))                         % horizontals
     ((2596,490){-198,-305}...          % 0
      (2485,370){-1,-1}...               % 1
      (2369,312){-1,0}...               % 2
      (2282,354){-254,222}...          % 3
      (2074,664){-455,911}...{-276,773}     % *4
      (1827,1265)--                    % 5
      (1486,1112){338,-822}...          % 6
      (1824,290){338,-822}...          % 7
      (1984,19){1,-1}...               % 8
      (2164,-43){1,0}...               % 9
      (2433,106){1,1}...{160,296}          % 10
      (2658,434)--cycle);               % 11

endchar(0);

"sbus";

%charbegin( "S", 1812h#, capheight*v#, baseline );
charbegin( "S", (1812-50)*h#, capheight*v#, baseline ); % DEK

n := 20;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 6;
t5 := 8;
t6 := 11;
t7 := 16;
t8 := 18;
t9 := 20;
t10 := 22;
t11 := 23;
t12 := 26;
t13 := 28;
t14 := 31;
t15 := 35;
t16 := 37;
t17 := 39;
t18 := 41;
t19 := 43;
t20 := 45;

adj_fill.A(10)                         % fixed x points
     (1, 20)                         % fixed y points
     ((1,1), (20,1))                    % tied points
     ((9,12), (7,14), (6,15), (4,17), (2,19))% verticals
     ((10,11), (8,13), (5,16), (3,18))     % horizontals
     ((648,653){1,0}...               % 0
      (798,727){1,1}...               % 1
      (837,823){0,1}...               % 2
      (764,1000){-1,1}...               % 3
      (526,1084){-1,0}...               % 4
      (80,946){-1,-1}...               % 5
      (-78,520){0,-1}...               % 6
      (41,166){1,-1}...               % 7
      (653,-66){1,0}...               % 8
      (1124,3){808,264}...               % *9
      (1461,198){1,1}...               % 10
      (1714,756){0,1}...               % 11
      (1529,1260){-1,1}...               % 12
      (1382,1367){-545,329}...          % *13
      (984,1589){-946,522}...          % 14
      (676,1813){-1,1}...               % 15
      (520,2142){0,1}...               % 16
      (644,2405){1,1}...               % 17
      (946,2501){1,0}...               % 18
      (1229,2389){1,-1}...               % 19
      (1288,2217){0,-1}...               % 20
      (1224,2046){-1,-1}...{-269,-55}     % 21
      (1061,1973)--                    % 22
      (1070,1902){426,-73}...          % 23
      (1208,1891){1,0}...               % 24
      (1531,2036){1,1}...               % 25
      (1617,2239){0,1}...               % 26
      (1537,2463){-1,1}...               % 27
      (1024,2644){-1,0}...               % 28
      (611,2594){-683,-193}...          % *29
      (341,2451){-1,-1}...               % 30
      (191,2036){0,-1}...               % 31
      (341,1568){1,-1}...               % 32
      (783,1252){973,-509}...          % 33
      (1175,990){1,-1}...               % 34
      (1334,599){0,-1}...               % 35
      (1199,263){-1,-1}...               % 36
      (754,86){-1,0}...               % 37
      (347,241){-1,1}...               % 38
      (202,641){0,1}...               % 39
      (290,893){1,1}...               % 40
      (390,943){1,0}...               % 41
      (477,902){1,-1}...               % 42
      (516,788){69,-357}...               % 43
      (538,708){1,-1}...{1,0}          % 44
      (648,653)--cycle);               % 45

endchar(0);

"sbut";

%charbegin( "T", 2043h#, capheight*v#, baseline );
charbegin( "T", (2043+100)*h#, capheight*v#, baseline ); % DEK

n := 12;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 7;
t5 := 11;
t6 := 12;
t7 := 13;
t8 := 14;
t9 := 16;
t10 := 18;
t11 := 20;
t12 := 22;

adj_fill.A(1)                         % fixed x points
     (6, 8, 12)                    % fixed y points
     ((3,1), (6,2), (7,2))               % tied points
     ((5,9))                         % verticals
     ((4,10), (2,11))               % horizontals
     ((2332,2550){-74,-134}...          % 0
      (2258,2416){-74,-134}...          % 1
      (2023,2138){-962,-926}...          % 2
      (1892,2037){-240,-137}...          % *3
      (1783,2001){-1,0}...{-505,136}          % 4
      (1432,2084){-402,107}...{-402,107}     % 5
      (1030,2191){-330,152}...          % 6
      (489,2341){-1,0}...               % 7
      (302,2274){-1,-1}...               % 8
      (233,2117){0,-1}...               % 9
      (299,1982){414,-476}...          % 10
      (404,1787){0,-1}...{-1,-1}          % 11
      (342,1635)--                    % 12
      (342,1635){-1,-1}...               % 13
      (201,1573){-1,0}...               % 14
      (67,1626){-1,1}...               % 15
      (-16,1881){0,1}...               % 16
      (168,2318){1,1}...               % 17
      (813,2588){1,0}...               % 18
      (1432,2447){983,-316}...          % 19
      (1912,2349){1,0}...               % 20
      (2172,2487){87,100}...{87,100}          % 21
      (2259,2587)--cycle);               % 22

n := 9;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 9;
t5 := 10;
t6 := 13;
t7 := 14;
t8 := 16;
t9 := 17;

adj_fill.B(1, 8)                    % fixed x points
     (2, 7)                         % fixed y points
     ((1,3), (5,1), (9,3))               % tied points
     ((4,5))                         % verticals
     ((3,6))                         % horizontals
     ((153,408){1,1}...               % 0
      (310,467){1,0}...               % 1
      (443,415){1,-1}...               % 2
      (497,280){182,-650}...               % 3
      (540,174){1,-1}...               % 4
      (655,136){1,0}...               % 5
      (852,224){1,1}...               % 6
      (931,351){116,317}...               % 7
      (1073,993){0,1}...{0,1198}          % 8
      (1073,2191)--                    % 9
      (1432,2084){0,-945}...               % 10
      (1432,1139){0,-1}...               % 11
      (1065,205){-1,-1}...               % 12
      (1050,210){-1,-1}...               % 13
      (454,-42){-1,0}...               % 14
      (159,66){-1,1}...               % 15
      (95,278){0,1}...{1,1}               % 16
      (153,408)--cycle);               % 17

mathcorr(200h#); % DEK
endchar(0);

"sbuu"; 

%charbegin( 126, 2419h#, capheight*v#, baseline );
%charbegin( 125, 2419h#, capheight*v#, baseline ); % DEK
charbegin( "U", 2419h#, capheight*v#, baseline ); % NGB

n := 11;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 9;
t5 := 11;
t6 := 13;
t7 := 14;
t8 := 16;
t9 := 21;
t10 := 24;
t11 := 27;

adj_fill.A(1, 5, 7)                    % fixed x points
     (6, 11)                         % fixed y points
     ((1,2), (11,1))                    % tied points
     ((3,9))                         % verticals
     ((4,8), (2,10))                    % horizontals
     ((1575,367){-1,-1}...               % 0
      (1172,61){-784,-414}...          % *1
      (791,-47){-1,0}...               % 2
      (415,91){-1,1}...               % 3
      (265,576){0,1}...               % 4
      (370,1444){232,1297}...          % 5
      (423,1955){0,1}...               % 6
      (405,2124){-71,274}...               % *7
      (352,2229){-1,1}...               % 8
      (235,2286){-1,0}...               % 9
      (105,2226){-1,-1}...               % 10
      (39,1984){0,-1}...{60,-297}          % 11
      (59,1837)--                    % 12
      (-24,1803){-158,548}...          % 13
      (-69,2060){0,1}...               % 14
      (86,2503){1,1}...               % 15
      (391,2607){1,0}...               % 16
      (686,2493){1,-1}...               % 17
      (779,2323){125,-423}...          % *18
      (811,2070){0,-1}...               % 19
      (720,1320){-260,-1489}...          % 20
      (649,751){0,-1}...               % 21
      (685,464){139,-478}...               % *22
      (788,273){1,-1}...               % 23
      (1007,183){1,0}...               % 24
      (1209,243){424,232}...               % *25
      (1431,415){1,1}...{354,488}          % 26
      (1543,560)--cycle);               % 27

n := 9;
t1 := 0;
t2 := 3;
t3 := 5;
t4 := 6;
t5 := 8;
t6 := 9;
t7 := 13;
t8 := 16;
t9 := 18;

adj_fill.B(1, 6)                    % fixed x points
     (5, 9)                         % fixed y points
     ((3,2), (4,1))                    % tied points
     ((4,7))                         % verticals
     ((2,8))                         % horizontals
     ((2509,385){-167,-255}...          % 0
      (2370,169){-184,-274}...          % *1
      (2325,111){-1,-1}...               % 2
      (2002,-33){-1,0}...               % 3
      (1753,39){-1,1}...{-124,695}          % 4
      (1575,367){-32,193}...{-32,193}     % 5
      (1543,560){0,1}...{80,721}          % 6
      (1639,2283){321,201}...{475,251}     % 7
      (2233,2623)--                    % 8
      (2322,2570){-371,-234}...          % 9
      (2173,2437){-1,-1}...               % 10
      (2083,2279){-156,-423}...          % *11
      (2017,2014){-123,-735}...          % 12
      (1940,1048){0,-1}...               % 13
      (1983,524){164,-814}...          % *14
      (2104,234){1,-1}...               % 15
      (2191,199){1,0}...               % 16
      (2331,288){1,1}...{231,357}          % 17
      (2450,455)--cycle);               % 18

endchar(0);

"sbuv";

charbegin( "V", 2261h#, capheight*v#, baseline );

n := 12;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 8;
t5 := 13;
t6 := 15;
t7 := 16;
t8 := 18;
t9 := 22;
t10 := 25;
t11 := 27;
t12 := 29;

adj_fill.A(1)                         % fixed x points
     (4, 6, 9, 12)                    % fixed y points
     ()                         % tied points
     ((6,7), (3,10))                    % verticals
     ((5,8), (2,11))                    % horizontals
     ((1279,2110){56,259}...               % 0
      (1453,2438){1,1}...               % 1
      (1818,2589){1,0}...               % 2
      (2137,2472){1,-1}...               % 3
      (2249,2199){0,-1}...               % 4
      (2114,1733){-529,-1191}...          % *5
      (1720,1008){-835,-1356}...{-192,-633}     % 6
      (1205,62){-280,-123}...{-280,-123}     % 7
      (925,-61){-43,3}...{-43,3}          % 8
      (882,-58){-74,520}...               % 9
      (677,1236){-296,1492}...          % 10
      (522,1935){-292,978}...          % *11
      (385,2214){-1,1}...               % 12
      (275,2267){-1,0}...               % 13
      (173,2224){-1,-1}...{-70,-287}          % 14
      (65,1976)--                    % 15
      (-11,1984){0,1}...               % 16
      (196,2515){1,1}...               % 17
      (442,2596){1,0}...               % 18
      (661,2509){1,-1}...               % 19
      (838,2187){320,-886}...          % *20
      (981,1623){215,-1187}...{215,-1187}     % 21
      (1196,436){374,586}...               % 22
      (1570,1022){374,586}...          % 23
      (1812,1502){325,902}...          % *24
      (1895,1924){0,1}...               % 25
      (1789,2218){-1,1}...               % 26
      (1592,2293){-1,0}...               % 27
      (1467,2240){-242,-199}...{-151,-266}     % *28
      (1350,2094)--cycle);               % 29

endchar(0);

"sbuw";

charbegin( "W", 3463h#, capheight*v#, baseline );

n := 15;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 7;
t5 := 11;
t6 := 12;
t7 := 19;
t8 := 22;
t9 := 24;
t10 := 28;
t11 := 31;
t12 := 32;
t13 := 34;
t14 := 36;
t15 := 38;

adj_fill.A(1, 8, 12)                    % fixed x points
     (8)                         % fixed y points
     ()                         % tied points
     ((3,14))                    % verticals
     ((7,9), (6,10), (5,11), (4,13), (2,15))     % horizontals
     ((2541,2309){213,279}...          % 0
      (2636,2437){1,1}...               % 1
      (3060,2627){1,0}...               % 2
      (3306,2533){1,-1}...               % 3
      (3438,2102){0,-1}...               % 4
      (3335,1694){-404,-1048}...          % *5
      (3034,1054){-469,-882}...{-219,-620}     % 6
      (2617,104){-242,-116}...{-242,-116}     % 7
      (2375,-12){-30,11}...{-30,11}          % 8
      (2345,-1){-23,280}...               % 9
      (2042,1123){-323,723}...{-179,574}     % 10
      (1808,1692){-115,-250}...{-276,-723}     % 11
      (1120,58){-293,-89}...{-293,-89}     % 12
      (827,-31){-38,42}...{-38,42}          % 13
      (789,11){-6,419}...               % 14
      (783,430){-6,419}...               % 15
      (688,1614){-336,1791}...          % *16
      (585,1991){-240.9,607.1}...          % *17
      (447,2221){-1,1}...               % 18
      (317,2278){-1,0}...               % 19
      (179,2218){-1,-1}...{-64,-320}          % 20
      (68,1988)--                    % 21
      (-13,1981){0,1}...               % 22
      (174,2473){1,1}...               % 23
      (487,2604){1,0}...               % 24
      (786,2483){1,-1}...               % 25
      (1024,1983){338,-1346}...          % *26
      (1124,1137){15,-616}...{15,-616}     % 27
      (1139,521){348,738}...               % 28
      (1487,1259){348,738}...{45,370}     % 29
      (1784,2458){262,144}...{262,144}     % 30
      (2046,2602){39,-21}...{39,-21}          % 31
      (2085,2581){0,-1}...               % 32
      (2394,1245){197,-391}...{127,-439}     % 33
      (2669,605){326,640}...               % 34
      (3000,1344){443,1223}...          % *35
      (3112,1828){0,1}...               % 36
      (2959,2287){-1,1}...               % 37
      (2805,2349){-1,0}...{-263,-223}     % 38
      (2597,2261)--cycle);               % 39

endchar(0);

"sbux";

charbegin( "X", 2454h#, capheight*v#, baseline );

n := 15;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 6;
t5 := 10;
t6 := 13;
t7 := 15;
t8 := 16;
t9 := 17;
t10 := 19;
t11 := 21;
t12 := 24;
t13 := 25;
t14 := 28;
t15 := 30;

adj_fill.A(1)                         % fixed x points
     (7, 9, 15)                    % fixed y points
     ((3,1), (4,2), (7,3), (8,3), (12,4), (13,5))% tied points
     ((6,10))                    % verticals
     ((5,11), (2,14))               % horizontals
     ((2387,609){-59,-287}...          % 0
      (2162,110){-1,-1}...               % 1
      (1805,-35){-1,0}...               % 2
      (1515,62){-1,1}...               % 3
      (1317,383){-323,804}...{-132,857}     % *4
      (1192,866){-65,288}...{-65,288}     % 5
      (1127,1154){-88,777}...          % 6
      (979,1953){-364,1241}...          % *7
      (878,2223){-216,441.6}...          % *8
      (763,2395){-1,1}...               % 9
      (553,2479){-1,0}...               % 10
      (438,2428){-1,-1}...               % 11
      (382,2288){0,-1}...               % 12
      (386,2186){46,-434}...               % 13
      (404,2069){0,-1}...{-1,-1}          % 14
      (349,1947)--                    % 15
      (349,1947){-1,-1}...               % 16
      (190,1866){-1,0}...               % 17
      (44,1940){-1,1}...               % 18
      (-12,2100){0,1}...               % 19
      (145,2415){1,1}...               % 20
      (712,2635){1,0}...               % 21
      (1169,2475){1,-1}...               % 22
      (1298,2257){253,-599}...{133,-515}     % *23
      (1422,1876){49,-374}...{49,-374}     % 24
      (1471,1502){92,-775}...          % 25
      (1620,740){371,-1196}...          % *26
      (1842,306){1,-1}...               % 27
      (1997,256){1,0}...               % 28
      (2146,314){1,1}...{88,341}          % 29
      (2301,626)--cycle);               % 30

n := 9;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 4;
t5 := 7;
t6 := 8;
t7 := 11;
t8 := 13;
t9 := 14;

adj_fill.B()                         % fixed x points
     (2, 9)                         % fixed y points
     ((1,6), (5,2), (6,1), (9,6))          % tied points
     ((3,8))                         % verticals
     ((4,7))                         % horizontals
     ((77,419){1,1}...               % 0
      (192,469){1,0}...               % 1
      (322,427){1,-1}...               % 2
      (385,252){65,-419}...               % 3
      (477,131){1,0}...               % 4
      (668,223){1,1}...               % 5
      (921,596){459,931}...{160,575}          % *6
      (1127,1154)--                    % 7
      (1192,866){-316,-688}...          % 8
      (960,412){-427,-723}...          % *9
      (765,143){-1,-1}...               % 10
      (341,-42){-1,0}...               % 11
      (79,60){-1,1}...               % 12
      (-3,258){0,1}...{1,1}               % 13
      (77,419)--cycle);               % 14

n := 9;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 6;
t5 := 7;
t6 := 10;
t7 := 12;
t8 := 13.9;
t9 := 14;

adj_fill.C()                         % fixed x points
     (1, 8)                         % fixed y points
     ((1,7), (4,4), (5,5), (9,7))          % tied points
     ((2,7))                         % verticals
     ((3,6))                         % horizontals
     ((2254,2151){1,0}...               % 0
      (2368,2205){1,1}...               % 1
      (2434,2382){0,1}...               % 2
      (2365,2568){-1,1}...               % 3
      (2137,2636){-1,0}...               % 4
      (1798,2470){-1,-1}...{-253,-496}     % 5
      (1422,1876)--                    % 6
      (1471,1502){227,711}...          % 7
      (1680,2053){408,866}...          % *8
      (1879,2368){1,1}...               % 9
      (1980,2412){1,0}...               % 10
      (2053,2384){1,-1}...               % 11
      (2088,2293){58,-418}...          % 12
      (2133,2189){1,-1}...{-1,0}          % 13
      (2254,2151)--cycle);               % 14

endchar(0);

"sbuy";

%charbegin( "Y", 2081h#, capheight*v#, baseline );
charbegin( "Y", (2081-50)*h#, capheight*v#, baseline ); % DEK

n := 10;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 7;
t5 := 9;
t6 := 10;
t7 := 11;
t8 := 14;
t9 := 17;
t10 := 19;

adj_fill.A(1, 5, 10)                    % fixed x points
     (1, 6)                         % fixed y points
     ((1,1))                         % tied points
     ((3,8))                         % verticals
     ((4,7), (2,9))                    % horizontals
     ((1449,1665){-360,-347}...          % 0
      (1105,1369){-268,-191}...          % 1
      (859,1267){-1.858,-.02669}...          % 2
      (741,1312){-1,1}...               % 3
      (649,1922){0,1}...               % 4
      (637,2373){-73,626}...               % *5
      (576,2548){-1,1}...               % 6
      (387,2622){-1,0}...               % 7
      (105,2478){-1,-1}...{-279,-505}     % 8
      (-112,2147)--                    % 9
      (-58,2081){299,357}...               % 10
      (168,2280){1,0}...               % 11
      (234,2238){1,-1}...               % 12
      (275,2115){41,-503}...               % *13
      (275,1735){0,-1}...               % 14
      (287,1318){70,-582}...               % *15
      (345,1153){1,-1}...               % 16
      (645,1024){1,0}...               % 17
      (1059,1183){344,238}...{291,244}     % 18
      (1449,1479)--cycle);               % 19

n := 11;
t1 := 0;
t2 := 2;
t3 := 5;
t4 := 9;
t5 := 10;
t6 := 12;
t7 := 13;
t8 := 15;
t9 := 19;
t10 := 21;
t11 := 24;

adj_fill.B(1, 11)                    % fixed x points
     ()                         % fixed y points
     ((1,2), (4,2), (5,3), (6,1), (11,3))     % tied points
     ((7,8), (2,10))                    % verticals
     ((3,9), (1,11))                    % horizontals
     ((1449,964){-451,-222}...          % 0
      (944,601){-1,-1}...               % 1
      (644,-2){0,-1}...               % 2
      (660,-162){61,-256}...               % *3
      (705,-258){1,-1}...               % 4
      (880,-333){1,0}...               % 5
      (1198,-184){1,1}...               % 6
      (1384,140){251,784}...               % *7
      (1449,600){0,1}...               % 8
      (1449,964){0,2}...{0,139}          % 9
      (1449,1103){0,363}...               % 10
      (1449,1466){0,2}...               % 11
      (1449,1665){0,2}...{0,759}          % 12
      (1449,2424)--                    % 13
      (1816,2597){33,-8}...{33,-8}          % 14
      (1849,2589){0,-1451}...          % 15
      (1849,1138){0,-1}...               % 16
      (1745,347){-400,-1328}...          % *17
      (1449,-190){-1,-1}...               % 18
      (722,-499){-1,0}...               % 19
      (401,-401){-1,1}...               % 20
      (318,-148){0,1}...               % 21
      (420,221){394,754}...               % *22
      (712,606){1,1}...{404,199}          % 23
      (1449,1103)--cycle);               % 24

endchar(0);

"sbuz";

charbegin( "Z", 2232h#, capheight*v#, baseline );

n := 12;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 7;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 13;
t9 := 15;
t10 := 17;
t11 := 20;
t12 := 21;

adj_fill.A(5, 7, 12)                    % fixed x points
     (6, 8)                         % fixed y points
     ((1,2), (6,1), (7,1))               % tied points
     ((4,9))                         % verticals
     ((3,10), (2,11))               % horizontals
     ((1397,1986){-263,-175}...          % 0
      (1255,1960){-1,0}...               % 1
      (1084,2004){-383,172}...          % *2
      (872,2132){-424,311}...          % 3
      (645,2278){-378,196}...          % *4
      (494,2328){-1,0}...               % 5
      (368,2284){-1,-1}...               % 6
      (319,2156){0,-1}...               % 7
      (391,2005){314,-254}...          % 8
      (474,1941){1,-1}...               % 9
      (514,1829){0,-1}...{-1,-1}          % 10
      (466,1701)--                    % 11
      (466,1701){-1,-1}...               % 12
      (317,1622){-1,0}...               % 13
      (172,1684){-1,1}...               % 14
      (88,1921){0,1}...               % 15
      (311,2411){1,1}...               % 16
      (786,2609){1,0}...               % 17
      (974,2547){453,-242}...          % *18
      (1239,2367){404,-319}...          % 19
      (1498,2232){1,0}...{1,1}          % 20
      (1643,2296)--cycle);               % 21

n := 3;
t1 := 1;
t2 := 8;
t3 := 9;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,2), (2,3), (3,4))               % tied points
     ()                         % verticals
     ()                         % horizontals
     ((89,85){1308,1901}...{1308,1901}     % 0
      (1397,1986){243,308}...{243,308}     % 1
      (1640,2294){1,1}...{191,673}          % 2
      (1771,2547){47,10}...{47,10}          % 3
      (1818,2557)--                    % 4
      (1920,2467){5,-31}...{5,-31}          % 5
      (1925,2436){-445,-511}...          % 6
      (1540,1950){-924,-1334}...{-924,-1334}     % 7
      (616,616){-245,-393}...{-245,-393}     % 8
      (371,223){-1,-1}...{-146,-341}          % 9
      (233,2)--cycle);               % 10

n := 14;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 5;
t5 := 7;
t6 := 10;
t7 := 11;
t8 := 12;
t9 := 13;
t10 := 14;
t11 := 18;
t12 := 20;
t13 := 22;
t14 := 23;

adj_fill.C(2, 14)                    % fixed x points
     (7)                         % fixed y points
     ((1,5), (8,3), (9,4), (14,5))          % tied points
     ((4,12))                    % verticals
     ((6,10), (5,11), (3,13))          % horizontals
     ((1758,984){-1,-1}...               % 0
      (1680,819){0,-1}...               % 1
      (1739,690){1,-1}...               % 2
      (1904,626){495,-86}...               % 3
      (2029,582){1,-1}...               % 4
      (2068,472){0,-1}...               % 5
      (2006,329){-1,-1}...               % 6
      (1859,269){-1,0}...               % 7
      (1431,448){-736,434}...          % 8
      (1132,599){-515,202}...          % *9
      (916,650){-1,0}...               % 10
      (641,590){-361,-129}...{-25,26}     % 11
      (616,616)--                    % 12
      (371,223){1,1}...               % 13
      (617,322){1,0}...               % 14
      (829,278){495,-172}...               % *15
      (1112,150){821,-443}...          % 16
      (1431,-1){529,-203}...               % *17
      (1641,-53){1,0}...               % 18
      (2048,114){1,1}...               % 19
      (2239,656){0,1}...               % 20
      (2146,965){-1,1}...               % 21
      (1945,1049){-1,0}...{-1,-1}          % 22
      (1758,984)--cycle);               % 23

endchar(0);

% PUNCTUATION (copied from EUSMCH)
set_stem_round(155,157,160,180,188,201);
more_side(0);

"smminus";

%charbegin( 0, 1824h#, lcbody*v#, baseline );
charbegin( 0, 2800h#, (1233+925)*v#, (1233-925)*v#); % DEK

n := 0;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ()                         % horizontals
%     ((1754,1018){-1650,0}...{-1650,0}     % 0
%      (104,1018)--                    % 1
%      (70,874){1651,0}...{1651,0}          % 2
%      (1721,874)--cycle);               % 3
     ((2614,1018){-1650,0}...{-1650,0}     % 0 % DEK
      (230,1018)--                    % 1
      (170,874){1651,0}...{1651,0}          % 2
      (2564,874)--cycle);               % 3

endchar(0);

"sbapproximation";

charbegin( 24, 2042h#, lcbody*v#, baseline );

n := 6;
t1 := 0;
t2 := 2;
t3 := 6;
t4 := 10;
t5 := 12;
t6 := 15;

adj_fill.A()                         % fixed x points
     (1, 4)                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ((3,5), (2,6))                    % horizontals
     ((1894,1066){-76,-330}...          % 0
      (1779,886){-209,-184}...          % 1
      (1586,809){-1,0}...               % 2
      (1312,907){-271,170}...          % 3
      (1041,1077){-271,170}...          % 4
      (749,1233){-502,207}...          % *5
      (539,1284){-342,-6}...               % 6
      (409,1258){-390,-140}...          % 7
      (241,1133){-328,-369}...{-217,-426}     % *8
      (81,889)--                    % 9
      (153,860){140,262}...               % 10
      (293,1068){186,142}...               % 11
      (496,1127){1,0}...               % 12
      (791,1024){366,-233}...          % 13
      (1157,791){366,-233}...          % 14
      (1546,657){1,0}...               % 15
      (1781,757){243,204}...{117,271}     % 16
      (1962,1019)--cycle);               % 17

endchar(0);

"sband";

charbegin( 94, 2870h#, capheight*v#, baseline*v#);

n := 0;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ()                         % horizontals
     ((2843,6){-1347,2632}...{-1347,2632}     % 0
      (1496,2638){-34,5}...{-34,5}          % 1
      (1462,2643){-1421,-2605}...{-1421,-2605}% 2
      (41,38){42,-40}...{42,-40}          % 3
      (83,-2)--                    % 4
      (315,6){1137,2275}...{1137,2275}     % 5
      (1452,2281){1126,-2313}...{1126,-2313}     % 6
      (2578,-32)--cycle);               % 7

endchar(0);

"sbor";

charbegin( 95, 2870h#, capheight*v#, baseline*v#);

n := 0;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ()                         % horizontals
     ((2783,2545){14,-16}...{14,-16}          % 0
      (2797,2529){-1385,-2573}...{-1385,-2573}% 1
      (1412,-44){-55,-2}...{-55,-2}          % 2
      (1357,-46){-1334,2551}...{-1334,2551}     % 3
      (23,2505)--                    % 4
      (279,2545){1129,-2265}...{1129,-2265}     % 5
      (1408,280){1141,2265}...{1141,2265}     % 6
      (2549,2545)--cycle);               % 7

endchar(0);

"sbleftbrace";

%charbegin( 102, 1185h#, programem*v#, descender*v#);
charbegin( 102, 1185h#, .75programem*v#, .25programem*v#); % DEK

n := 7;
t1 := 0;
t2 := 1;
t3 := 4;
t4 := 8;
t5 := 9;
t6 := 13;
t7 := 16;

adj_fill.A(1, 4, 5)                    % fixed x points
     (1)                         % fixed y points
     ((1,2), (7,1))                    % tied points
     ((3,6))                         % verticals
     ((4,5), (2,7))                    % horizontals
     ((-12,959){39,97}...{39,97}          % 0
      (27,1056){1,0}...               % 1
      (305,1127){264,243}...               % 2
      (384,1343){95,773}...               % *3
      (400,1900){0,1}...               % 4
      (404,2295){49,477}...               % 5
      (495,2582){213,279}...               % 6
      (624,2675){245,80}...{1,0}          % 7
      (1081,2701)--                    % 8
      (1081,2635){-1,0}...               % 9
      (763,2598){-200,-64}...          % 10
      (665,2510){-116,-192}...          % 11
      (612,2354){-53,-336}...          % 12
      (588,1918){0,-1}...               % 13
      (564,1463){-95,-702}...          % *14
      (493,1216){-145,-219}...{-283,-54}     % 15
      (190,1011)--cycle);               % 16

n := 6;
t1 := 0;
t2 := 4;
t3 := 7;
t4 := 8;
t5 := 11;
t6 := 15;

adj_fill.B(1, 6)                    % fixed x points
     ()                         % fixed y points
     ((3,1), (4,2))                    % tied points
     ((2,5))                         % verticals
     ((3,4), (1,6))                    % horizontals
     ((1081,-594){-1,0}...               % 0
      (786,-562){-238,72}...               % 1
      (673,-474){-142,210}...          % 2
      (619,-329){-50,298}...               % 3
      (587,110){0,1}...               % 4
      (549,587){-146,759}...               % *5
      (441,869){-200,243}...{-449,99}     % 6
      (190,1011)--                    % 7
      (-12,959){1,0}...               % 8
      (190,937){324,-86}...               % *9
      (312,873){184,-204}...               % 10
      (404,124){0,-1}...               % 11
      (414,-266){41,-369}...               % 12
      (509,-551){170,-186}...          % 13
      (652,-635){351,-88}...{1,0}          % 14
      (1081,-657)--cycle);               % 15

endchar(0);

"sbrightbrace";

%charbegin( 103, 1185h#, programem*v#, descender*v#);
charbegin( 103, 1185h#, .75programem*v#, .25programem*v#); % DEK

n := 7;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 8;
t5 := 9;
t6 := 13;
t7 := 16;

adj_fill.A(2, 4, 5)                    % fixed x points
     (1)                         % fixed y points
     ((1,2), (7,1))                    % tied points
     ((3,6))                         % verticals
     ((4,5), (2,7))                    % horizontals
     ((1138,972){51,89}...{51,89}          % 0
      (1189,1061){-1,0}...               % 1
      (960,1094){-363,123}...          % *2
      (826,1184){-194,295}...          % 3
      (771,1398){-65,744}...               % *4
      (761,1928){0,1}...               % 5
      (661,2599){-331,393}...          % 6
      (462,2686){-583,118}...{-1,0}          % *7
      (78,2717)--                    % 8
      (78,2653){1,0}...               % 9
      (325,2631){385,-83}...               % *10
      (463,2570){229,-240}...          % 11
      (545,2351){109,-647}...          % *12
      (572,1923){0,-1}...               % 13
      (610,1448){149,-750}...          % *14
      (721,1173){230,-260}...{225,-57}     % 15
      (996,1012)--cycle);               % 16

n := 6;
t1 := 0;
t2 := 3;
t3 := 6;
t4 := 7;
t5 := 10;
t6 := 13;

adj_fill.B(1, 6)                    % fixed x points
     ()                         % fixed y points
     ((3,1), (4,2))                    % tied points
     ((2,5))                         % verticals
     ((3,4), (1,6))                    % horizontals
     ((78,-589){1,0}...               % 0
      (334,-570){400,75}...               % *1
      (478,-514){247,220}...               % 2
      (584,113){0,1}...               % 3
      (621,600){142,757}...               % *4
      (726,870){347,374}...{384,85}          % 5
      (996,1012)--                    % 6
      (1138,972){-1,0}...               % 7
      (875,905){-234,-204}...          % 8
      (797,695){-91,-784}...               % *9
      (784,121){0,-1}...               % 10
      (756,-330){-114,-680}...          % *11
      (670,-559){-267,-277}...{-1,0}          % 12
      (78,-656)--cycle);               % 13

endchar(0);

"sbverticalbar";

%charbegin( 106, 790h#, programem*v#, baseline*v#);
%charbegin( 106, 790h#, .75programem*v#, .75programem*v#); % DEK
charbegin( 106, 790h#, .75programem*v#, .25programem*v#); % NGB

n := 0;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ()                         % horizontals
%     ((320,2604){0,-2736}...{0,-2736}     % 0
%      (320,-132)--                    % 1
%      (447,-90){0,2753}...{0,2753}          % 2
%      (447,2663)--cycle);               % 3
     ((320,2660){0,-2736}...{0,-2736}     % 0 % DEK
      (320,-635)--                    % 1
      (447,-590){0,2753}...{0,2753}          % 2
      (447,2730)--cycle);               % 3

endchar(0);

"sbbackslash";

%charbegin( 110, 1843h#, programem*v#, descender*v#);
charbegin( 110, 1858h#, .75programem*v#, .25programem*v#); % DEK

numeric a[],b[],alpha,beta;
pair vec;
.5[b0,b3]=.75programem-120;  .5[b1,b2]=-.25programem+250;
b0-b3=-63; b1-b2=-85;
.5[a0,a3]=206; .5[a1,a2]=1650;
vec=(.5[a0-a1,a3-a2],.5[b0-b1,b3-b2]);
(a3,b3)-(a2,b2)=alpha*vec;
(a1,b1)=beta*vec+(a2,b2)+145*(unitvector vec rotated 90);

n := 0;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ()                         % horizontals
%     ((1740,-277){-1745,2961}...{-1745,2961}     % 0
%      (-5,2684)--                    % 1
%      (95,2731){1753,-2989}...{1753,-2989}     % 2
%      (1848,-258)--cycle);               % 3
     ((a0,b0)--                    % 0 % DEK
      (a1,b1)--                    % 1
      (a2,b2)--                    % 2
      (a3,b3)--cycle);               % 3

endchar(0);

"sbss";          %bold section sign, \s

charbegin( 120, 1907h#, depthy*v#, baseline*v#);

n := 13;
t1 := 0;
t2 := 1;
t3 := 4;
t4 := 5;
t5 := 6;
t6 := 8;
t7 := 11;
t8 := 13;
t9 := 14;
t10 := 17;
t11 := 19;
t12 := 24;
t13 := 25;

adj_fill.A()                         % fixed x points
     (8, 13)                         % fixed y points
     ((1,3), (3,1), (4,2))               % tied points
     ((7,9), (5,11), (2,12))               % verticals
     ((6,10))                    % horizontals
     ((1426,616){198,265}...               % 0
      (1504,859){0,1}...               % 1
      (1370,1129){-1,1}...               % 2
      (1013,1336){-579,265}...          % 3
      (519,1615){-249,293}...          % 4
      (442,1716){-66,219}...               % 5
      (404,1941){0,1}...               % 6
      (585,2418){1,1}...               % 7
      (1031,2594){1,0}...               % 8
      (1237,2570){338,-91}...          % *9
      (1369,2503){1,-1}...               % 10
      (1469,2302){0,-1}...{-57,-276}          % 11
      (1446,2164)--                    % 12
      (1228,2088){-54,38}...{-54,38}          % 13
      (1174,2126){0,1}...               % 14
      (1155,2297){-73,279}...          % *15
      (1101,2405){-1,1}...               % 16
      (922,2474){-1,0}...               % 17
      (708,2364){-1,-1}...               % 18
      (614,2077){0,-1}...               % 19
      (709,1828){1,-1}...               % 20
      (780,1776){404,-234}...          % *21
      (1113,1594){1.733,-.9989}...          % 22
      (1533,1353){1,-1}...               % 23
      (1668,1053){0,-1}...{-330,-344}     % 24
      (1478,555)--cycle);               % 25

n := 11;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 8;
t5 := 9;
t6 := 10;
t7 := 11;
t8 := 14;
t9 := 15;
t10 := 17;
t11 := 19;

adj_fill.B()                         % fixed x points
     (1)                         % fixed y points
     ((5,2), (6,1), (8,3))               % tied points
     ((4,7), (3,9), (1,11))               % verticals
     ((2,10))                    % horizontals
     ((496,195){1,-482}...               % 0
      (618,-166){1,-1}...               % 1
      (911,-270){1,0}...               % 2
      (1225,-126){1,1}...               % 3
      (1321,178){0,1}...               % 4
      (1211,417){-1,1}...               % 5
      (797,650){-1113,520}...          % 6
      (399,886){-1,1}...               % 7
      (264,1250){0,1}...{301,424}          % 8
      (442,1716)--                    % 9
      (519,1615){-364,-450}...          % 10
      (406,1379){0,-1}...               % 11
      (504,1154){1,-1}...               % 12
      (904,912){843,-393}...               % 13
      (1426,616){235,-235}...          % 14
      (1544,277){0,-1}...               % 15
      (1351,-195){-1,-1}...               % 16
      (876,-395){-1,0}...               % 17
      (349,-223){-1,1}...{-60,553}          % 18
      (207,86)--cycle);               % 19

endchar(0);

"rbnot";     %logical not sign

charbegin( 58, 2534h#, lcbody*v#, baseline*v#);

n := 4;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;

adj_fill.A()                         % fixed x points
     (1)                         % fixed y points
     ()                         % tied points
     ((2,3))                         % verticals
     ((3,4))                         % horizontals
     ((2321,760){0,757}...{0,757}          % 0
      (2321,1517){-2224,0}...{-2224,0}     % 1
      (97,1517)--                    % 2
      (97,1297){1861,0}...               % 3
      (1958,1297){1,0}...               % 4
      (2086,1285){1.395,-1.01}...          % 5
      (2113,1223){56,-456}...{53,-456}     % 6
      (2166,767)--cycle);               % 7

endchar(0);

% FRAKTUR copied from EUFBCH
set_stem_round(300,320,340,340,360,390);
more_side(100h#);

"FBUR";

charbegin( 60, 2866h#, capheight*v#, baseline*v#);

n := 16;
t1 := 2;
t2 := 6;
t3 := 7;
t4 := 8;
t5 := 9;
t6 := 11;
t7 := 13;
t8 := 17;
t9 := 19;
t10 := 20;
t11 := 22;
t12 := 26;
t13 := 28;
t14 := 31;
t15 := 36;
t16 := 37;

adj_fill.A(9, 16)                    % fixed x points
     (10)                         % fixed y points
     ((2,1), (3,2), (4,3), (5,4))          % tied points
     ((8,11), (7,12), (4,14))          % verticals
     ((6,13), (1,15))               % horizontals
     ((74,-2){1,1}...               % 0
      (218,120){251,165}...               % *1
      (325,163){1,0}...               % 2
      (439,109){273,-206}...{415,-468}     % *3
      (598,-43){694,598}...{694,598}          % 4
      (1292,555){152,300}...{70,519}          % 5
      (1530,1277){8,106}...{8,106}          % 6
      (1538,1383){14,282}...{-35,697}     % 7
      (1543,1909){-40,215}...{-40,215}     % 8
      (1503,2124){-118,349}...          % 9
      (1321,2410){-1,1}...               % 10
      (832,2610){-1,0}...               % 11
      (233,2333){-1,-1}...               % 12
      (-4,1882){0,-1}...               % 13
      (43,1732){181,-332}...               % *14
      (177,1550){300,-331}...          % 15
      (274,1418){131,-241}...          % *16
      (308,1309){0,-1}...               % 17
      (229,1145){-1,-1}...{-399,-283}     % 18
      (92,1027)--                    % 19
      (150,970){402,238}...               % 20
      (529,1233){1,1}...               % 21
      (665,1506){0,1}...               % 22
      (622,1640){-168,306}...          % *23
      (497,1812){-470,538}...          % 24
      (344,2013){-206,335}...          % *25
      (291,2147){0,1}...               % 26
      (364,2275){1,1}...               % 27
      (547,2352){1,0}...               % 28
      (883,2190){1,-1}...               % 29
      (1078,1853){263,-810}...          % *30
      (1146,1380){0,-1}...               % 31
      (1096,758){-193,-965}...          % *32
      (953,415){-1,-1}...{-198,-169}          % 33
      (835,308){-233,261}...               % 34
      (672,466){-274,212}...               % *35
      (561,520){-1,0}...{-239,-279}          % 36
      (23,55)--cycle);               % 37

n := 6;
t1 := 0;
t2 := 7;
t3 := 9;
t4 := 10;
t5 := 12;
t6 := 17;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,5), (3,4), (4,3), (6,2))          % tied points
     ()                         % verticals
     ((2,5))                         % horizontals
     ((2200,1544){234,168}...{514,254}     % 0
      (2861,1916){-20,51}...{-20,51}          % 1
      (2841,1967){-412,-98}...          % 2
      (2725,1948){-1,0}...               % 3
      (2585,1992){-1,1}...               % 4
      (2518,2234){-65,637}...          % 5
      (2431,2511){-1,1}...               % 6
      (2218,2595){-1,0}...               % 7
      (1876,2471){-715,-471}...{-455,-550}     % *8
      (1503,2124)--                    % 9
      (1543,1909){156,386}...          % 10
      (1740,2227){428,438}...          % *11
      (1971,2347){1,0}...               % 12
      (2073,2292){1,-1}...               % 13
      (2140,2049){95,-648}...          % 14
      (2211,1813){208,-227}...{267,8}     % 15
      (2347,1756){-589,-321}...{-232,-77}     % 16
      (1538,1383)--cycle);               % 17

n := 9;
t1 := 1;
t2 := 4;
t3 := 6;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 13;
t8 := 14;
t9 := 15;

adj_fill.C(9)                         % fixed x points
     ()                         % fixed y points
     ((3,5), (4,2), (5,1))               % tied points
     ((2,7))                         % verticals
     ((3,6), (1,8))                    % horizontals
     ((2960,410){-292,-162}...          % 0
      (2827,359){-1,0}...               % 1
      (2718,383){-285,288}...          % 2
      (2598,543){-215,346}...          % 3
      (2517,774){-56,414}...{21,797}          % 4
      (2499,1417){-174,100}...{-395,136}     % 5
      (2200,1544){-662,-161}...{-662,-161}     % 6
      (1538,1383)--                    % 7
      (1530,1277){496,116}...          % 8
      (1714,1294){1,0}...               % 9
      (1856,1281){316,-74}...          % 10
      (2079,1161){1,-1}...               % 11
      (2143,974){72,-703}...{0,-1}          % *12
      (2151,458){290,-469}...{96,-228}     % 13
      (2429,-46){536,373}...{536,373}     % 14
      (2965,327)--cycle);               % 15

endchar(0);

"FBUI";

charbegin( 61,1853h#, capheight*v#, baseline*v#);

n := 7;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 8;
t5 := 9;
t6 := 11;
t7 := 13;

adj_fill.A()                         % fixed x points
     (1, 4, 5)                    % fixed y points
     ()                         % tied points
     ()                         % verticals
     ((3,6), (2,7))                    % horizontals
     ((1826,2540){-296,-285}...          % 0
      (1630,2390){-364,-203}...          % *1
      (1462,2337){-1,0}...               % 2
      (1113,2461){-502,216}...          % 3
      (701,2587){-1,0}...               % 4
      (356,2451){-281,-260}...          % 5
      (193,2225){-358,-626}...{-230,-535}     % *6
      (-2,1825)--                    % 7
      (56,1763){24,0}...{24,0}          % 8
      (80,1763){219,417}...               % 9
      (279,2065){1,1}...               % 10
      (550,2178){1,0}...               % 11
      (866,2118){719,-235}...{387,-59}     % 12
      (1240,2013){575,332}...{249,231}     % 13
      (1853,2483)--cycle);               % 14

n := 8;
t1 := 0;
t2 := 1;
t3 := 1.188;
t4 := 4;
t5 := 7;
t6 := 10;
t7 := 15;
t8 := 17;

adj_fill.B(1)                         % fixed x points
     (2, 3, 6)                    % fixed y points
     ()                         % tied points
     ((5,7))                         % verticals
     ((4,8))                         % horizontals
     ((19,66){242,291}...               % 0
      (503,563){550,505}...{30,-18}          % 1
      (533,545){204,-467}...               % 2
      (750,219){1,-1}...               % 3
      (904,169){1,0}...               % 4
      (1087,268){1,1}...               % 5
      (1179,449){124,466}...               % *6
      (1211,734){0,1}...               % 7
      (1173,1149){-91,903}...{79,633}     % 8
      (1169,1662){285,363}...{433,309}     % 9
      (1726,2199)--                    % 10
      (1802,2161){-453,-390}...          % 11
      (1606,1943){-265,-416}...          % *12
      (1537,1745){0,-1}...               % 13
      (1558,1478){146,-960}...          % 14
      (1612,939){0,-1}...               % 15
      (1399,330){-1,-1}...               % 16
      (638,-33){-1,0}...{-320,270}          % 17
      (235,142){-175,-129}...{-175,-129}     % 18
      (60,13)--cycle);               % 19

endchar(0);


endinput;

% ALTERNATE CHARACTERS
set_stem_round(375,380,395,395,400,420);

"smuia"; 

%charbegin( 125, 1633h#, capheight*v#, baseline );
charbegin( 123, 1633h#, capheight*v#, baseline ); % DEK

n := 9;
t1 := 1;
t2 := 2;
t3 := 6;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 11;
t8 := 14;
t9 := 15;

adj_fill.A(9)                         % fixed x points
     (4, 6)                         % fixed y points
     ((1,3), (2,1), (4,2), (5,2))          % tied points
     ((3,7))                         % verticals
     ((1,8))                         % horizontals
     ((1270,2485){-242,-57}...{-242,-57}     % 0
      (1028,2428){-393,-27}...{-393,-27}     % 1
      (635,2401){-577,-107}...          % 2
      (308,2261){-1,-1}...               % 3
      (255,2168){0,-1}...               % 4
      (278,2034){215,-598}...          % 5
      (326,1897){0,-1}...{-1,-1}          % 6
      (274,1752)--                    % 7
      (274,1752){-1,-1}...               % 8
      (138,1699){-1,0}...               % 9
      (-3,1755){-1,1}...               % 10
      (-62,1961){0,1}...               % 11
      (115,2311){1,1}...               % 12
      (480,2508){913,266}...               % *13
      (1028,2577){1,0}...{355,-37}          % 14
      (1328,2558)--cycle);               % 15

n := 5;
t1 := 0;
t2 := 1;
t3 := 5;
t4 := 6;
t5 := 9;

adj_fill.B(1)                         % fixed x points
     ()                         % fixed y points
     ((1,5), (3,1), (4,3), (5,4))          % tied points
     ((3,4), (2,5))                    % verticals
     ()                         % horizontals
     ((275,306){186,0}...               % 0
      (461,306){1,0}...               % 1
      (615,360){1,1}...               % 2
      (636,425){20,280}...               % *3
      (635,640){0,1}...{0,1761}          % 4
      (635,2401)--                    % 5
      (1028,2428){0,-1301}...          % 6
      (1028,1127){0,-1}...               % 7
      (933,606){-130,-238}...{-1,-1}          % 8
      (703,306)--cycle);               % 9

n := 3;
t1 := 0;
t2 := 1;
t3 := 7;

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,5), (2,4))                    % tied points
     ()                         % verticals
     ((2,3))                         % horizontals
     ((275,306){428,0}...{428,0}          % 0
      (703,306){311,0}...               % 1
      (1014,306){1,0}...{345,222}          % 2
      (1399,426)--                    % 3
      (1430,371){-1,-1}...               % 4
      (1237,189){-193,-182}...          % 5
      (822,0){-1,0}...{-768,0}          % 6
      (54,0)--cycle);               % 7

endchar(0);

"sbuua";  % '175

%charbegin( "U", 2444h#, capheight*v#, baseline );
charbegin( 125, 2444h#, capheight*v#, baseline ); %NGB

n := 11;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 8;
t5 := 10;
t6 := 11;
t7 := 13;
t8 := 15;
t9 := 18;
t10 := 20;
t11 := 22;

adj_fill.A(6, 8, 11)                    % fixed x points
     (5, 11)                         % fixed y points
     ((1,2), (11,1))                    % tied points
     ((3,9))                         % verticals
     ((4,7), (2,10))                    % horizontals
     ((1544,394){-220,-263}...          % 0
      (1153,55){-795,-459}...          % *1
      (749,-65){-1,0}...               % 2
      (320,81){-1,1}...               % 3
      (189,437){0,1}...               % 4
      (344,1455){227,1145}...          % 5
      (424,2106){0,1}...               % 6
      (370,2290){-1,1}...               % 7
      (243,2362){-1,0}...               % 8
      (124,2313){-1,-1}...{-150,-241}     % 9
      (-13,2131)--                    % 10
      (-75,2176){165,445}...               % 11
      (93,2494){1,1}...               % 12
      (426,2618){1,0}...               % 13
      (717,2506){1,-1}...               % 14
      (830,2188){0,-1}...               % 15
      (803,1987){-150,-730}...          % *16
      (680,1458){-310,-1319}...          % 17
      (573,665){0,-1}...               % 18
      (729,204){1,-1}...               % 19
      (943,136){1,0}...               % 20
      (1329,342){1,1}...{162,295}          % 21
      (1549,661)--cycle);               % 22

n := 9;
t1 := 0;
t2 := 4;
t3 := 7;
t4 := 9;
t5 := 10;
t6 := 12;
t7 := 15;
t8 := 16;
t9 := 19;

adj_fill.B(1, 5)                    % fixed x points
     (4, 9)                         % fixed y points
     ((7,2), (8,1))                    % tied points
     ((2,8))                         % verticals
     ((3,6))                         % horizontals
     ((2182,2544){-100,-83}...          % 0
      (2082,2461){-100,-83}...          % 1
      (1974,2229){-146,-665}...          % *2
      (1936,1796){0,-1}...               % 3
      (1934,847){0,-1}...               % 4
      (1946,395){73,-628}...               % *5
      (2007,219){1,-1}...               % 6
      (2073,183){1,0}...               % 7
      (2213,250){1,1}...{229,345}          % 8
      (2318,385)--                    % 9
      (2375,322){-255,-442}...          % 10
      (2233,110){-1,-1}...               % 11
      (1847,-66){-1,0}...               % 12
      (1671,12){-1,1}...               % 13
      (1587,162){-127,382}...{-28,376}     % *14
      (1544,394){5,267}...{5,267}          % 15
      (1549,661){0,1}...               % 16
      (1550,2054){1,1393}...{-193,415}     % 17
      (1508,2223){479,342}...{107,64}     % 18
      (2110,2598)--cycle);               % 19

endchar(0);

"sbuub";      % '176

%charbegin( 127, 2419h#, capheight*v#, baseline );
charbegin( 126, 2419h#, capheight*v#, baseline ); % DEK
n := 12;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 6;
t5 := 9;
t6 := 11;
t7 := 12;
t8 := 15;
t9 := 18;
t10 := 20;
t11 := 23;
t12 := 26;

adj_fill.A(1)                         % fixed x points
     (6, 12)                         % fixed y points
     ((1,2), (12,1))                    % tied points
     ((6,7), (4,9), (3,10))               % verticals
     ((5,8), (2,11))                    % horizontals
     ((1575,367){-1,-1}...               % 0
      (1172,61){-784,-414}...          % *1
      (791,-47){-1,0}...               % 2
      (415,91){-1,1}...               % 3
      (265,576){0,1}...               % 4
      (370,1444){232,1297}...          % 5
      (423,1955){0,1}...               % 6
      (405,2124){-71,274}...               % *7
      (352,2229){-1,1}...               % 8
      (235,2286){-1,0}...               % 9
      (105,2226){-1,-1}...{0,-1}          % 10
      (34,1984)--                    % 11
      (-45,1990){-158,548}...          % 12
      (-69,2060){0,1}...               % 13
      (95,2494){1,1}...               % 14
      (410,2607){1,0}...               % 15
      (686,2493){1,-1}...               % 16
      (779,2323){125,-423}...          % *17
      (811,2070){0,-1}...               % 18
      (720,1320){-260,-1489}...          % 19
      (649,751){0,-1}...               % 20
      (685,464){139,-478}...               % *21
      (788,273){1,-1}...               % 22
      (1007,183){1,0}...               % 23
      (1209,243){424,232}...               % *24
      (1431,415){1,1}...{354,488}          % 25
      (1543,560)--cycle);               % 26

n := 9;
t1 := 0;
t2 := 3;
t3 := 5;
t4 := 6;
t5 := 8;
t6 := 9;
t7 := 13;
t8 := 16;
t9 := 18;

adj_fill.B(1, 6)                    % fixed x points
     (5, 9)                         % fixed y points
     ((3,2), (4,1))                    % tied points
     ((4,7))                         % verticals
     ((2,8))                         % horizontals
     ((2509,385){-167,-255}...          % 0
      (2370,169){-184,-274}...          % *1
      (2325,111){-1,-1}...               % 2
      (2002,-33){-1,0}...               % 3
      (1753,39){-1,1}...{-124,695}          % 4
      (1575,367){-32,193}...{-32,193}     % 5
      (1543,560){0,1}...{80,721}          % 6
      (1639,2283){321,201}...{475,251}     % 7
      (2233,2623)--                    % 8
      (2322,2570){-371,-234}...          % 9
      (2173,2437){-1,-1}...               % 10
      (2083,2279){-156,-423}...          % *11
      (2017,2014){-123,-735}...          % 12
      (1940,1048){0,-1}...               % 13
      (1983,524){164,-814}...          % *14
      (2104,234){1,-1}...               % 15
      (2191,199){1,0}...               % 16
      (2331,288){1,1}...{231,357}          % 17
      (2450,455)--cycle);               % 18

endchar(0);

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to webmaster@9p.io.