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

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


%% @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: [email protected]",
%%     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);


Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].