trunk/Master/texmf-dist/fonts/source

git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 3551 insertions, 0 deletions

diff --git a/Master/texmf-dist/fonts/source/public/ams/eusmch.mf b/Master/texmf-dist/fonts/source/public/ams/eusmch.mf
new file mode 100644
index 00000000000..5f32b4b4b67
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/ams/eusmch.mf
@@ -0,0 +1,3551 @@
+%% @metafontfile{
+%%     filename="eusmch.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 = "16161 3551 10775 116461"
+%%     keywords="amsfonts, tex, metafont , euler ",
+%%     abstract="This is the driver file for use with 
+%%            the Euler script medium 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 Medium
+
+% ----- 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 SCRIPT MEDIUM PARAMETERS
+
+%     These all in bitpad numbers (.001"):
+
+     programem =      3700;     
+     baseline  =     0;
+     ascender  =     capheight;
+     descender =     700;
+     depthy    =     700;     % depthy   =     500;
+     capheight =     2600;
+      lcbody    =     1700;     %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(1, 6)                    % fixed x points
+     ()                         % fixed y points
+     ((3,3), (4,4))                    % tied points
+     ((2,5))                         % 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 := 1;
+t2 := 3;
+t3 := 4;
+t4 := 7;
+t5 := 8;
+t6 := 10;
+t7 := 12;
+
+adj_fill.C()                         % fixed x points
+     ()                         % fixed y points
+     ((2,5), (3,6))                    % tied points
+     ((4,5), (1,7))                    % 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,6), (3,2), (4,1), (6,5))          % 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(230,350,270,270,290,310);
+
+"smua";
+
+charbegin( "A", 2653h#, capheight*v#, baseline );
+
+n := 11;
+t1 := 0;
+t2 := 1;
+t3 := 4;
+t4 := 5;
+t5 := 7;
+t6 := 9;
+t7 := 11;
+t8 := 12;
+t9 := 14;
+t10 := 18;
+t11 := 25;
+
+adj_fill.A(1)                         % fixed x points
+     (7, 8)                         % fixed y points
+     ((1,5), (2,1), (3,2), (4,3), (7,4), (8,4))% tied points
+     ((6,9))                         % verticals
+     ((5,10), (1,11))               % horizontals
+     ((2199,2519){-377,-119}...{-377,-119}     % 0
+      (1822,2400){-207,-62}...          % 1
+      (1626,2292){-1,-1}...               % 2
+      (1382,1870){-527,-1261}...{-126,-432}     % *3
+      (1099,1031){-78,-158}...{-78,-158}     % 4
+      (1021,873){-174,-335}...          % 5
+      (579,139){-1,-1}...               % 6
+      (200,-36){-1,0}...               % 7
+      (-32,57){-1,1}...               % 8
+      (-131,313){0,1}...               % 9
+      (-74,450){1,1}...{1,0}               % 10
+      (38,485)--                    % 11
+      (38,485){1,0}...               % 12
+      (152,434){1,-1}...               % 13
+      (177,367){0,-1}...               % 14
+      (169,307){-100,-540}...          % 15
+      (158,217){0,-1}...               % 16
+      (196,151){1,-1}...               % 17
+      (290,116){1,0}...               % 18
+      (447,198){1,1}...               % 19
+      (617,473){478,1040}...{413,1047}     % *20
+      (925,1238){422,1046}...          % 21
+      (1243,1937){583,1093}...          % *22
+      (1508,2331){1,1}...               % 23
+      (1787,2488){683,212}...{1,0}          % *24
+      (2191,2543)--cycle);               % 25
+
+n := 9;
+t1 := 0;
+t2 := 2;
+t3 := 6;
+t4 := 7;
+t5 := 9;
+t6 := 10;
+t7 := 13;
+t8 := 16;
+t9 := 18;
+
+adj_fill.B(1)                         % fixed x points
+     (9)                         % fixed y points
+     ((3,6), (4,7), (5,1), (6,5))          % tied points
+     ((4,7))                         % verticals
+     ((2,8))                         % horizontals
+     ((2631,306){-1,-1}...               % 0
+      (2310,40){-569,-360}...          % *1
+      (2062,-54){-1,0}...               % 2
+      (1927,-4){-1,1}...               % 3
+      (1873,107){-73,291}...               % *4
+      (1854,287){0,1}...{0,1}          % 5
+      (1852,873){-3,158}...{-3,158}          % 6
+      (1849,1031){-10,1338}...{-10,1338}     % 7
+      (1839,2369){-17,31}...{-17,31}          % 8
+      (1822,2400)--                    % 9
+      (2199,2519){-40,-38}...          % 10
+      (2159,2481){-40,-38}...          % 11
+      (2106,2371){-54,-763}...          % 12
+      (2093,1259){0,-1}...               % 13
+      (2119,476){74,-840}...               % 14
+      (2205,229){1,-1}...               % 15
+      (2289,206){1,0}...               % 16
+      (2425,251){296,172}...{1,1}          % *17
+      (2585,378)--cycle);               % 18
+
+n := 4;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 3;
+
+adj_fill.C()                         % fixed x points
+     ()                         % fixed y points
+     ((1,7), (2,2), (3,3), (4,6))          % tied points
+     ()                         % verticals
+     ((2,3))                         % horizontals
+     ((1849,1031){-750,0}...{-750,0}          % 0
+      (1099,1031)--                    % 1
+      (1021,873){831,0}...{831,0}          % 2
+      (1852,873)--cycle);               % 3
+
+endchar(0);
+
+"smub";
+
+charbegin( "B", 2618h#, capheight*v#, baseline );
+n := 7;
+t1 := 0;
+t2 := 3;
+t3 := 4;
+t4 := 5;
+t5 := 6;
+t6 := 7;
+t7 := 9;
+
+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
+     ((296,180){1,0}...               % 0
+      (772,407){1,1}...               % 1
+      (919,739){199,909}...{0,1}          % *2
+      (971,1316){0,1082}...{0,1082}          % 3
+      (971,2398)--                    % 4
+      (1229,2419){0,-964}...{0,-1}          % 5
+      (1229,1455){-13,-164}...{-13,-164}     % 6
+      (1216,1291){-99,-787}...          % 7
+      (1087,712){-213,-507}...{-1,-1}     % 8
+      (759,180)--cycle);               % 9
+
+n := 13;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 9;
+t6 := 12;
+t7 := 13;
+t8 := 15;
+t9 := 17;
+t10 := 18;
+t11 := 22;
+t12 := 24;
+t13 := 25;
+
+adj_fill.B(1, 12)                    % fixed x points
+     (6, 7, 10)                    % fixed y points
+     ((1,9), (3,2), (4,1), (6,7), (7,7), (13,8))% tied points
+     ((5,8), (2,11))                    % verticals
+     ((4,9))                         % horizontals
+     ((1321,1407){1,0}...               % 0
+      (1854,1593){1,1}...               % 1
+      (1995,1950){0,1}...               % 2
+      (1875,2266){-1,1}...               % 3
+      (1634,2379){-646,153}...{-1,0}          % *4
+      (1229,2419){-258,-21}...{-258,-21}     % 5
+      (971,2398){-1,0}...               % 6
+      (440,2181){-1,-1}...               % 7
+      (312,1929){0,-1}...               % 8
+      (329,1804){88,-417}...               % 9
+      (353,1702){0,-1}...               % 10
+      (317,1583){-1,-1}...{-1,0}          % 11
+      (190,1528)--                    % 12
+      (190,1528){-1,0}...               % 13
+      (117,1564){-1,1}...               % 14
+      (54,1768){0,1}...               % 15
+      (244,2189){1,1}...{447,68}          % 16
+      (958,2523){255,121}...{255,121}     % 17
+      (1213,2644){16,-107}...{16,-107}     % 18
+      (1229,2537){1,0}...               % 19
+      (1807,2489){900,-183}...          % *20
+      (2129,2354){1,-1}...               % 21
+      (2251,2048){0,-1}...               % 22
+      (2075,1617){-1,-1}...{-601,-307}     % 23
+      (1812,1417){11,-26}...{11,-26}          % 24
+      (1823,1391)--cycle);               % 25
+
+n := 10;
+t1 := 0;
+t2 := 3;
+t3 := 5;
+t4 := 6;
+t5 := 7;
+t6 := 8;
+t7 := 9;
+t8 := 12;
+t9 := 16;
+t10 := 17;
+
+adj_fill.C()                         % fixed x points
+     ()                         % fixed y points
+     ((3,8), (4,9), (5,3), (6,4), (9,5), (10,6))% tied points
+     ((2,8))                         % verticals
+     ((4,7), (1,9))                    % horizontals
+     ((196,-14){1098,0}...               % 0
+      (1294,-14){1,0}...               % 1
+      (2222,352){1,1}...               % 2
+      (2427,853){0,1}...               % 3
+      (2269,1230){-1,1}...{-1,0}          % 4
+      (1823,1391){-502,16}...{-502,16}     % 5
+      (1321,1407){-1,0}...{0,1}          % 6
+      (1229,1455)--                    % 7
+      (1216,1291){660,75}...               % 8
+      (1466,1303){1,0}...               % 9
+      (1796,1263){546,-155}...          % *10
+      (2012,1148){1,-1}...               % 11
+      (2156,810){0,-1}...               % 12
+      (2009,351){-1,-1}...               % 13
+      (1752,222){-667,-174}...          % *14
+      (1342,177){-1,0}...{-1,0}          % 15
+      (759,180){-463,0}...{-463,0}          % 16
+      (296,180)--cycle);               % 17
+
+endchar(0);
+
+"smuc";
+
+charbegin( "C", 2031h#, capheight*v#, baseline );
+n := 17;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 5;
+t5 := 7;
+t6 := 9;
+t7 := 12;
+t8 := 15;
+t9 := 18;
+t10 := 19;
+t11 := 21;
+t12 := 24;
+t13 := 27;
+t14 := 29;
+t15 := 31;
+t16 := 33;
+t17 := 34;
+
+adj_fill.A(10)                         % fixed x points
+     (2, 9, 17)                    % fixed y points
+     ((1,1), (17,1))                    % tied points
+     ((7,12), (5,14), (3,16))          % verticals
+     ((8,11), (6,13), (4,15))          % horizontals
+     ((914,1881){1,1}...               % 0
+      (1031,1922){1,0}...               % 1
+      (1146,1879){1,-1}...               % 2
+      (1161,1729){-56,-261}...          % 3
+      (1192,1557){1,-1}...               % 4
+      (1332,1520){1,0}...               % 5
+      (1600,1640){1,1}...               % 6
+      (1719,2007){0,1}...               % 7
+      (1607,2349){-1,1}...               % 8
+      (1254,2477){-1,0}...               % 9
+      (724,2282){-1,-1}...               % 10
+      (509,1875){-291,-1028}...          % *11
+      (433,1254){0,-1}...               % 12
+      (517,677){324,-990}...               % *13
+      (757,264){1,-1}...               % 14
+      (1189,71){1,0}...               % 15
+      (1569,229){1,1}...{166,754}          % 16
+      (1710,537){39,25}...{39,25}          % 17
+      (1749,562)--                    % 18
+      (1919,389){-219,-467}...          % 19
+      (1791,190){-1,-1}...               % 20
+      (1099,-56){-1,0}...               % 21
+      (474,200){-1,1}...               % 22
+      (240,602){-316,961}...               % *23
+      (158,1161){0,1}...               % 24
+      (254,1833){370,1148}...          % *25
+      (528,2309){1,1}...               % 26
+      (1320,2592){1,0}...               % 27
+      (1851,2424){1,-1}...               % 28
+      (1974,2050){0,-1}...               % 29
+      (1795,1582){-1,-1}...               % 30
+      (1344,1409){-1,0}...               % 31
+      (955,1533){-1,1}...               % 32
+      (873,1745){0,1}...{1,1}          % 33
+      (914,1881)--cycle);               % 34
+
+endchar(0);
+
+"smud";
+
+charbegin( "D", 2875h#, capheight*v#, baseline );
+n := 14;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 9;
+t5 := 11;
+t6 := 13;
+t7 := 14;
+t8 := 16;
+t9 := 19;
+t10 := 20;
+t11 := 23;
+t12 := 27;
+t13 := 28;
+t14 := 29;
+
+adj_fill.A(1)                         % fixed x points
+     (6, 7)                         % fixed y points
+     ((6,1), (7,1), (9,2), (10,3), (13,4), (14,5))% tied points
+     ((5,8), (3,11))                    % verticals
+     ((4,9), (2,12))                    % horizontals
+     ((211,16){1078,0}...               % 0
+      (1289,16){1,0}...               % 1
+      (2311,434){1,1}...               % 2
+      (2728,1451){0,1}...               % 3
+      (2477,2214){-1,1}...               % 4
+      (2002,2471){-1188,347}...{-1,0}     % *5
+      (1289,2561){0,75}...{0,75}          % 6
+      (1289,2636){-15,23}...{-15,23}          % 7
+      (1274,2659){-211,-114}...{-211,-114}     % 8
+      (1063,2545){-1,0}...               % 9
+      (253,2224){-1,-1}...               % 10
+      (78,1814){0,-1}...               % 11
+      (132,1607){1,-1}...{1,0}          % 12
+      (224,1566)--                    % 13
+      (224,1566){1,0}...               % 14
+      (331,1624){1,1}...               % 15
+      (368,1749){0,1}...               % 16
+      (341,1994){0,1}...               % 17
+      (425,2202){1,1}...{1,0}          % 18
+      (1039,2431){250,-2}...{250,-2}          % 19
+      (1289,2429){1,0}...               % 20
+      (1829,2362){896,-257}...          % *21
+      (2185,2172){1,-1}...               % 22
+      (2458,1431){0,-1}...               % 23
+      (2379,865){-304,-962}...          % *24
+      (2154,469){-1,-1}...               % 25
+      (1800,269){-865,-270}...          % *26
+      (1289,199){-1,0}...               % 27
+      (789,199){-2,0}...{-475,0}          % 28
+      (314,199)--cycle);               % 29
+
+n := 6;
+t1 := 0;
+t2 := 3;
+t3 := 4;
+t4 := 5;
+t5 := 6;
+t6 := 9;
+
+adj_fill.B()                         % fixed x points
+     ()                         % fixed y points
+     ((1,5), (3,2), (4,3), (6,4))          % tied points
+     ((2,5))                         % verticals
+     ()                         % horizontals
+     ((314,199){1,0}...               % 0
+      (879,444){1,1}...               % 1
+      (997,739){160,841}...               % *2
+      (1039,1285){0,1}...{0,1146}          % 3
+      (1039,2431)--                    % 4
+      (1289,2429){0,-867}...               % 5
+      (1289,1562){0,-1}...               % 6
+      (1202,855){-336,-1188}...          % *7
+      (953,374){-164,-175}...{-164,-175}     % 8
+      (789,199)--cycle);               % 9
+
+endchar(0);
+
+"smue";
+
+charbegin( "E", 2052h#, capheight*v#, baseline );
+n := 18;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 8;
+t5 := 10;
+t6 := 12;
+%t7 := 14;
+t7 := 14.5; % DEK
+t8 := 16;
+t9 := 17;
+t10 := 18;
+t11 := 21;
+t12 := 23;
+t13 := 25;
+t14 := 28;
+t15 := 29;
+t16 := 32;
+t17 := 34;
+t18 := 37;
+
+adj_fill.A(1, 4, 14, 15)               % fixed x points
+     (8, 10, 18)                    % fixed y points
+     ((9,1), (10,1))                    % tied points
+     ((7,11), (5,13), (3,16))          % verticals
+     ((6,12), (14,15), (2,17))          % horizontals
+     ((1865,392){-187,-376}...          % 0
+      (1783,252){-1,-1}...               % 1
+      (1048,-45){-1,0}...               % 2
+      (621,16){-730,235}...               % *3
+      (318,190){-1,1}...               % 4
+      (157,639){0,1}...               % 5
+      (386,1175){1,1}...{524,76}          % 6
+      (876,1402){3,38}...{3,38}          % 7
+      (879,1440){-273,91}...               % 8
+      (592,1607){-1,1}...               % 9
+      (455,1997){0,1}...               % 10
+      (627,2406){1,1}...               % 11
+      (1249,2616){1,0}...               % 12
+      (1628,2473){1,-1}...               % 13
+      (1718,2239){0,-1}...               % 14
+      (1640,2026){-1,-1}...               % 15
+      (1495,1942){-1,0}...{-1,1}          % 16
+      (1384,1981)--                    % 17
+      (1384,1981){-1,1}...               % 18
+      (1360,2060){0,1}...               % 19
+      (1408,2171){486,715}...          % 20
+      (1453,2296){0,1}...               % 21
+      (1391,2423){-1,1}...               % 22
+      (1145,2499){-1,0}...               % 23
+      (867,2387){-1,-1}...               % 24
+      (700,1954){0,-1}...               % 25
+      (837,1604){1,-1}...               % 26
+      (1074,1483){609,-164}...{1,0}          % *27
+      (1446,1440){0,-93}...{0,-93}          % 28
+      (1446,1347){-1,0}...               % 29
+      (945,1295){-806,-199}...          % *30
+      (640,1148){-1,-1}...               % 31
+      (453,695){0,-1}...               % 32
+      (618,244){1,-1}...               % 33
+      (1107,90){1,0}...               % 34
+      (1527,288){1,1}...{106,609}          % 35
+      (1659,557){43,13}...{43,13}          % 36
+      (1702,570)--cycle);               % 37
+
+endchar(0);
+
+"smuf";
+
+%charbegin( "F", 2204h#, capheight*v#, baseline );
+charbegin( "F", (2204+100)*h#, capheight*v#, baseline ); % DEK
+n := 14;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 5;
+t5 := 6;
+t6 := 9;
+t7 := 11;
+t8 := 12;
+t9 := 13;
+t10 := 15;
+t11 := 17;
+t12 := 19;
+t13 := 22;
+t14 := 23;
+
+adj_fill.A(1, 12)                    % fixed x points
+     (7, 9, 12, 13)                    % fixed y points
+     ((3,1), (4,2), (7,3), (8,3))          % tied points
+     ((6,10))                    % verticals
+     ((5,11), (2,14))               % horizontals
+     ((2514,2528){-148,-275}...          % 0
+      (2366,2253){-148,-275}...          % 1
+      (2203,2127){-1,0}...               % 2
+      (2043,2159){-528,155}...{-720,241}     % 3
+      (1556,2304){-258,64}...{-258,64}     % 4
+      (1298,2368){-584,140}...          % 5
+      (1033,2409){-1,0}...               % 6
+      (523,2225){-1,-1}...               % 7
+      (403,1963){0,-1}...               % 8
+      (416,1811){181,-733}...          % 9
+      (447,1686){0,-1}...{-1,-1}          % 10
+      (407,1570)--                    % 11
+      (407,1570){-1,-1}...               % 12
+      (303,1516){-1,0}...               % 13
+      (181,1570){-1,1}...               % 14
+      (128,1738){0,1}...               % 15
+      (330,2242){1,1}...               % 16
+      (1130,2525){1,0}...{599,-114}          % 17
+      (1298,2507){258,93}...{258,93}          % 18
+      (1556,2600){0,-126}...{0,-126}          % 19
+      (1556,2474){559,-128}...          % 20
+      (2112,2361){303,-48}...          % 21
+      (2231,2346){1,0}...               % 22
+      (2369,2429){84,130}...{84,130}          % 23
+      (2453,2559)--cycle);               % 24
+
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 10;
+t5 := 11;
+t6 := 13;
+t7 := 14;
+t8 := 16;
+t9 := 22;
+t10 := 25;
+
+adj_fill.B(8)                         % fixed x points
+     (2, 10)                         % fixed y points
+     ((1,4), (6,2), (7,1), (10,4))          % tied points
+     ((6,7))                         % verticals
+     ((4,5), (3,9))                    % horizontals
+     ((91,421){1,1}...               % 0
+      (213,468){1,0}...               % 1
+      (287,447){1,-1}...               % 2
+      (355,332){170,-416}...               % 3
+      (434,202){1,-1}...               % 4
+      (704,92){1,0}...               % 5
+      (1091,300){1,1}...               % 6
+      (1244,571){207,660}...               % *7
+      (1298,960){0,1}...{0,309}          % 8
+      (1298,1269){-608,0}...{-608,0}          % 9
+      (690,1269){69,113}...{69,113}          % 10
+      (759,1382){539,0}...{539,0}          % 11
+      (1298,1382){0,986}...{0,986}          % 12
+      (1298,2368)--                    % 13
+      (1556,2304){0,-922}...{0,-922}          % 14
+      (1556,1382){535,0}...{535,0}          % 15
+      (2091,1382){-103,-113}...{-103,-113}     % 16
+      (1988,1269){-432,0}...{-432,0}          % 17
+      (1556,1269){0,-168}...               % 18
+      (1556,1101){0,-1}...               % 19
+      (1487,625){-267,-817}...          % *20
+      (1289,284){-1,-1}...               % 21
+      (504,-56){-1,0}...               % 22
+      (129,104){-1,1}...               % 23
+      (39,305){0,1}...{1,1}               % 24
+      (91,421)--cycle);               % 25
+mathcorr(100h#); % DEK
+endchar(0);
+
+"smug";
+
+%charbegin( "G", 2038h#, capheight*v#, depthy*v#);
+charbegin( "G", 2038h#, capheight*v#, 2/3descender*v#); % DEK
+n := 13;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 5;
+t5 := 7;
+t6 := 9;
+t7 := 11;
+t8 := 12;
+t9 := 15;
+t10 := 17;
+t11 := 19;
+t12 := 21;
+t13 := 22;
+
+adj_fill.A(8)                         % fixed x points
+     (1)                         % fixed y points
+     ((1,2), (13,1))                    % tied points
+     ((6,9), (4,11), (1,2))               % verticals
+     ((7,8), (5,10), (3,12))               % horizontals
+     ((1839,1445){-186,-46}...{-186,-46}     % 0
+      (1653,1399){-80,-402}...          % 1
+      (1526,1106){-1,-1}...               % 2
+      (1072,937){-1,0}...               % 3
+      (675,1113){-1,1}...               % 4
+      (485,1688){0,1}...               % 5
+      (722,2290){1,1}...               % 6
+      (1160,2462){1,0}...               % 7
+      (1492,2339){1,-1}...               % 8
+      (1587,2119){0,-1}...               % 9
+      (1532,1919){-1,-1}...{-1,0}          % 10
+      (1282,1841)--                    % 11
+      (1276,1779){596,-122}...          % 12
+      (1446,1748){1,0}...               % 13
+      (1739,1885){1,1}...               % 14
+      (1839,2154){0,1}...               % 15
+      (1728,2442){-1,1}...               % 16
+      (1255,2585){-1,0}...               % 17
+      (486,2329){-1,-1}...               % 18
+      (214,1684){0,-1}...               % 19
+      (417,1071){1,-1}...               % 20
+      (1046,825){1,0}...{307,223}          % 21
+      (1572,976)--cycle);               % 22
+
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 7;
+t5 := 8;
+t6 := 9;
+t7 := 12;
+t8 := 14;
+t9 := 16;
+t10 := 17;
+
+adj_fill.B()                         % fixed x points
+     (1, 9)                         % fixed y points
+     ((1,3), (4,2), (5,1), (10,3))          % tied points
+     ((4,6), (2,8))                    % verticals
+     ((3,7))                         % horizontals
+     ((221,73){-1,-1}...               % 0
+      (168,-53){0,-1}...               % 1
+      (287,-331){1,-1}...               % 2
+      (746,-489){1,0}...               % 3
+      (1565,-148){1,1}...               % 4
+      (1766,272){272,1115}...          % *5
+      (1837,967){0,1}...{0,1}          % 6
+      (1839,1445)--                    % 7
+      (1572,976){0,-1}...               % 8
+      (1582,635){10,-341}...               % 9
+      (1528,172){-235,-789}...          % *10
+      (1347,-154){-1,-1}...               % 11
+      (896,-343){-1,0}...               % 12
+      (586,-241){-1,1}...               % 13
+      (504,-61){-122,625}...               % 14
+      (452,77){-1,1}...               % 15
+      (355,115){-1,0}...{-1,-1}          % 16
+      (221,73)--cycle);               % 17
+
+endchar(0);
+
+"smuh";
+
+%charbegin( "H", 3075h#, capheight*v#, baseline );
+charbegin( "H", (3075+50)*h#, capheight*v#, baseline ); % DEK
+n := 9;
+t1 := 1;
+t2 := 2;
+t3 := 7;
+t4 := 8;
+t5 := 9;
+t6 := 10;
+t7 := 13;
+t8 := 16;
+t9 := 17;
+
+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
+     ((1508,2493){-180,-80}...{-180,-80}     % 0
+      (1328,2413){-244,0}...{-244,0}          % 1
+      (1084,2413){-1,0}...               % 2
+      (699,2374){-617,-149}...          % *3
+      (467,2264){-1,-1}...               % 4
+      (349,2022){0,-1}...               % 5
+      (364,1878){185,-848}...          % 6
+      (396,1731){0,-1}...{-1,-1}          % 7
+      (368,1630)--                    % 8
+      (368,1630){-1,-1}...               % 9
+      (247,1562){-1,0}...               % 10
+      (158,1610){-1,1}...               % 11
+      (111,1711){-63,272}...               % *12
+      (95,1882){0,1}...               % 13
+      (306,2309){1,1}...               % 14
+      (627,2493){778,248}...               % *15
+      (1084,2557){1,0}...{605,-13}          % 16
+      (1512,2544)--cycle);               % 17
+
+n := 12;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 8;
+t5 := 8.667;
+t6 := 9;
+t7 := 10;
+t8 := 11;
+t9 := 12;
+t10 := 15;
+t11 := 17;
+t12 := 18;
+
+adj_fill.B(1, 5, 11)                    % fixed x points
+     (2, 12)                         % fixed y points
+     ((1,6), (6,1), (7,3), (8,4), (9,5), (12,6))% tied points
+     ((4,8))                         % verticals
+     ((3,10))                    % horizontals
+     ((59,354){1,1}...               % 0
+      (163,394){1,0}...               % 1
+      (277,367){1,-1}...               % 2
+      (327,283){157,-378}...               % 3
+      (378,189){1,-1}...               % 4
+      (556,123){1,0}...               % 5
+      (844,258){1,1}...               % 6
+      (1022,663){240,1114}...          % *7
+      (1084,1372){0,1}...{-14,861}          % 8
+      (1084,2413)--                    % 9
+      (1328,2413){0,-979}...               % 10
+      (1328,1434){0,-2}...{0,-140}          % 11
+      (1328,1294){0,-1}...               % 12
+      (1243,680){-328,-1042}...          % *13
+      (1000,252){-1,-1}...               % 14
+      (396,-41){-1,0}...               % 15
+      (112,68){-1,1}...               % 16
+      (21,259){0,1}...{1,1}               % 17
+      (59,354)--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
+     ((2175,1434){-847,0}...{-847,0}          % 0
+      (1328,1434)--                    % 1
+      (1328,1294){828,0}...{828,0}          % 2
+      (2156,1294)--cycle);               % 3
+
+n := 13;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 7;
+t6 := 10;
+t7 := 13;
+t8 := 14;
+t9 := 15;
+t10 := 17;
+t11 := 21;
+t12 := 24;
+t13 := 26;
+
+adj_fill.D(1, 8)                    % fixed x points
+     (9, 13)                         % fixed y points
+     ((4,7), (5,8), (7,9), (8,9))          % tied points
+     ((3,11))                    % verticals
+     ((6,10), (2,12))               % horizontals
+     ((3028,332){-179,-290}...          % 0
+      (2886,109){-1,-1}...               % 1
+      (2542,-47){-1,0}...               % 2
+      (2324,46){-1,1}...               % 3
+      (2183,343){-190,793}...          % *4
+      (2134,839){0,1}...{43,671}          % 5
+      (2156,1294){19,140}...{19,140}          % 6
+      (2175,1434){100,545}...          % 7
+      (2340,2023){399,969}...          % *8
+      (2574,2403){1,1}...               % 9
+      (2949,2574){1,0}...               % 10
+      (3084,2541){1,-1}...               % 11
+      (3148,2423){0,-1}...{-1,-1}          % 12
+      (3103,2310)--                    % 13
+      (3103,2310){-1,-1}...               % 14
+      (3007,2255){-1,0}...               % 15
+      (2922,2301){-1,1}...               % 16
+      (2780,2364){-1,0}...               % 17
+      (2638,2309){-1,-1}...               % 18
+      (2528,2126){-191.1,-483.1}...          % *19
+      (2447,1826){-258,-1384}...          % *20
+      (2380,925){0,-1}...               % 21
+      (2425,431){172,-779}...          % *22
+      (2552,146){1,-1}...               % 23
+      (2684,109){1,0}...               % 24
+      (2816,199){1,1}...{301,542}          % 25
+      (2964,389)--cycle);               % 26
+
+mathcorr(50h#); % DEK
+endchar(0);
+
+"smui"; 
+
+%charbegin( 125, 1395h#, capheight*v#, baseline );
+%charbegin( 123, 1395h#, capheight*v#, baseline ); % DEK
+charbegin( "I", 1395h#, capheight*v#, baseline ); % NGB
+
+n := 8;
+t1 := 1;
+t2 := 2;
+t3 := 7;
+t4 := 9;
+t5 := 10;
+t6 := 12;
+t7 := 15;
+t8 := 16;
+
+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
+     ((1336,2461){-175,-39}...{-175,-39}     % 0
+      (1161,2422){-231,0}...{-231,0}          % 1
+      (930,2422){-1,0}...               % 2
+      (568,2379){-598,-167}...          % *3
+      (332,2255){-1,-1}...               % 4
+      (245,2065){0,-1}...               % 5
+      (255,1983){154,-518}...          % 6
+      (287,1855){0,-1}...               % 7
+      (237,1737){-1,-1}...{-1,0}          % 8
+      (158,1704)--                    % 9
+      (158,1704){-1,0}...               % 10
+      (78,1741){-1,1}...               % 11
+      (10,1940){0,1}...               % 12
+      (160,2300){1,1}...               % 13
+      (521,2489){916,255}...               % *14
+      (1076,2555){1,0}...{354,-16}          % 15
+      (1386,2534)--cycle);               % 16
+
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 8;
+t5 := 9;
+t6 := 10;
+t7 := 11;
+t8 := 13;
+t9 := 15;
+t10 := 16;
+
+adj_fill.B(1, 9)                    % fixed x points
+     (2, 10)                         % fixed y points
+     ((1,4), (5,1), (6,3), (10,4))          % tied points
+     ((4,7))                         % verticals
+     ((3,8))                         % horizontals
+     ((25,377){1,1}...               % 0
+      (130,420){1,0}...               % 1
+      (227,364){1,-1}...               % 2
+      (259,259){176,-742}...               % 3
+      (321,138){1,-1}...               % 4
+      (454,102){1,0}...               % 5
+      (717,234){1,1}...               % 6
+      (875,562){213,867}...               % *7
+      (930,1101){0,1}...{0,1321}          % 8
+      (930,2422)--                    % 9
+      (1161,2422){0,-1295}...          % 10
+      (1161,1127){0,-1}...               % 11
+      (836,168){-1,-1}...               % 12
+      (379,-52){-1,0}...               % 13
+      (92,49){-1,1}...               % 14
+      (0,254){0,1}...{1,1}               % 15
+      (25,377)--cycle);               % 16
+
+endchar(0);
+
+"smuj";
+
+%charbegin( "J", 1674h#, capheight*v#, depthy*v#);
+charbegin( "J", 1674h#, capheight*v#, 2/3descender*v#); % DEK
+n := 16;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 5;
+t5 := 6;
+t6 := 7;
+t7 := 10;
+t8 := 12;
+t9 := 14;
+t10 := 15;
+t11 := 18;
+t12 := 20;
+t13 := 24;
+t14 := 29;
+t15 := 31;
+t16 := 33;
+
+adj_fill.A(10)                         % fixed x points
+     (1, 16)                         % fixed y points
+     ((1,3), (4,1), (5,2), (9,2), (10,1), (16,3))% tied points
+     ((8,11), (6,13), (2,15))          % verticals
+     ((9,10), (7,12), (3,14))          % horizontals
+     ((358,1566){1,0}...               % 0
+      (459,1629){1,1}...               % 1
+      (503,1850){0,1}...               % 2
+      (629,2201){1,1}...{347,45}          % 3
+      (1160,2428){0,-1133}...{0,-1133}     % 4
+      (1160,1295){-12,-126}...{-12,-126}     % 5
+      (1148,1169){0,-295}...               % 6
+      (1160,652){0,-1}...               % 7
+      (1102,167){-225,-801}...          % *8
+      (935,-149){-1,-1}...               % 9
+      (582,-315){-1,0}...               % 10
+      (337,-229){-1,1}...               % 11
+      (250,72){0,1}...               % 12
+      (596,820){1,1}...{752,294}          % 13
+      (1148,1169)--                    % 14
+      (1160,1295){-648,-249}...          % 15
+      (477,873){-1,-1}...               % 16
+      (126,403){-474,-934}...          % *17
+      (3,-61){0,-1}...               % 18
+      (128,-369){1,-1}...               % 19
+      (469,-478){1,0}...               % 20
+      (783,-392){639,330}...               % *21
+      (1108,-148){1,1}...               % 22
+      (1323,242){290,966}...               % *23
+      (1398,818){0,1}...               % 24
+      (1398,2376){0,1}...               % 25
+      (1398,2460){232,78}...{232,78}          % 26
+      (1630,2538){-11,44}...{-11,44}          % 27
+      (1619,2582){-474,8}...               % 28
+      (1398,2581){-1,0}...               % 29
+      (414,2193){-1,-1}...               % 30
+      (207,1765){0,-1}...               % 31
+      (254,1613){1,-1}...{1,0}          % 32
+      (358,1566)--cycle);               % 33
+
+endchar(0);
+
+"smuk";
+
+charbegin( "K", 2847h#, capheight*v#, baseline );
+n := 9;
+t1 := 1;
+t2 := 2;
+t3 := 6;
+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
+     ((2,8))                         % horizontals
+     ((1476,2490){-164,-77}...{-164,-77}     % 0
+      (1312,2413){-254,0}...{-254,0}          % 1
+      (1058,2413){-1,0}...               % 2
+      (446,2204){-1,-1}...               % 3
+      (349,2007){0,-1}...               % 4
+      (359,1875){85,-587}...               % 5
+      (382,1750){0,-1}...{-1,-1}          % 6
+      (349,1616)--                    % 7
+      (349,1616){-1,-1}...               % 8
+      (234,1566){-1,0}...               % 9
+      (131,1608){-1,1}...               % 10
+      (74,1832){0,1}...               % 11
+      (238,2223){1,1}...               % 12
+      (1202,2558){1,0}...{416,-26}          % 13
+      (1498,2540)--cycle);               % 14
+
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 9;
+t5 := 10;
+t6 := 11;
+t7 := 12;
+t8 := 14;
+t9 := 16;
+t10 := 17;
+
+adj_fill.B(9)                         % fixed x points
+     (2, 10)                         % fixed y points
+     ((1,6), (4,1), (5,3), (6,4), (7,5), (10,6))% tied points
+     ((4,5))                         % verticals
+     ((3,8))                         % horizontals
+     ((45,358){1,1}...               % 0
+      (146,401){1,0}...               % 1
+      (237,384){1,-1}...               % 2
+      (302,299){234,-393}...               % 3
+      (379,194){1,-1}...               % 4
+      (533,128){1,0}...               % 5
+      (836,273){1,1}...               % 6
+      (1000,576){222,757}...{0,1}          % *7
+      (1058,1030){0,1383}...{0,1383}          % 8
+      (1058,2413)--                    % 9
+      (1312,2413){0,-1109}...{0,-1109}     % 10
+      (1312,1304){-12,-108}...{-12,-108}     % 11
+      (1300,1196){0,-1}...               % 12
+      (947,218){-1,-1}...               % 13
+      (401,-30){-1,0}...               % 14
+      (80,82){-1,1}...               % 15
+      (6,255){0,1}...{1,1}               % 16
+      (45,358)--cycle);               % 17
+
+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
+     ((1375,1304){-63,0}...{-63,0}          % 0
+      (1312,1304)--                    % 1
+      (1300,1196){100,0}...{100,0}          % 2
+      (1400,1196)--cycle);               % 3
+
+n := 12;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 10;
+t6 := 12;
+t7 := 13;
+t8 := 14;
+t9 := 16;
+t10 := 21;
+t11 := 25;
+t12 := 27;
+
+adj_fill.D(1, 6, 8)                    % fixed x points
+     (12)                         % fixed y points
+     ((3,7), (4,8), (7,9), (8,9))          % tied points
+     ((4,10))                    % verticals
+     ((5,9), (2,11))                    % horizontals
+     ((2752,329){-199,-580}...          % 0
+      (2615,94){-1,-1}...               % 1
+      (2311,-46){-1,0}...               % 2
+      (2011,69){-1,1}...               % 3
+      (1861,292){-471,904}...{-461,904}     % 4
+      (1400,1196){-25,108}...{-25,108}     % 5
+      (1375,1304){559,763}...          % 6
+      (1934,2067){569,763}...          % 7
+      (2205,2377){1,1}...               % 8
+      (2405,2532){383,209}...          % *9
+      (2588,2586){1,0}...               % 10
+      (2778,2503){1,-1}...               % 11
+      (2849,2351){0,-1}...{-1,-1}          % 12
+      (2786,2218)--                    % 13
+      (2786,2218){-1,-1}...               % 14
+      (2660,2166){-1,0}...               % 15
+      (2562,2249){-181,383}...          % 16
+      (2444,2336){-1,0}...               % 17
+      (2255,2250){-410,-326}...          % *18
+      (2034,2010){-435,-596}...          % 19
+      (1599,1414){-1.144,-1.64}...{-18,-27}     % 20
+      (1581,1387){7,-66}...               % 21
+      (1588,1321){.5728,-1.879}...          % 22
+      (1930,674){342,-647}...          % 23
+      (2255,232){1,-1}...               % 24
+      (2413,154){1,0}...               % 25
+      (2579,217){1,1}...{174,392}          % 26
+      (2685,388)--cycle);               % 27
+
+endchar(0);
+
+"smul";
+
+charbegin( "L", 2449h#, capheight*v#, baseline );
+rot := identity slanted -1/6; % DEK
+
+n := 7;
+t1 := 0;
+t2 := 8;
+t3 := 10;
+t4 := 11;
+t5 := 13;
+t6 := 15;
+t7 := 19;
+
+adj_fill.A(7)                         % fixed x points
+     (1)                         % fixed y points
+     ((1,3), (3,1), (4,1), (7,2))          % tied points
+     ((2,5))                         % verticals
+     ((3,6))                         % horizontals
+     ((545,651){457,312}...               % 0
+      (791,854){1,1}...               % 1
+      (936,1132){272,792}...               % *2
+      (1063,1646){171,930}...          % 3
+      (1176,2104){241,705}...          % *4
+      (1304,2351){1,1}...               % 5
+      (1527,2449){1,0}...               % 6
+      (1695,2375){1,-1}...               % 7
+      (1751,2221){0,-1}...               % 8
+      (1770,2100){1,-1}...{1,0}          % 9
+      (1887,2056)--                    % 10
+      (1887,2056){1,0}...               % 11
+      (2019,2134){1,1}...               % 12
+      (2059,2288){0,1}...               % 13
+      (1991,2479){-1,1}...               % 14
+      (1696,2581){-1,0}...               % 15
+      (1146,2383){-1,-1}...               % 16
+      (925,2040){-372,-850}...          % *17
+      (774,1533){-221,-1144}...{-1,-1}     % 18
+      (535,777)--cycle);               % 19
+
+n := 8;
+t1 := 0;
+t2 := 3;
+t3 := 8;
+t4 := 9;
+t5 := 13;
+t6 := 15;
+t7 := 19;
+t8 := 22;
+
+adj_fill.B()                         % fixed x points
+     (5, 8)                         % fixed y points
+     ((3,3), (4,2))                    % tied points
+     ((1,8))                         % verticals
+     ((3,6), (2,7))                    % horizontals
+%     ((2125,971){115,-476}...          % 0
+%      (2138,781){0,-1}...               % 1
+%      (2027,410){-1,-1}...               % 2
+%      (1755,265){-1,0}...               % 3
+     (((2125,971){115,-476}...          % 0 % DEK
+      (2138,781){0,-1}...               % 1
+      (2027,410){-1,-1}...               % 2
+      (1755,265){-1,0})slanted1/6{-1,0}...     % 3
+      (1519,306){-553,163}...          % *4
+      (1202,428){-1145,522}...          % 5
+      (800,613){-547,222}...               % *6
+      (655,650){-1,0}...{-504,-93}          % 7
+      (545,651){-10,126}...{-10,126}          % 8
+      (535,777){-1,-1}...               % 9
+      (370,641){-784,-493}...          % 10
+      (225,526){-1,-1}...{-59,-444}          % 11
+      (25,53)--                    % 12
+      (105,11){93,346}...               % 13
+      (270,341){1,1}...               % 14
+      (496,450){1,0}...{0,-12}          % 15
+      (496,438){1,0}...               % 16
+      (1035,208){723,-410}...          % 17
+      (1393,34){613,-233}...               % *18
+%      (1648,-25){1,0}...               % 19
+%      (2054,178){1,1}...               % 20
+%      (2237,746){0,1}...{-86,450}          % 21
+%      (2198,992)--cycle);               % 22
+      {1,0}((1648,-25){1,0}...          % 19 % DEK
+      (2054,178){1,1}...               % 20
+      (2237,746){0,1}...{-86,450}          % 21
+      (2198,992))slanted1/6--cycle);          % 22
+
+endchar(0);
+
+"smum";
+
+charbegin( "M", 3437h#, capheight*v#, baseline );
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 6;
+t5 := 7;
+t6 := 8;
+t7 := 9;
+t8 := 12;
+t9 := 14;
+t10 := 15;
+
+adj_fill.A(1, 9)                    % fixed x points
+     (2, 5, 10)                    % fixed y points
+     ((1,3), (5,1), (6,2), (10,3))          % tied points
+     ((4,7))                         % verticals
+     ((3,8))                         % horizontals
+     ((46,333){1,1}...               % 0
+      (143,375){1,0}...               % 1
+      (286,272){193,-425}...               % 2
+      (439,172){1,0}...               % 3
+      (602,260){1,1}...               % 4
+      (746,550){195,755}...               % *5
+      (797,1015){0,1}...{0,1221}          % 6
+      (797,2236)--                    % 7
+      (935,2097){0,-837}...               % 8
+      (935,1260){0,-1}...               % 9
+      (852,547){-320,-1171}...          % *10
+      (615,89){-1,-1}...               % 11
+      (310,-45){-1,0}...               % 12
+      (68,64){-1,1}...               % 13
+      (-2,213){0,1}...{1,1}               % 14
+      (46,333)--cycle);               % 15
+
+n := 16;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 6;
+t5 := 7;
+t6 := 14;
+t7 := 15;
+t8 := 16;
+t9 := 18;
+t10 := 19;
+t11 := 22;
+t12 := 23;
+t13 := 27;
+t14 := 30;
+t15 := 32;
+t16 := 33;
+
+adj_fill.B(15)                         % fixed x points
+     (3, 10, 12, 13)                    % fixed y points
+     ((1,6), (4,4), (5,5), (6,2), (7,1), (16,6))% tied points
+     ((9,10))                    % verticals
+     ((8,11), (2,14))               % horizontals
+     ((3367,2300){-1,-1}...               % 0
+      (3241,2242){-1,0}...               % 1
+      (3167,2257){-1,1}...               % 2
+      (3119,2316){-185,394}...          % 3
+      (3094,2372){-1,1}...               % 4
+      (3008,2411){-1,0}...{-1,-1}          % 5
+      (2916,2374){-304,-236}...{-304,-236}     % 6
+      (2612,2138){-214,-219}...          % 7
+      (2115,1307){-795,-2071}...{-68,-511}     % *8
+      (1817,67){-165,-129}...{-165,-129}     % 9
+      (1652,-62){-32,26}...{-32,26}          % 10
+      (1620,-36){-32,274}...               % 11
+      (1351,1309){-685,2133}...          % *12
+      (1159,1780){-415.9,788.2}...{-1,1}     % *13
+      (935,2097){-138,139}...{-138,139}     % 14
+      (797,2236){-209,237}...          % 15
+      (498,2383){-1,0}...               % 16
+      (277,2284){-1,-1}...{-80,-418}          % 17
+      (139,1971)--                    % 18
+      (64,1968){70,514}...               % 19
+      (130,2247){173,459}...               % *20
+      (237,2427){1,1}...               % 21
+      (600,2588){1,0}...               % 22
+      (1018,2403){1,-1}...{10,0}          % 23
+      (1028,2403){1,-1}...               % 24
+      (1494,1683){742,-1735}...{54,-357}     % *25
+      (1770,668){18,-15}...{18,-15}          % 26
+      (1788,653){141,552}...               % 27
+      (2137,1615){826,1649}...          % *28
+      (2614,2302){1,1}...               % 29
+      (3169,2558){1,0}...               % 30
+      (3349,2491){1,-1}...               % 31
+      (3396,2395){0,-1}...{-1,-1}          % 32
+      (3367,2300)--cycle);               % 33
+
+n := 9;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 5.703;
+t5 := 6;
+t6 := 7;
+t7 := 9;
+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
+     ((3455,282){-285,-419}...          % 0
+      (3274,67){-1,-1}...               % 1
+      (2977,-98){-1,0}...               % 2
+      (2749,1){-1,1}...               % 3
+      (2628,358){-135,1361}...          % *4
+      (2614,1362){0,1}...{32,767}          % 5
+      (2612,2138)--                    % 6
+      (2916,2374){-1,-1}...               % 7
+      (2844,2200){0,-1}...               % 8
+      (2844,1000){0,-1}...               % 9
+      (2881,414){150,-880}...          % *10
+      (2994,120){1,-1}...               % 11
+      (3085,80){1,0}...               % 12
+      (3242,154){1,1}...{257,420}          % 13
+      (3385,337)--cycle);               % 14
+
+endchar(0);
+
+"smun";
+
+%charbegin( "N", 2666h#, capheight*v#, baseline );
+charbegin( "N", (2666+50)*h#, capheight*v#, baseline ); % DEK
+n := 9;
+t1 := 0;
+t2 := 3;
+t3 := 6;
+t4 := 7;
+t5 := 8;
+t6 := 9;
+t7 := 12;
+t8 := 14;
+t9 := 16;
+
+adj_fill.A(1, 8)                    % fixed x points
+     (1, 4, 9)                    % fixed y points
+     ((1,3), (4,1), (5,2), (9,3))          % tied points
+     ((3,6))                         % verticals
+     ((2,7))                         % horizontals
+     ((147,359){1,0}...               % 0
+      (249,324){1,-1}...               % 1
+      (298,250){205,-325}...               % 2
+      (404,198){1,0}...               % 3
+      (621,319){1,1}...               % 4
+      (753,632){178,877}...               % *5
+      (799,1196){0,1}...{0,957}          % 6
+      (799,2153)--                    % 7
+      (949,1973){0,-573}...               % 8
+      (949,1400){0,-1}...               % 9
+      (869,627){-307,-1244}...          % *10
+      (642,156){-1,-1}...               % 11
+      (278,-33){-1,0}...               % 12
+      (73,43){-1,1}...               % 13
+      (5,186){0,1}...               % 14
+      (65,322){1,1}...{1,0}               % 15
+      (147,359)--cycle);               % 16
+
+n := 16;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 7;
+t5 := 8;
+t6 := 11;
+t7 := 13;
+t8 := 14;
+t9 := 16;
+t10 := 18;
+t11 := 19;
+t12 := 20;
+t13 := 22;
+t14 := 25;
+t15 := 28;
+t16 := 29;
+
+adj_fill.B(2, 16)                    % fixed x points
+     (1, 7, 15)                    % fixed y points
+     ((1,4), (10,1), (11,2), (16,4))          % tied points
+     ((7,8), (4,13))                    % verticals
+     ((6,9), (5,12), (3,14))               % horizontals
+     ((2838,2337){1,1}...               % 0
+      (2866,2429){0,1}...               % 1
+      (2811,2556){-1,1}...               % 2
+      (2664,2614){-1,0}...               % 3
+      (2367,2492){-1,-1}...               % 4
+      (2252,2231){-157,-717}...          % *5
+      (2210,1775){-2,-522}...{0,-1}          % 6
+      (2220,504){-9,-45}...{-9,-45}          % 7
+      (2211,459){-128,213}...          % 8
+      (1380,1817){-1245,1903}...          % *9
+      (966,2362){-1,1}...               % 10
+      (526,2592){-1,0}...               % 11
+      (159,2469){-1,-1}...{0,-1}          % 12
+      (3,1970)--                    % 13
+      (84,1987){72,365}...               % 14
+      (209,2301){1,1}...               % 15
+      (417,2378){1,0}...               % 16
+      (592,2320){382,-225}...{1,-1}          % *17
+      (799,2153){150,-180}...{150,-180}     % 18
+      (949,1973){389,-526}...{162,-317}     % 19
+      (2177,-52){165,107}...{165,107}     % 20
+      (2342,55){-11,749}...               % 21
+      (2344,1628){7,512}...               % 22
+      (2361,2204){90,784}...               % *23
+      (2434,2412){1,1}...               % 24
+      (2511,2438){1,0}...               % 25
+      (2588,2373){110,-315}...          % 26
+      (2640,2295){1,-1}...               % 27
+      (2718,2281){1,0}...{120,56}          % 28
+      (2838,2337)--cycle);               % 29
+mathcorr(50h#); % DEK
+endchar(0);
+
+"smuo";
+
+charbegin( "O", 2420h#, capheight*v#, baseline );
+n := 14;
+t1 := 0;
+%t2 := 2;
+t2 := 1; % DEK
+t3 := 4;
+t4 := 7;
+t5 := 10;
+t6 := 13;
+t7 := 15;
+t8 := 16;
+t9 := 17;
+t10 := 20;
+t11 := 23;
+t12 := 26;
+t13 := 30;
+t14 := 31;
+
+adj_fill.A(8)                         % fixed x points
+     (1, 7, 14)                    % fixed y points
+     ((1,1), (14,1))                    % tied points
+     ((2,13), (4,11), (6,9))               % verticals
+     ((5,10), (3,12))               % horizontals
+     ((1089,1536){-1,0}...               % 0
+      (958,1593){-1,1}...               % 1
+      (871,1866){0,1}...               % 2
+      (1075,2369){1,1}...               % 3
+      (1515,2537){1,0}...               % 4
+      (1970,2345){1,-1}...               % 5
+      (2166,1968){265,-962}...          % *6
+      (2235,1383){0,-1}...               % 7
+      (2139,702){-369,-1160}...          % *8
+      (1866,223){-1,-1}...               % 9
+      (1072,-79){-1,0}...               % 10
+      (477,202){-1,1}...               % 11
+      (243,600){-316,949}...               % *12
+      (161,1151){0,1}...               % 13
+      (572,2310){1,1}...{282,184}          % 14
+      (752,2447)--                    % 15
+      (803,2400){-1,-1}...               % 16
+      (416,1295){0,-1}...               % 17
+      (487,683){272,-1004}...          % *18
+      (688,291){1,-1}...               % 19
+      (1173,68){1,0}...               % 20
+      (1656,262){1,1}...               % 21
+      (1894,706){321,1115}...          % *22
+      (1977,1377){0,1}...               % 23
+      (1914,1951){-243,933}...          % *24
+      (1734,2310){-1,1}...               % 25
+      (1483,2417){-1,0}...               % 26
+      (1170,2300){-1,-1}...               % 27
+      (1065,2065){0,-1}...               % 28
+      (1198,1790){1,-1}...               % 29
+      (1237,1662){0,-1}...{-1,0}          % 30
+      (1089,1536)--cycle);               % 31
+
+endchar(0);
+
+"smup";
+
+charbegin( "P", 2246h#, capheight*v#, baseline );
+n := 12;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 11;
+t6 := 12;
+t7 := 13;
+t8 := 14;
+t9 := 16;
+t10 := 18;
+t11 := 23;
+t12 := 25;
+
+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
+     ((1270,1183){1,0}...               % 0
+      (1824,1365){1,1}...               % 1
+      (2010,1878){0,1}...               % 2
+      (1845,2274){-1,1}...               % 3
+      (1616,2397){-575,166}...          % *4
+      (1270,2440){-1,0}...{-235,0}          % 5
+      (1035,2440){-1,0}...               % 6
+      (673,2397){-597,-167}...          % *7
+      (438,2273){-1,-1}...               % 8
+      (301,1987){0,-1}...               % 9
+      (327,1837){147,-622}...          % 10
+      (356,1734){0,-1}...{-1,-1}          % 11
+      (317,1615)--                    % 12
+      (317,1615){-1,-1}...               % 13
+      (210,1566){-1,0}...               % 14
+      (119,1604){-1,1}...               % 15
+      (58,1824){0,1}...               % 16
+      (259,2295){1,1}...{1,0}          % 17
+      (1035,2561){235,96}...{235,96}          % 18
+      (1270,2657){0,-101}...{0,-101}          % 19
+      (1270,2556){1,0}...               % 20
+      (1791,2493){860,-241}...          % *21
+      (2130,2315){1,-1}...               % 22
+      (2259,1904){0,-1}...               % 23
+      (2042,1356){-1,-1}...{-1,0}          % 24
+      (1270,1072)--cycle);               % 25
+
+n := 10;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 8;
+t5 := 9;
+t6 := 10;
+t7 := 11;
+t8 := 14;
+t9 := 16;
+t10 := 18;
+
+adj_fill.B()                         % fixed x points
+     (1, 10)                         % fixed y points
+     ((1,6), (4,2), (5,1), (6,5), (7,4), (10,6))% tied points
+     ((4,5), (2,9))                    % verticals
+     ((3,8))                         % horizontals
+     ((332,480){1,0}...               % 0
+      (427,458){1,-1}...               % 1
+      (473,275){0,-1}...               % 2
+      (528,115){1,-1}...               % 3
+      (650,78){1,0}...               % 4
+      (878,204){1,1}...               % 5
+      (994,462){157,701}...               % *6
+      (1035,905){0,1}...{0,1535}          % 7
+      (1035,2440)--                    % 8
+      (1270,2440){0,-1257}...          % 9
+      (1270,1183){0,-2}...               % 10
+      (1270,1072){0,-2}...               % 11
+      (1270,852){0,-1}...               % 12
+      (1035,136){-1,-1}...               % 13
+      (562,-41){-1,0}...               % 14
+      (252,80){-1,1}...               % 15
+      (169,311){0,1}...               % 16
+      (225,450){1,1}...{1,0}               % 17
+      (332,480)--cycle);               % 18
+
+endchar(0);
+
+"smuq";
+
+charbegin( "Q", 2253h#, capheight*v#, baseline );
+n := 11;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 7;
+t5 := 9;
+t6 := 10;
+t7 := 12;
+t8 := 15;
+t9 := 18;
+t10 := 21;
+t11 := 23;
+
+adj_fill.A(6, 11)                    % fixed x points
+     (1, 5, 10)                    % fixed y points
+     ((1,2), (11,1))                    % tied points
+     ((4,7), (2,9))                    % verticals
+     ((3,8))                         % horizontals
+     ((1322,291){370,118}...               % 0
+      (1739,548){1,1}...               % 1
+      (2104,1533){0,1}...               % 2
+      (2040,2032){-245,833}...          % *3
+      (1859,2366){-1,1}...               % 4
+      (1225,2601){-1,0}...               % 5
+      (474,2347){-1,-1}...               % 6
+      (168,1514){0,-1}...               % 7
+      (458,792){1,-1}...{1,0}          % 8
+      (930,611)--                    % 9
+      (962,690){-756,178}...               % 10
+      (639,841){-1,1}...               % 11
+      (415,1485){0,1}...               % 12
+      (485,1972){270,833}...               % *13
+      (685,2318){1,1}...               % 14
+      (1191,2482){1,0}...               % 15
+      (1622,2333){1,-1}...               % 16
+      (1785,2019){220,-803}...          % *17
+      (1842,1530){0,-1}...               % 18
+      (1774,940){-262,-967}...          % *19
+      (1580,563){-1,-1}...               % 20
+      (1124,358){-1,0}...               % 21
+      (891,381){-744,103}...{-1,0}          % 22
+      (717,388)--cycle);               % 23
+
+n := 7;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 6;
+t5 := 9;
+t6 := 11;
+t7 := 14;
+
+adj_fill.B()                         % fixed x points
+     (1, 5)                         % fixed y points
+     ((3,2), (4,1))                    % tied points
+     ()                         % verticals
+     ((4,6), (2,7))                    % horizontals
+     ((2115,483){-152,-425}...          % 0
+      (1969,236){-1,-1}...               % 1
+      (1824,156){-1,0}...               % 2
+      (1683,180){-361,111}...{-361,111}     % 3
+      (1322,291){-434,90}...               % 4
+      (888,381){-341,48}...               % 5
+      (717,388){-1,0}...               % 6
+      (384,276){-1,-1}...{-128,-368}          % 7
+      (217,-59)--                    % 8
+      (295,-97){78,278}...               % 9
+      (404,95){1,1}...               % 10
+      (624,159){1,0}...               % 11
+      (860,132){707,-155}...               % 12
+      (1567,-23){707,-155}...          % 13
+      (1789,-40){1,0}...               % 14
+      (2000,77){1,1}...{115,533}          % 15
+      (2180,448)--cycle);               % 16
+
+endchar(0);
+
+"smur";
+
+charbegin( "R", 2476h#, capheight*v#, baseline );
+n := 15;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 6;
+t5 := 7;
+t6 := 11;
+t7 := 12;
+t8 := 13;
+t9 := 14;
+t10 := 16;
+t11 := 18;
+t12 := 23;
+t13 := 25;
+t14 := 26;
+t15 := 27;
+
+adj_fill.A(1, 15)                    % fixed x points
+     (7, 9)                         % fixed y points
+     ((1,7), (4,1), (5,2), (7,3), (8,3), (13,4), (14,5), (15,6))% tied points
+     ((6,10), (3,12))               % verticals
+     ((5,11), (2,14))               % horizontals
+     ((1303,1254){291,-64}...          % 0
+      (1456,1243){1,0}...               % 1
+      (1855,1406){1,1}...               % 2
+      (2030,1905){0,1}...               % 3
+      (1889,2319){-1,1}...               % 4
+      (1689,2397){-586,104}...{-1,0}          % *5
+      (1303,2423){-249,0}...{-249,0}          % 6
+      (1054,2423){-1,0}...               % 7
+      (448,2207){-1,-1}...               % 8
+      (347,1989){0,-1}...               % 9
+      (363,1867){89,-485}...               % 10
+      (391,1740){0,-1}...{-1,-1}          % 11
+      (344,1626)--                    % 12
+      (344,1626){-1,-1}...               % 13
+      (239,1571){-1,0}...               % 14
+      (149,1614){-1,1}...               % 15
+      (75,1809){0,1}...               % 16
+      (248,2233){1,1}...{1,0}          % 17
+      (1054,2549){249,117}...          % 18
+      (1303,2666){.9051,-.5747}...{0,-106}     % 19
+      (1303,2560){1,0}...               % 20
+      (1837,2512){842,-185}...          % *21
+      (2145,2375){1,-1}...               % 22
+      (2294,1947){0,-1}...               % 23
+      (2108,1439){-1,-1}...{-279,-90}     % 24
+      (1676,1183){-230,-57}...{-230,-57}     % 25
+      (1446,1126){-143,14}...{-143,14}     % 26
+      (1303,1140)--cycle);               % 27
+
+n := 10;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 8;
+t5 := 9;
+t6 := 10;
+t7 := 11;
+t8 := 12;
+t9 := 15;
+t10 := 18;
+
+adj_fill.B(1)                         % fixed x points
+     (2, 10)                         % fixed y points
+     ((1,8), (5,2), (6,1), (7,7), (8,6), (10,8))% tied points
+     ((4,7))                         % verticals
+     ((3,9))                         % horizontals
+     ((54,372){1,1}...               % 0
+      (157,414){1,0}...               % 1
+      (237,379){1,-1}...               % 2
+      (312,280){157,-276}...               % 3
+      (373,190){1,-1}...               % 4
+      (537,146){1,0}...               % 5
+      (846,284){1,1}...               % 6
+      (1000,586){208,777}...               % *7
+      (1054,1061){0,1}...{0,1362}          % 8
+      (1054,2423)--                    % 9
+      (1303,2423){0,-1169}...{0,-1169}     % 10
+      (1303,1254){0,-114}...{0,-114}          % 11
+      (1303,1140){-140,-910}...          % 12
+      (1167,587){-336,-897}...          % *13
+      (967,243){-1,-1}...               % 14
+      (387,-30){-1,0}...               % 15
+      (112,60){-1,1}...               % 16
+      (12,259){0,1}...{1,1}               % 17
+      (54,372)--cycle);               % 18
+
+n := 5;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 9;
+
+adj_fill.C()                         % fixed x points
+     (1)                         % fixed y points
+     ((3,4), (4,5))                    % tied points
+     ()                         % verticals
+     ((2,5))                         % horizontals
+     ((2479,412){-160,-535}...          % 0
+      (2390,260){-1,-1}...               % 1
+      (2290,209){-1,0}...               % 2
+      (2170,259){-1,1}...               % 3
+      (1827,809){-151,374}...{-151,374}     % 4
+      (1676,1183)--                    % 5
+      (1446,1126){349,-819}...          % 6
+      (1795,307){349,-819}...          % 7
+      (1990,31){1,-1}...               % 8
+      (2171,-24){1,0}...               % 9
+      (2375,81){1,1}...{190,618}          % 10
+      (2529,370)--cycle);               % 11
+
+endchar(0);
+
+"smus";
+
+charbegin( "S", 1807h#, capheight*v#, baseline );
+
+n := 22;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 5;
+t5 := 7;
+t6 := 9;
+t7 := 13;
+t8 := 15;
+t9 := 17;
+t10 := 19;
+t11 := 20;
+t12 := 23;
+t13 := 25;
+t14 := 27;
+t15 := 32;
+t16 := 34;
+t17 := 35;
+t18 := 36;
+t19 := 38;
+t20 := 40;
+t21 := 42;
+t22 := 43;
+
+adj_fill.A(11, 18)                    % fixed x points
+     (1, 21)                         % fixed y points
+     ((1,1), (22,1))                    % tied points
+%     ((9,12), (7,14), (6,15), (4,17), (2,20))% verticals
+     ((9,12), (7,14), (6,15), (4,18), (2,20))% verticals % DEK
+     ((10,11), (8,13), (5,16), (3,19))     % horizontals
+     ((887,761){1,1}...               % 0
+      (911,847){0,1}...               % 1
+      (849,976){-1,1}...               % 2
+      (593,1052){-1,0}...               % 3
+      (216,934){-1,-1}...               % 4
+      (72,519){0,-1}...               % 5
+      (222,136){1,-1}...               % 6
+      (724,-63){1,0}...               % 7
+      (1491,254){1,1}...               % 8
+      (1679,774){0,1}...               % 9
+      (1516,1199){-1,1}...               % 10
+      (1054,1490){-882,400}...          % 11
+      (649,1746){-1,1}...               % 12
+      (486,2104){0,1}...               % 13
+      (602,2369){1,1}...               % 14
+      (950,2488){1,0}...               % 15
+      (1241,2384){1,-1}...               % 16
+      (1319,2200){0,-1}...               % 17
+      (1247,2032){-1,-1}...{-1,0}          % 18
+      (1076,1961)--                    % 19
+      (1069,1908){337,-84}...          % 20
+      (1205,1885){1,0}...               % 21
+      (1494,2018){1,1}...               % 22
+      (1563,2207){0,1}...               % 23
+      (1471,2475){-1,1}...               % 24
+      (998,2618){-1,0}...               % 25
+      (388,2413){-1,-1}...               % 26
+      (243,2029){0,-1}...               % 27
+      (438,1570){1,-1}...               % 28
+      (624,1435){481,-280}...          % *29
+      (919,1290){818,-350}...          % 30
+      (1294,1031){1,-1}...               % 31
+      (1411,643){0,-1}...               % 32
+      (1241,249){-1,-1}...               % 33
+      (791,70){-1,0}...               % 34
+      (434,240){-1,1}...               % 35
+      (279,648){0,1}...               % 36
+      (352,879){1,1}...               % 37
+      (510,939){1,0}...               % 38
+      (604,916){1,-1}...               % 39
+      (654,821){67,-285}...               % 40
+      (690,742){1,-1}...               % 41
+      (781,706){1,0}...{1,1}               % 42
+      (887,761)--cycle);               % 43
+
+endchar(0);
+
+"smut";
+
+%charbegin( "T", 2043h#, capheight*v#, baseline );
+charbegin( "T", (2043+80)*h#, capheight*v#, baseline ); % DEK
+n := 12;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 6;
+t5 := 8;
+t6 := 9;
+t7 := 11;
+t8 := 16;
+t9 := 17;
+t10 := 18;
+t11 := 19;
+t12 := 21;
+
+adj_fill.A(12)                         % fixed x points
+     (1, 5, 6)                    % fixed y points
+     ((5,1), (6,1), (9,2), (10,3))          % tied points
+     ((4,7))                         % verticals
+     ((3,8), (2,11))                    % horizontals
+     ((2286,2576){-178,-297}...          % 0
+      (2162,2425){-1,-1}...               % 1
+      (1969,2333){-1,0}...               % 2
+      (1352,2440){-1262,310}...          % 3
+      (793,2547){-1,0}...               % 4
+      (215,2324){-1,-1}...               % 5
+      (-3,1864){0,-1}...               % 6
+      (82,1636){1,-1}...{1,0}          % 7
+      (203,1570)--                    % 8
+      (203,1570){1,0}...               % 9
+      (311,1629){1,1}...               % 10
+      (368,1734){0,1}...               % 11
+      (336,1819){-1,1}...               % 12
+      (249,1926){-118,193}...          % *13
+      (218,2012){0,1}...               % 14
+      (321,2274){1,1}...               % 15
+      (592,2352){1,0}...{287,-80}          % 16
+      (1180,2228){261,-61}...{261,-61}     % 17
+      (1441,2167){542,-111}...          % 18
+      (1871,2096){1,0}...               % 19
+      (2140,2208){1,1}...{227,462}          % 20
+      (2361,2535)--cycle);               % 21
+
+n := 11;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 5;
+t5 := 8;
+t6 := 9;
+t7 := 10;
+t8 := 11;
+t9 := 14;
+t10 := 16;
+t11 := 17;
+
+adj_fill.B()                         % fixed x points
+     (2, 11)                         % fixed y points
+     ((1,4), (6,2), (7,3), (11,4))          % tied points
+     ((5,8), (3,10))                    % verticals
+     ((4,9))                         % horizontals
+     ((380,432){1,1}...               % 0
+      (490,484){1,0}...               % 1
+      (603,429){1,-1}...               % 2
+      (624,302){-53,-458}...               % 3
+      (663,129){1,-1}...               % 4
+      (791,83){1,0}...               % 5
+      (1016,181){1,1}...               % 6
+      (1137,459){164,765}...               % *7
+      (1180,946){0,1}...{0,1282}          % 8
+      (1180,2228)--                    % 9
+      (1441,2167){0,-995}...               % 10
+      (1441,1172){0,-1}...               % 11
+      (1368,558){-282,-1013}...          % *12
+      (1159,159){-1,-1}...               % 13
+      (701,-42){-1,0}...               % 14
+      (405,61){-1,1}...               % 15
+      (324,310){0,1}...{1,1}               % 16
+      (380,432)--cycle);               % 17
+mathcorr(150h#); % DEK
+endchar(0);
+
+"smuu";
+
+charbegin( "U", 2444h#, capheight*v#, baseline );
+n := 12;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 7;
+t5 := 10;
+t6 := 13;
+t7 := 14;
+t8 := 17;
+t9 := 19;
+t10 := 21;
+t11 := 24;
+t12 := 26;
+
+adj_fill.A(12)                         % fixed x points
+     (1, 6)                         % fixed y points
+     ((1,2), (12,1))                    % tied points
+     ((6,7), (4,9), (3,10))               % verticals
+     ((5,8), (2,11))                    % horizontals
+     ((1631,541){-188,-239}...          % 0
+      (1438,326){-1,-1}...               % 1
+      (1008,99){-1,0}...               % 2
+      (775,192){-1,1}...               % 3
+      (668,394){-145,510}...               % *4
+      (630,702){0,1}...               % 5
+      (703,1238){94,470}...               % 6
+      (801,2006){0,1}...               % 7
+      (769,2307){-123,486}...          % *8
+      (678,2492){-1,1}...               % 9
+      (422,2583){-1,0}...               % 10
+      (138,2482){-1,-1}...               % 11
+      (-6,2071){0,-1}...{62,-437}          % 12
+      (16,1802)--                    % 13
+      (118,1836){-20,322}...               % 14
+      (100,2050){0,1}...               % 15
+      (201,2330){1,1}...               % 16
+      (319,2374){1,0}...               % 17
+      (434,2321){1,-1}...               % 18
+      (549,1952){0,-1}...               % 19
+      (458,1231){-92,-435}...          % 20
+      (375,536){0,-1}...               % 21
+      (405,269){116,-436}...               % *22
+      (491,100){1,-1}...               % 23
+      (850,-58){1,0}...               % 24
+      (1503,246){1,1}...{163,190}          % 25
+      (1643,390)--cycle);               % 26
+
+n := 9;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 9;
+t5 := 10;
+t6 := 12;
+t7 := 13;
+t8 := 15;
+t9 := 17;
+
+adj_fill.B(4, 9)                    % fixed x points
+     (1, 5)                         % fixed y points
+     ((6,2), (7,1))                    % tied points
+     ((3,6))                         % verticals
+     ((2,8))                         % horizontals
+     ((2396,404){-209,-413}...          % 0
+      (2268,216){-1,-1}...               % 1
+      (2126,153){-1,0}...               % 2
+      (2026,213){-1,1}...               % 3
+      (1913,464){-153,682}...          % *4
+      (1873,895){0,1}...               % 5
+      (1966,2026){69,343}...               % 6
+      (2047,2292){194,438}...          % *7
+      (2160,2464){338,317}...{461,259}     % 8
+      (2279,2546)--                    % 9
+      (2216,2585){-360,-148}...{-211,-137}     % 10
+      (1752,2334){-83,-828}...{0,-1}          % 11
+      (1631,541){12,-151}...{12,-151}     % 12
+      (1643,390){92,-413}...               % 13
+      (1816,16){1,-1}...               % 14
+      (1997,-57){1,0}...               % 15
+      (2283,71){1,1}...{149,331}          % 16
+      (2452,358)--cycle);               % 17
+
+endchar(0);
+
+"smuv";
+
+charbegin( "V", 2261h#, capheight*v#, baseline );
+n := 12;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 7;
+t5 := 12;
+t6 := 15;
+t7 := 16;
+t8 := 18;
+t9 := 24;
+t10 := 27;
+t11 := 29;
+t12 := 31;
+
+adj_fill.A(12)                         % fixed x points
+     (1, 7)                         % fixed y points
+     ()                         % tied points
+     ((6,7), (3,10))                    % verticals
+     ((5,8), (4,9), (2,11))               % horizontals
+     ((1382,2046){81,405}...               % 0
+      (1531,2364){1,1}...               % 1
+      (1713,2417){1,0}...               % 2
+      (1916,2330){1,-1}...               % 3
+      (2000,2054){-.05228,-1.896}...          % 4
+      (1912,1642){-324,-886}...          % *5
+      (1676,1168){-464,-750}...{-464,-750}     % 6
+      (1212,418){-42,-11}...{-42,-11}     % 7
+      (1170,407){-255,1414}...          % 8
+      (915,1821){-255,1414}...          % 9
+      (804,2267){-247,696}...          % *10
+      (668,2517){-1,1}...               % 11
+      (453,2615){-1,0}...               % 12
+      (181,2501){-1,-1}...               % 13
+      (67,2300){-182,-518}...{-66,-581}     % *14
+      (-1,1983)--                    % 15
+      (87,1972){79,420}...               % 16
+      (196,2302){1,1}...               % 17
+      (333,2357){1,0}...               % 18
+      (444,2304){1,-1}...               % 19
+      (634,1926){363,-1134}...          % *20
+      (807,1170){253,-1428}...{21,-344}     % 21
+      (973,-19){25,-33}...{25,-33}          % 22
+      (998,-52){190,104}...{190,104}          % 23
+      (1188,52){275,635}...               % 24
+      (1731,1034){661,1089}...          % 25
+      (2134,1766){530,1162}...          % *26
+      (2261,2196){0,1}...               % 27
+      (2140,2510){-1,1}...               % 28
+      (1831,2624){-1,0}...               % 29
+      (1487,2482){-1,-1}...{-65,-404}     % 30
+      (1300,2059)--cycle);               % 31
+
+endchar(0);
+
+"smuw";
+
+charbegin( "W", 3463h#, capheight*v#, baseline );
+n := 16;
+t1 := 0;
+t2 := 1;
+t3 := 4;
+t4 := 6;
+t5 := 8;
+t6 := 11;
+t7 := 15;
+t8 := 19;
+t9 := 21;
+t10 := 22;
+t11 := 25;
+t12 := 30;
+t13 := 37;
+t14 := 41;
+t15 := 43;
+t16 := 45;
+
+adj_fill.A(16)                         % fixed x points
+     (1, 4, 7, 10, 12, 13)               % fixed y points
+     ()                         % tied points
+     ((9,10), (5,6), (3,14))               % verticals
+     ((8,11), (2,15))               % horizontals
+     ((2657,2285){232,288}...          % 0
+      (2909,2427){1,0}...               % 1
+      (3108,2318){1,-1}...               % 2
+      (3177,2179){93,-363}...          % *3
+      (3201,1955){0,-1}...               % 4
+      (3050,1348){-593,-1506}...{-553,-980}     % *5
+      (2608,449){-212,809}...          % 6
+      (2311,1256){-544,1163}...          % 7
+      (2050,2260){0,1}...{172,813}          % 8
+      (2083,2585){-45,30}...{-45,30}          % 9
+      (2038,2615){-205,-124}...{-205,-124}     % 10
+      (1833,2491){0,-1}...               % 11
+      (1719,1877){-448,-1417}...          % *12
+      (1385,1074){-301,-605}...{-301,-605}     % 13
+      (1084,469){-33,0}...{-33,0}          % 14
+      (1051,469){-4,314}...               % 15
+      (948,1799){-369,2005}...          % *16
+      (835,2218){-266.1,675.4}...          % *17
+      (682,2474){-1,1}...               % 18
+      (430,2602){-1,0}...               % 19
+      (174,2511){-1,-1}...{0,-1}          % 20
+      (-7,1986)--                    % 21
+      (80,1980){65,420}...               % 22
+      (129,2179){121,323}...               % *23
+      (201,2303){1,1}...               % 24
+      (311,2349){1,0}...               % 25
+      (454,2270){1,-1}...               % 26
+      (621,1987){284.4,-749.1}...          % *27
+      (738,1521){376,-2275}...{0,-1}          % *28
+      (830,-5){43,-28}...{43,-28}          % 29
+      (873,-33){189,95}...               % 30
+      (1033,37){189,95}...               % *31
+      (1062,62){200,400}...               % 32
+      (1470,991){230,591}...{161,325}     % 33
+      (1836,1795){213,-625}...          % 34
+      (2125,1051){358,-797}...{36,-559}     % 35
+      (2408,-3){34,-19}...{34,-19}          % 36
+      (2442,-22){171,84}...{171,84}          % 37
+      (2613,62){235,665}...               % 38
+      (3048,1023){528,1005}...          % 39
+      (3358,1691){415,1098}...          % *40
+      (3463,2121){0,1}...               % 41
+      (3327,2503){-1,1}...               % 42
+      (3080,2625){-1,0}...               % 43
+      (2680,2439){-1,-1}...{-240,-333}     % 44
+      (2592,2315)--cycle);               % 45
+
+endchar(0);
+
+"smux";
+
+charbegin( "X", 2454h#, capheight*v#, baseline );
+n := 15;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 10;
+t6 := 14;
+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
+     ((2354,596){0,-1}...               % 0
+      (2143,111){-1,-1}...               % 1
+      (1819,-32){-1,0}...               % 2
+      (1546,61){-1,1}...               % 3
+      (1393,336){-307,783}...{-181,741}     % *4
+      (1239,844){-25,281}...{-25,281}     % 5
+      (1214,1125){-59,457}...          % 6
+      (1052,1997){-368,1311}...          % *7
+      (956,2269){-206.5,439.1}...          % *8
+      (846,2436){-1,1}...               % 9
+      (646,2507){-1,0}...               % 10
+      (415,2433){-1,-1}...               % 11
+      (351,2294){0,-1}...               % 12
+      (360,2189){131,-551}...          % 13
+      (399,2047){0,-1}...{-1,-1}          % 14
+      (360,1954)--                    % 15
+      (360,1954){-1,-1}...               % 16
+      (256,1906){-1,0}...               % 17
+      (160,1948){-1,1}...               % 18
+      (112,2138){0,1}...               % 19
+      (247,2455){1,1}...               % 20
+      (743,2632){1,0}...               % 21
+      (1105,2513){1,-1}...               % 22
+      (1266,2203){276,-856}...{51,-375}     % *23
+      (1381,1657){40,-346}...{40,-346}     % 24
+      (1421,1311){88,-588}...          % 25
+      (1578,607){366,-1102}...          % *26
+      (1787,209){1,-1}...               % 27
+      (1951,156){1,0}...               % 28
+      (2116,244){1,1}...{46,523}          % 29
+      (2270,612)--cycle);               % 30
+
+n := 7;
+t1 := 0;
+t2 := 3;
+t3 := 6;
+t4 := 7;
+t5 := 8;
+t6 := 12;
+t7 := 15;
+
+adj_fill.B()                         % fixed x points
+     (3, 5)                         % fixed y points
+     ((1,4), (3,6), (4,6), (7,5))          % tied points
+     ()                         % verticals
+     ((2,6))                         % horizontals
+     ((1381,1657){188,517}...          % 0
+      (1599,2146){456,819}...          % *1
+      (1837,2476){1,1}...               % 2
+      (2178,2630){1,0}...               % 3
+      (2406,2548){1,-1}...               % 4
+      (2465,2412){0,-1}...{-1,-1}          % 5
+      (2427,2302)--                    % 6
+      (2427,2302){-1,-1}...               % 7
+      (2320,2234){-1,0}...               % 8
+      (2250,2257){-1,1}...               % 9
+      (2214,2321){-144,356}...          % 10
+      (2169,2379){-1,1}...               % 11
+      (2049,2426){-1,0}...               % 12
+      (1874,2353){-1,-1}...               % 13
+      (1613,1941){-453,-1042}...{-104,-498}     % *14
+      (1421,1311)--cycle);               % 15
+
+n := 7;
+t1 := 0;
+t2 := 2;
+t3 := 5;
+t4 := 6;
+t5 := 7;
+t6 := 11;
+t7 := 14;
+
+adj_fill.C()                         % fixed x points
+     (3, 5)                         % fixed y points
+     ((1,1), (3,7), (4,7), (7,2))          % tied points
+     ()                         % verticals
+     ((2,6))                         % horizontals
+     ((1239,844){-155,-440}...          % 0
+      (859,159){-1,-1}...               % 1
+      (407,-45){-1,0}...               % 2
+      (166,46){-1,1}...               % 3
+      (79,236){0,1}...{1,1}               % 4
+      (112,349)--                    % 5
+      (112,349){1,1}...               % 6
+      (220,408){1,0}...               % 7
+      (315,371){1,-1}...               % 8
+      (375,252){147,-627}...               % 9
+      (425,167){1,-1}...               % 10
+      (537,125){1,0}...               % 11
+      (771,241){1,1}...               % 12
+      (1003,584){443,884}...{135,431}     % *13
+      (1214,1125)--cycle);               % 14
+
+endchar(0);
+
+"smuy";
+
+charbegin( "Y", 2006h#, capheight*v#, baseline );
+n := 10;
+t1 := 0;
+t2 := 3;
+t3 := 7;
+t4 := 9;
+t5 := 11;
+t6 := 12;
+t7 := 13;
+t8 := 16;
+t9 := 19;
+t10 := 20;
+
+adj_fill.A(1, 5, 10)                    % fixed x points
+     (1, 6)                         % fixed y points
+     ((1,2), (10,1))                    % tied points
+     ((3,8))                         % verticals
+     ((4,7), (2,9))                    % horizontals
+     ((1488,1693){-46,-368}...          % 0
+      (1331,1444){-1,-1}...               % 1
+      (1089,1255){-459,-256}...          % *2
+      (872,1188){-1,0}...               % 3
+      (670,1277){-1,1}...               % 4
+      (606,1415){-86,374}...               % *5
+      (584,1651){0,1}...               % 6
+      (605,2311){0,1}...               % 7
+      (552,2552){-1,1}...               % 8
+      (440,2602){-1,0}...               % 9
+      (168,2450){-1,-1}...{-284,-432}     % 10
+      (-9,2214)--                    % 11
+      (64,2179){353,348}...               % 12
+      (289,2339){1,0}...               % 13
+      (344,2318){1,-1}...               % 14
+      (360,2267){11,-245}...               % *15
+      (355,2073){0,-1}...               % 16
+      (345,1518){0,-1}...               % 17
+      (455,1140){1,-1}...               % 18
+      (729,1009){1,0}...{256,332}          % 19
+      (1488,1444)--cycle);               % 20
+
+n := 11;
+t1 := 2;
+t2 := 4;
+t3 := 6;
+t4 := 9;
+t5 := 10;
+t6 := 13;
+t7 := 15;
+t8 := 18;
+t9 := 19;
+t10 := 20;
+t11 := 21;
+
+adj_fill.B(4)                         % fixed x points
+     ()                         % fixed y points
+     ((4,3), (5,4), (8,4), (9,3), (10,1), (11,2))% tied points
+     ((3,6), (1,9))                    % verticals
+     ((4,5), (2,7))                    % horizontals
+     ((1697,2589){50,-39}...{50,-39}          % 0
+      (1747,2550){-9,-343}...          % 1
+      (1717,921){0,-1}...               % 2
+      (1310,-259){-1,-1}...               % 3
+      (767,-511){-1,0}...               % 4
+      (492,-412){-1,1}...               % 5
+      (384,-163){0,1}...               % 6
+      (491,170){413,718}...               % *7
+      (797,555){1,1}...{405,244}          % 8
+      (1488,1024)--                    % 9
+      (1476,872){-491,-196}...          % 10
+      (930,526){-1,-1}...               % 11
+      (704,224){-306,-595}...          % *12
+      (624,-69){0,-1}...               % 13
+      (681,-301){1,-1}...               % 14
+      (894,-386){1,0}...               % 15
+      (1166,-247){1,1}...               % 16
+      (1395,193){310,1119}...{0,1}          % *17
+      (1476,872){12,152}...{12,152}          % 18
+      (1488,1024){0,420}...{0,420}          % 19
+      (1488,1444){0,249}...{0,249}          % 20
+      (1488,1693){0,1}...{0,1}          % 21
+      (1493,2472)--cycle);               % 22
+
+endchar(0);
+
+"smuz";
+
+charbegin( "Z", 2232h#, capheight*v#, baseline );
+n := 11;
+t1 := 0;
+t2 := 1;
+t3 := 3;
+t4 := 7;
+t5 := 8;
+t6 := 9;
+t7 := 10;
+t8 := 12;
+t9 := 14;
+t10 := 18;
+t11 := 19;
+
+adj_fill.A(11)                         % fixed x points
+     (5, 7)                         % fixed y points
+     ((1,3), (5,1), (6,1), (11,2))          % tied points
+     ((4,8))                         % verticals
+     ((3,9), (2,10))                    % horizontals
+     ((1521,2054){-329,-103}...          % 0
+      (1420,2047){-1,0}...               % 1
+      (1017,2265){-654,457}...          % 2
+      (713,2393){-1,0}...               % 3
+      (503,2313){-1,-1}...               % 4
+      (404,2114){0,-1}...               % 5
+      (445,1980){219,-514}...          % 6
+      (499,1843){0,-1}...{-1,-1}          % 7
+      (468,1748)--                    % 8
+      (468,1748){-1,-1}...               % 9
+      (354,1691){-1,0}...               % 10
+      (236,1742){-1,1}...               % 11
+      (192,1927){0,1}...               % 12
+      (426,2396){1,1}...               % 13
+      (830,2593){1,0}...               % 14
+      (999,2548){397,-176}...          % *15
+      (1227,2417){715,-486}...          % 16
+      (1495,2239){385,-220}...          % *17
+      (1612,2197){1,0}...{1,1}          % 18
+      (1697,2254)--cycle);               % 19
+
+n := 4;
+t1 := 3;
+t2 := 4;
+t3 := 14;
+t4 := 15;
+
+adj_fill.B()                         % fixed x points
+     ()                         % fixed y points
+     ((1,3), (2,2), (3,4), (4,5))          % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((133,43){-19,53}...{-19,53}          % 0
+      (114,96){1283,1773}...               % 1
+      (1397,1869){1283,1773}...          % 2
+      (1521,2054){284,519}...{176,200}     % 3
+      (1697,2254){1,1}...               % 4
+      (1762,2341){103,222}...          % 5
+      (1816,2465){105,65}...{32,5}          % 6
+      (1848,2470){30,-7}...{30,-7}          % 7
+      (1878,2463)--                    % 8
+      (1935,2412){17,-23}...{17,-23}          % 9
+      (1952,2389){1,-30}...               % 10
+      (1953,2359){-27,-112}...          % 11
+      (1909,2310){-162,-174}...{-126,-136}     % 12
+      (1783,2174){-1269,-1743}...{-247,-387}     % 13
+      (514,431){-129,-193}...{-129,-193}     % 14
+      (385,238){-1,-1}...               % 15
+      (350,189){-163,-257}...{-108,-182}     % 16
+      (242,7){-46,-9}...{-46,-9}          % 17
+      (196,-2)--cycle);               % 18
+
+n := 10;
+t1 := 0;
+t2 := 2;
+t3 := 6;
+t4 := 9;
+t5 := 10;
+t6 := 11;
+t7 := 12;
+t8 := 16;
+t9 := 18;
+t10 := 20;
+
+adj_fill.C()                         % fixed x points
+     (1, 10)                         % fixed y points
+     ((1,6), (5,4), (6,5), (10,6))          % tied points
+     ((2,9))                         % verticals
+     ((4,7), (3,8))                    % horizontals
+     ((2050,707){-1,0}...               % 0
+      (1956,675){-1,-1}...               % 1
+      (1906,577){0,-1}...               % 2
+      (1964,442){127,-196}...          % 3
+      (2019,304){0,-1}...               % 4
+      (1992,188){-1,-1}...               % 5
+      (1806,99){-1.848,-.1074}...          % 6
+      (1628,160){-411,220}...          % 7
+      (1217,380){-411,220}...          % 8
+      (827,511){-1,0}...{-502,-206}          % 9
+      (514,431)--                    % 10
+      (385,238){1,1}...               % 11
+      (617,328){1,0}...               % 12
+      (831,280){521,-190}...               % *13
+      (1138,138){267,-143}...          % 14
+      (1405,-5){267,-143}...               % 15
+      (1623,-61){1.898,.1195}...          % 16
+      (2085,122){1,1}...               % 17
+      (2238,477){0,1}...               % 18
+      (2161,657){-1,1}...{-1,0}          % 19
+      (2050,707)--cycle);               % 20
+
+endchar(0);
+
+% PUNCTUATION
+set_stem_round(155,157,160,180,188,201);
+more_side(0); % DEK
+
+"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);
+
+"smapproximation";
+
+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);
+
+"smand";
+
+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);
+
+"smor";
+
+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);
+
+"smleftbrace";
+
+%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);
+
+"smrightbrace";
+
+%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);
+
+"smverticalbar";
+
+%charbegin( 106, 790h#, programem*v#, baseline*v#);
+charbegin( 106, 790h#, .75programem*v#, .25programem*v#); % DEK
+
+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);
+
+"smbackslash";
+
+%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);
+
+"smss";          %medium 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);
+
+"rmnot";     %logical not sign
+
+charbegin( 58, 2534h#, lcbody*v#, baseline*v#);
+n := 4;
+t1 := 1;
+t2 := 2;
+t3 := 3;
+t4 := 7;
+
+adj_fill.A()                         % fixed x points
+     (4)                         % fixed y points
+     ()                         % tied points
+     ((1,2))                         % verticals
+     ((2,3))                         % horizontals
+     ((2325,764){0,749}...{0,749}          % 0
+      (2325,1513){-2231,0}...{-2231,0}     % 1
+      (94,1513)--                    % 2
+      (94,1361){1941,0}...               % 3
+      (2035,1361){1,0}...               % 4
+      (2122,1355){1.473,-.9487}...          % 5
+      (2149,1305){76,-698}...{55,-543}     % 6
+      (2204,762)--cycle);               % 7
+
+endchar(0);
+
+% Fraktur copied from EUFMCH
+set_stem_round(240,250,267,267,290,315);
+more_side(100h#); % DEK
+
+"FMUR";
+
+charbegin( 60,2866h#, capheight*v#, baseline*v#);
+n := 14;
+t1 := 0;
+t2 := 1;
+t3 := 5;
+t4 := 7;
+t5 := 9;
+t6 := 11;
+t7 := 12;
+t8 := 13;
+t9 := 15;
+t10 := 19;
+t11 := 21;
+t12 := 24;
+t13 := 29;
+t14 := 31;
+
+adj_fill.A(7, 14)                    % fixed x points
+     (1, 8)                         % fixed y points
+     ((12,1))                    % tied points
+     ((6,9), (5,10), (3,12))               % verticals
+     ((4,11), (2,13))               % horizontals
+     ((59,0){3,4}...                    % 0
+      (335,158){1,0}...{1,-1}          % 1
+      (611,-39){155,130}...{5,4}          % 2
+      (1221,473){2,3}...               % 3
+      (1441,1012){75,320}...               % *4
+      (1517,1734){0,1}...               % 5
+      (1281,2403){-1,1}...               % 6
+      (827,2600){-1,0}...               % 7
+      (225,2332){-1,-1}...               % 8
+      (0,1872){0,-1}...               % 9
+      (158,1576){3,-4}...               % 10
+      (315,1320){0,-1}...{-7,-4}          % 11
+      (99,1024)--                    % 12
+      (177,965){5,3}...               % 13
+      (480,1212){105,125}...               % *14
+      (591,1458){0,1}...               % 15
+      (545,1595){-45,80}...               % *16
+      (414,1773){-8,9}...               % 17
+      (282,1951){-45,80}...               % *18
+      (236,2088){0,1}...               % 19
+      (339,2293){1,1}...               % 20
+      (591,2384){1,0}...               % 21
+      (965,2206){1,-1}...               % 22
+      (1140,1888){60,-200}...          % *23
+      (1202,1418){0,-1}...               % 24
+      (1172,903){-30,-215}...          % *25
+      (1084,571){-3,-6}...{-5,-3}          % 26
+      (768,236){-7,8}...               % 27
+      (605,398){-70,55}...               % *28
+      (493,453){-1,0}...               % 29
+      (270,349){-125,-100}...{-3,-4}          % *30
+      (0,59)--cycle);               % 31
+
+n := 6;
+t1 := 0;
+t2 := 6;
+t3 := 8;
+t4 := 9;
+t5 := 11;
+t6 := 15;
+
+adj_fill.B()                         % fixed x points
+     (4)                         % fixed y points
+     ((1,5), (3,2), (4,3), (6,4))          % tied points
+     ()                         % verticals
+     ((2,5), (1,6))                    % horizontals
+     ((2837,1970){-10,-2}...               % 0
+      (2664,1961){-70,10}...               % *1
+      (2561,2009){-3,4}...               % 2
+      (2542,2063){-10,60}...               % *3
+      (2522,2246){-1,8}...               % 4
+      (2443,2502){-5,6}...               % 5
+      (2226,2600){-1,0}...               % 6
+      (1655,2325){-1,-1}...{-5,-6}          % 7
+      (1478,2128)--                    % 8
+      (1517,1891){2,4}...               % 9
+      (1753,2266){1,1}...               % 10
+      (1990,2384){1,0}...               % 11
+      (2147,2285){1,-2}...               % 12
+      (2206,2088){1,-7}...               % 13
+      (2266,1832){1,-1}...{9,-1}          % 14
+      (2403,1773)--cycle);               % 15
+
+n := 7;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 3;
+t5 := 4;
+t6 := 5;
+t7 := 9;
+
+adj_fill.C(5, 6)                    % fixed x points
+     ()                         % fixed y points
+     ((1,11), (3,6), (4,7), (5,8), (6,9), (7,10))% tied points
+     ((2,7))                         % verticals
+     ()                         % horizontals
+     ((2541,630){-2,6}...{-1,24}          % 0
+      (2482,1359){-7,6}...               % 1
+      (2147,1497){-1,0}...               % 2
+      (1852,1497){-1.932,-.3624}...{-90,-35}     % 3
+      (1497,1359)--                    % 4
+      (1497,1261){4,1}...               % 5
+      (1832,1320){1,0}...               % 6
+      (2128,1221){1,-1}...               % 7
+      (2206,1103){1,-5}...{-1,-21}          % 8
+      (2226,394)--cycle);               % 9
+
+n := 4;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 5;
+
+adj_fill.D()                         % fixed x points
+     ()                         % fixed y points
+     ((1,7), (2,4), (3,5), (4,6))          % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((1852,1497){2,1}...               % 0
+      (2403,1773){5,3}...{110,50}          % 1
+      (2837,1970)--                    % 2
+      (2876,1911){-8,-3}...               % 3
+      (2561,1773){-7,-4}...{-5,-4}          % 4
+      (2147,1497)--cycle);               % 5
+
+n := 4;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 3;
+
+adj_fill.E()                         % fixed x points
+     ()                         % fixed y points
+     ((1,2), (2,1), (3,1), (4,3))          % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((1478,2128){-70,-180}...{-70,-180}     % 0
+      (1202,1418)--                    % 1
+      (1202,1418){80,120}...{80,120}          % 2
+      (1517,1891)--cycle);               % 3
+
+n := 4;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 3;
+
+adj_fill.F()                         % fixed x points
+     ()                         % fixed y points
+     ((1,8), (2,1), (3,1), (4,9))          % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((1497,1359){-75,15}...{-75,15}          % 0
+      (1202,1418)--                    % 1
+      (1202,1418){75,-40}...{75,-40}          % 2
+      (1497,1261)--cycle);               % 3
+
+n := 4;
+t1 := 0;
+t2 := 1;
+t3 := 2;
+t4 := 4;
+
+adj_fill.G()                         % fixed x points
+     ()                         % fixed y points
+     ((1,13), (2,10), (3,11), (4,12))     % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((2463,-39){-60,110}...{-60,110}     % 0
+      (2226,394)--                    % 1
+      (2541,630){2,-6}...               % 2
+      (2643,397){50,-80}...{1,0}          % *3
+      (2738,315)--cycle);               % 4
+
+n := 2;
+t1 := 1;
+t2 := 2;
+
+adj_fill.H()                         % fixed x points
+     ()                         % fixed y points
+     ((1,13), (2,12))               % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((2955,335){-125,-95}...{-125,-95}     % 0
+      (2463,-39)--                    % 1
+      (2738,315){1,0}...{5,2}          % 2
+      (2955,394)--cycle);               % 3
+
+endchar(0);
+
+"FMUI";
+
+charbegin( 61,1853h#, capheight*v#, baseline*v#);
+
+n := 6;
+t1 := 0;
+t2 := 2;
+t3 := 4;
+t4 := 8;
+t5 := 10;
+t6 := 12;
+
+adj_fill.A()                         % fixed x points
+     (1, 4)                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ((3,5), (2,6))                    % horizontals
+     ((1832,2541){-200,-155}...          % 0
+      (1612,2395){-95,-50}...          % *1
+      (1458,2344){-1,0}...               % 2
+      (1261,2403){-200,95}...          % 3
+      (690,2600){-1,0}...               % 4
+      (315,2443){-9,-10}...               % 5
+      (167,2204){-77,-160}...{-100,-295}     % *6
+      (12,1812)--                    % 7
+      (79,1773){100,265}...               % 8
+      (315,2167){1,1}...               % 9
+      (611,2285){1,0}...               % 10
+      (821,2242){175,-55}...{200,-75}     % *11
+      (1300,2069){200,105}...{200,185}     % 12
+      (1872,2482)--cycle);               % 13
+
+n := 9;
+t1 := 0;
+t2 := 1;
+t3 := 1.202;
+t4 := 3;
+t5 := 6;
+t6 := 9;
+t7 := 10;
+t8 := 14;
+t9 := 16;
+
+adj_fill.B(1, 7)                    % fixed x points
+     (2, 3, 6)                    % fixed y points
+     ()                         % tied points
+     ((5,8))                         % verticals
+     ((4,9))                         % horizontals
+     ((39,59){100,140}...{200,180}          % 0
+      (433,493){200,325}...               % 1
+      (630,236){1,-1}...               % 2
+      (867,138){1,0}...               % 3
+      (1143,276){1,1}...               % 4
+      (1259,495){40,140}...               % *5
+      (1300,827){0,1}...               % 6
+      (1261,1300){-25,200}...{25,200}     % 7
+      (1241,1773){200,225}...{200,125}     % 8
+      (1734,2206)--                    % 9
+      (1793,2187){-200,-190}...          % 10
+      (1603,1962){-65,-105}...{0,-1}          % *11
+      (1537,1773){5,-60}...               % 12
+      (1556,1537){30,-200}...          % 13
+      (1615,965){0,-1}...               % 14
+      (1399,335){-1,-1}...               % 15
+      (611,-39){-1,0}...{-100,90}          % 16
+      (256,138){-50,-35}...{-50,-35}          % 17
+      (59,0)--cycle);               % 18
+
+endchar(0);
+
+endinput;
+%%% characters which have been eliminated:
+
+"smcong";
+% by DEK, not HZ!
+% actually there's a bug: distance between bars won't be equal after rounding
+% so I'm not using this character
+charbegin( oct"021", 2800h#, (810+925)*v#, (810-925)*v#);
+
+n := 2;
+t1 := 1;
+t2 := 2;
+
+adj_fill.A()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ((1,2))                         % horizontals
+     ((2684,1727){-1650,0}...{-1650,0}     % 0
+      (234,1727)--                    % 1
+      (200,1583){1651,0}...{1651,0}          % 2
+      (2651,1583)--cycle);               % 3
+
+n := 2;
+t1 := 1;
+t2 := 2;
+
+adj_fill.B()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ((1,2))                         % horizontals
+     ((2684,997){-1650,0}...{-1650,0}     % 0
+      (234,997)--                    % 1
+      (200,853){1651,0}...{1651,0}          % 2
+      (2651,853)--cycle);               % 3
+
+n := 2;
+t1 := 1;
+t2 := 2;
+
+adj_fill.C()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ((1,2))                         % horizontals
+     ((2684,267){-1650,0}...{-1650,0}     % 0
+      (234,267)--                    % 1
+      (200,123){1651,0}...{1651,0}          % 2
+      (2651,123)--cycle);               % 3
+
+endchar(0);
+
+
+"smlessthanorequal";
+% by DEK, not HZ!
+charbegin( oct"024", 2800h#, (1430+925)*v#, (1430-925)*v#);
+
+n := 0;
+
+numeric a[],b[],alpha[],beta[];
+pair vec[];
+a6=a8=a10=2493; a7=a9=347; .5[b6,b8]=b7; .5[b6,b10]=925; b6-b8=2000;
+b8-b10=b7-b9=860;
+vec1=(a6,b6)-(a7,b7); vec2=(a8,b8)-(a7,b7);
+vec3=unitvector vec1 rotated 90; vec4=unitvector vec2 rotated 90;
+(a2,b2)=(a6,b6)+55vec3; (a3,b3)=(a6,b6)-75vec3;
+(a0,b0)=(a8,b8)-75vec4; (a5,b5)=(a8,b8)+75vec4;
+(a1,b1)=(a6,b6)+75vec3+alpha1*vec1=(a0,b0)+beta1*vec2;
+(a4,b4)=(a3,b3)+alpha2*vec1=(a5,b5)+beta2*vec2;
+
+adj_fill.A()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((a0,b0)--                    % 0
+      (a1,b1)--                    % 1
+      (a2,b2)--                    % 2
+      (a3,b3)--                    % 3
+      (a4,b4)--                    % 4
+      (a5,b5)--cycle);               % 5
+
+adj_fill.B()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     (((a10,b10)-75vec4)--               % 0
+      ((a9-60,b9)-75vec4)--               % 1
+      ((a9,b9)+75vec4)--               % 2
+      ((a10,b10)+75vec4)--cycle);          % 3
+
+endchar(0);
+
+"smgreaterthanorequal";
+% by DEK, not HZ!
+charbegin( oct"025", 2800h#, (1430+925)*v#, (1430-925)*v#);
+
+n := 0;
+
+numeric a[],b[],alpha[],beta[];
+pair vec[];
+a6=a8=a10=307; a7=a9=2453; .5[b6,b8]=b7; .5[b6,b10]=925; b6-b8=2000;
+b8-b10=b7-b9=860;
+vec1=(a6,b6)-(a7,b7); vec2=(a8,b8)-(a7,b7);
+vec3=unitvector vec1 rotated 90; vec4=unitvector vec2 rotated 90;
+(a2,b2)=(a6,b6)-55vec3; (a3,b3)=(a6,b6)+75vec3;
+(a0,b0)=(a8,b8)+75vec4; (a5,b5)=(a8,b8)-75vec4;
+(a1,b1)=(a6,b6)-75vec3+alpha1*vec1=(a0,b0)+beta1*vec2;
+(a4,b4)=(a3,b3)+alpha2*vec1=(a5,b5)+beta2*vec2;
+
+adj_fill.A()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     ((a0,b0)--                    % 0
+      (a1,b1)--                    % 1
+      (a2,b2)--                    % 2
+      (a3,b3)--                    % 3
+      (a4,b4)--                    % 4
+      (a5,b5)--cycle);               % 5
+
+adj_fill.B()                         % fixed x points
+     ()                         % fixed y points
+     ()                         % tied points
+     ()                         % verticals
+     ()                         % horizontals
+     (((a10,b10)+75vec4)--               % 0
+      ((a9+60,b9)+75vec4)--               % 1
+      ((a9,b9)-75vec4)--               % 2
+      ((a10,b10)-75vec4)--cycle);          % 3
+
+endchar(0);
+
+% ALTERNATE CHARACTERS
+set_stem_round(230,350,270,270,290,310);
+
+"smuio";
+
+%charbegin( "I", 1615h#, capheight*v#, baseline );
+charbegin( 123, 1615h#, capheight*v#, baseline ); %NGB
+n := 15;
+t1 := 0;
+t2 := 4;
+t3 := 6;
+t4 := 9;
+t5 := 12;
+t6 := 14;
+t7 := 16;
+t8 := 17;
+t9 := 19;
+t10 := 21;
+t11 := 24;
+t12 := 26;
+t13 := 28;
+t14 := 30;
+t15 := 31;
+
+adj_fill.A(13)                         % fixed x points
+     (3, 7, 8, 12)                    % fixed y points
+     ((1,2), (7,1), (8,1), (15,2))          % tied points
+     ((6,9), (4,11), (2,14))               % verticals
+     ((5,10))                    % horizontals
+     ((839,1440){-1,-1}...               % 0
+      (819,1450){-1,-1}...               % 1
+      (718,1400){-1,0}...               % 2
+      (623,1430){-1,1}...               % 3
+      (531,1683){0,1}...               % 4
+      (779,2243){1,1}...{417,49}          % 5
+      (1391,2555){12,-30}...               % 6
+      (1403,2525){-.2671,-1.698}...{-73,-88}     % 7
+      (1330,2437){0,-1141}...          % 8
+      (1330,1296){0,-1}...               % 9
+      (1250,623){-306,-1108}...          % *10
+      (1024,188){-1,-1}...               % 11
+      (551,-49){-1,0}...               % 12
+      (147,96){-1,1}...               % 13
+      (47,319){0,1}...               % 14
+      (96,450){1,1}...{1,0}               % 15
+      (242,511)--                    % 16
+      (242,511){1,0}...               % 17
+      (345,461){1,-1}...               % 18
+      (365,333){0,-1}...               % 19
+      (433,177){1,-1}...               % 20
+      (624,98){1,0}...               % 21
+      (888,231){1,1}...               % 22
+      (1043,582){210,963}...               % *23
+      (1098,1194){0,1}...{0,1131}          % 24
+      (1098,2325){-42,13}...{-42,13}          % 25
+      (1056,2338){-441,-195}...          % 26
+      (886,2210){-1,-1}...               % 27
+      (732,1861){0,-1}...               % 28
+      (846,1643){1,-1}...               % 29
+      (868,1536){0,-1}...{-1,-1}          % 30
+      (839,1440)--cycle);               % 31
+
+endchar(0);
+
+
+"smuib";      % '174
+
+%charbegin( 126, 1431h#, capheight*v#, baseline );
+charbegin( 124, 1431h#, capheight*v#, baseline ); % DEK
+n := 9;
+t1 := 1;
+t2 := 2;
+t3 := 7;
+t4 := 8;
+t5 := 9;
+t6 := 10;
+t7 := 12;
+t8 := 15;
+t9 := 16;
+
+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
+     ((1273,2465){-262,-67}...{-262,-67}     % 0
+      (1011,2398){-241,0}...{-241,0}          % 1
+      (770,2398){-658,-114}...          % 2
+      (494,2330){-433,-153}...          % *3
+      (337,2245){-1,-1}...               % 4
+      (245,2062){0,-1}...               % 5
+      (259,1946){155,-849}...          % 6
+      (286,1840){0,-1}...{-1,-1}          % 7
+      (253,1767)--                    % 8
+      (253,1767){-1,-1}...               % 9
+      (154,1711){-1,0}...               % 10
+      (62,1742){-1,1}...               % 11
+      (-1,1878){0,1}...               % 12
+      (166,2278){1,1}...               % 13
+      (513,2474){845,265}...               % *14
+      (1011,2543){1,0}...{577,-34}          % 15
+      (1313,2532)--cycle);               % 16
+
+n := 6;
+t1 := 0;
+t2 := 2;
+t3 := 3;
+t4 := 4;
+t5 := 5;
+t6 := 7;
+
+adj_fill.B(1)                         % fixed x points
+     ()                         % fixed y points
+     ((1,5), (3,1), (4,3), (6,4))          % tied points
+     ((2,5))                         % verticals
+     ()                         % horizontals
+     ((425,177){1,0}...               % 0
+      (683,251){1,1}...               % 1
+      (770,941){0,1}...{0,1457}          % 2
+      (770,2398)--                    % 3
+      (1011,2398){0,-1483}...          % 4
+      (1011,915){0,-1}...               % 5
+      (950,466){-323,-557}...{-1,-1}          % 6
+      (750,177)--cycle);               % 7
+
+n := 3;
+t1 := 0;
+t2 := 1;
+t3 := 6;
+
+adj_fill.C()                         % fixed x points
+     ()                         % fixed y points
+     ((1,5), (2,4))                    % tied points
+     ()                         % verticals
+     ((2,3))                         % horizontals
+     ((425,177){325,0}...{325,0}          % 0
+      (750,177){261,0}...               % 1
+      (1011,177){1,0}...{626,169}          % 2
+      (1397,226)--                    % 3
+      (1428,186){-362,-291}...          % 4
+      (770,2){-1,0}...{-449,0}          % 5
+      (321,2)--cycle);               % 6
+
+endchar(0);
+