eufmch.mf

Concrete_Mathematics_2nd_Ed_TeX_Source_Code

t2 := 2.4; % DEK
t3 := 5;
t4 := 6;
t5 := 7;
t6 := 8;
t7 := 12;
t8 := 13;

adj_fill.A(1, 3, 6)                    % fixed x points
     ()                         % fixed y points
     ((4,1), (5,2), (7,2), (8,1))          % tied points
     ((2,7))                         % verticals
     ()                         % horizontals
     ((1225,383){-292,-231}...{-577,-352}     % 0
      (600,-54){-371,338}...{-505,634}     % 1
      (179,375){-64,601}...{110,684}          % 2
      (209,1415){600,373}...{600,373}     % 3
      (809,1788){296,-372}...{368,-257}     % 4
      (1248,1385){-203,-191}...{-544,-435}     % 5
      (459,673)--                    % 6
      (451,839){597,358}...{319,342}          % 7
      (945,1219){-402,253}...          % 8
      (552,1527){-399,397}...          % 9
      (522,1512){-1.277,-1.371}...          % 10
      (486,1425){-153,-567}...{0,-1}          % 11
      (451,839){8,-166}...{8,-166}          % 12
      (459,673){0,-1}...{26,-342}          % 13
      (464,572){528,-547}...{227,-108}     % 14
      (846,284){418,86}...               % 15
      (898,294){308,148}...{308,148}          % 16
      (1206,442)--cycle);               % 17

endchar(lefte#);

"fmlf";
% I switched this with character 2, for better discrimination with RM --- DEK
charbegin( "f", 1008h#, ascender*v#, descender*v#);

n := 10;
t1 := 1;
t2 := 6;
t3 := 7;
t4 := 9;
t5 := 11;
t6 := 12;
t7 := 15;
t8 := 17;
t9 := 18;
t10 := 22;

adj_fill.A(3, 5, 9)                    % fixed x points
     (6)                         % fixed y points
     ()                         % tied points
     ((4,7))                         % verticals
     ((2,3), (1,10), (8,9))               % horizontals
     ((1018,2508){-325,-210}...          % 0
      (874,2459){-1,0}...{-581,435}          % 1
      (615,2581){-386,-410}...{-399,-631}     % 2
      (241,2115){0,-1}...               % 3
      (263,1954){135,-626}...          % *4
      (376,1489){209,-871}...{-237,0}     % 5
      (139,1489){-128,-129}...{-128,-129}     % 6
      (11,1360){365,0}...{365,0}          % 7
      (376,1360){0,-1289}...               % 8
      (376,71){0,-1}...               % 9
      (359,-250){-104,-1067}...{-138,-499}     % 10
      (221,-749)--                    % 11
      (310,-760){0,6}...               % 12
      (310,-754){.4624,1.887}...{291,558}     % 13
      (601,-196){179,596}...               % 14
      (651,212){0,1}...{0,1}               % 15
      (651,1360){1,0}...{342,0}          % 16
      (993,1360){106,129}...{106,129}     % 17
      (1099,1489){-448,21}...          % 18
      (651,1510){0,1}...               % 19
      (539,1917){-249,592}...{0,1}          % 20
      (457,2269){579,-132}...{1,0}          % 21
      (819,2225){224,250}...{224,250}     % 22
      (1043,2475)--cycle);               % 23

endchar(0);

"fmlg";

charbegin( "g",1665h#, lcbody*v#, descender*v#);

n := 12;
t1 := 0;
t2 := 1;
t3 := 3;
t4 := 6;
t5 := 7;
t6 := 8;
t7 := 9;
t8 := 10;
t9 := 13;
t10 := 15;
t11 := 16;
t12 := 21;

adj_fill.A(10, 12)                    % fixed x points
     (1, 8)                         % fixed y points
     ((1,6), (2,1), (4,2), (5,3), (6,4), (7,5))% tied points
     ((5,9))                         % verticals
     ((3,11))                    % horizontals
     ((442,-15){7,-136}...{7,-136}          % 0
      (449,-151){1,-1}...               % 1
      (729,-365){543,-289}...          % *2
      (992,-440){1,0}...               % 3
      (1192,-360){1,1}...               % 4
      (1250,-143){0,1}...{-161,835}          % 5
      (1160,405){-3,111}...{-3,111}          % 6
      (1157,516){1,302}...{62,702}          % 7
      (1192,1360){59,271}...{59,271}          % 8
      (1251,1631){267,150}...{267,150}     % 9
      (1518,1781)--                    % 10
      (1540,1758){-282,-600}...          % 11
      (1471,1410){-84,-1142}...          % *12
      (1456,616){0,-1}...               % 13
      (1476,462){129,-620}...{107,-468}     % *14
      (1585,-4){-492,-617}...{-240,-227}     % 15
      (980,-683){-375,-111}...          % 16
      (848,-714){-1,0}...               % 17
      (506,-634){-719,310}...{-321,252}     % *18
      (129,-404){-129,-69}...{-129,-69}     % 19
      (0,-473){-39,50}...{-39,50}          % 20
      (-39,-423)--cycle);               % 21

n := 8;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;
t5 := 6;
t6 := 7;
t7 := 9;
t8 := 12;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,2), (2,1), (3,6), (5,5), (6,4), (8,3))% tied points
     ((4,7))                         % verticals
     ((5,6))                         % horizontals
     ((1160,405){-123,-88}...{-491,-428}     % 0
      (449,-151){-7,136}...{-7,136}          % 1
      (442,-15){-254,315}...{-254,315}     % 2
      (188,300){-22,304}...{105,690}          % 3
      (231,1422){210,148}...{597,345}     % 4
      (829,1800){295,-197}...{354,-80}     % 5
      (1251,1631)--                    % 6
      (1192,1360){-395,49}...{-291,97}     % 7
      (559,1499){-284,-530}...          % 8
      (473,1022){0,-1}...{28,-315}          % 9
      (491,520){376,-454}...{330,-299}     % 10
      (750,253){407,263}...{407,263}          % 11
      (1157,516)--cycle);               % 12

endchar(0);

"fmlh";

charbegin( "h",1730h#, ascender*v#, descender*v#);
n := 5;
t1 := 3.406;
t2 := 6;
t3 := 8;
t4 := 9;
t5 := 11;

adj_fill.A(2, 5)                    % fixed x points
     ()                         % fixed y points
     ((3,1), (4,2))                    % tied points
     ((1,3))                         % verticals
     ()                         % horizontals
     ((780,2611){-347,-224}...{-446,-328}     % 0
      (334,2283){-89,282}...               % 1
      (245,2565){-1.282,.7616}...{-46,-9}     % 2
      (199,2556){24,-409}...{-34,-581}     % 3
      (182,302){261,-350}...{182,-317}     % 4
      (385,-35)--                    % 5
      (689,243){-248,338}...{-81,162}     % 6
      (508,509){0,1}...{0,811}          % 7
      (508,1320){0,114}...{0,114}          % 8
      (508,1434){0,1}...               % 9
      (508,1922){0,1}...{267,234}          % 10
      (843,2568)--cycle);               % 11

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

adj_fill.B(8)                         % fixed x points
     (1)                         % fixed y points
     ((4,2), (5,1))                    % tied points
     ((2,7))                         % verticals
     ((3,6))                         % horizontals
     ((830,-701){218,220}...{320,430}     % 0
      (1411,-54){118,405}...               % 1
      (1484,369){97,1024}...               % *2
      (1508,970){0,1}...{-46,708}          % 3
      (1484,1604){-183,57}...{-314,292}     % 4
      (1055,1830){-160,-113}...{-475,-374}     % 5
      (508,1434)--                    % 6
      (508,1320){460,298}...               % 7
      (854,1504){1,0}...{207,-152}          % 8
      (1179,1368){63,-834}...          % 9
      (1216,773){0,-1}...               % 10
      (1180,102){-141,-1074}...          % *11
      (1075,-301){-373,-702}...          % 12
      (982,-419){-246,-201}...{-246,-201}     % 13
      (736,-620)--cycle);               % 14

endchar(0);

"fmli";

charbegin( "i",833h#, dotheight*v#, baseline );
n := 4;
t1 := 3.948;
t2 := 7;
t3 := 10.56;
t4 := 13;

adj_fill.A(2, 4)                    % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ((1,3))                         % verticals
     ()                         % horizontals
     ((867,436){-502,-256}...          % 0
      (703,358){-164,-78}...{-193,-8}     % 1
      (671,338){-1,1}...               % 2
      (560,510){-150,531}...               % 3
      (517,945){4,1105}...{91,772}          % *4
      (564,1615){-120,86}...{-259,276}     % 5
      (342,1816){-192,-174}...{-365,-295}     % 6
      (-48,1475)--                    % 7
      (1,1427){486,278}...{228,72}          % 8
      (155,1505){410,-322}...{113,-133}     % 9
      (232,1419){74,-746}...{-49,-397}     % 10
      (238,263){197,-282}...{197,-282}     % 11
      (435,-19){423,323}...{296,277}          % 12
      (891,367)--cycle);               % 13

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

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,2), (2,1), (3,1), (4,2))          % tied points
     ()                         % verticals
     ()                         % horizontals
     ((380,2116){-295,270}...{-368,433}     % 0
      (165,2344){145,143}...{219,252}     % 1
      (390,2557)--                    % 2
      (390,2557){402,-472}...{229,-185}     % 3
      (592,2340){-212,-224}...{-212,-224}     % 4
      (380,2116)--cycle);               % 5

endchar(0);

"fmlj";

charbegin( "j",840h#, dotheight*v#, baseline );
n := 4;
t1 := 3;
t2 := 5;
t3 := 10;
t4 := 13;

adj_fill.A(2, 4)                    % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ((1,3))                         % verticals
     ()                         % horizontals
     ((-29,-711){551,607}...               % 0
      (522,-104){551,607}...               % 1
      (604,157){35,591}...{-10,831}          % 2
      (624,1623){-191,136}...{-417,431}     % 3
      (384,1817){-392,-352}...{-392,-352}     % 4
      (-8,1465)--                    % 5
      (44,1418){130,84}...               % 6
      (174,1502){130,84}...               % 7
      (192,1497){116,-81}...               % 8
      (299,1362){209,-621}...          % 9
      (336,812){0,-1}...               % 10
      (271,-185){-183,-568}...          % 11
      (175,-358){-281,-283}...{-313,-230}     % 12
      (-135,-620)--cycle);               % 13

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

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,2), (2,1), (3,1), (4,2))          % tied points
     ()                         % verticals
     ()                         % horizontals
     ((364,2113){-253,215}...{-321,407}     % 0
      (163,2340){226,211}...{226,211}     % 1
      (389,2551)--                    % 2
      (389,2551){388,-525}...{242,-237}     % 3
      (576,2334){-212,-221}...{-212,-221}     % 4
      (364,2113)--cycle);               % 5

endchar(0);

"fmlk";

charbegin( "k",1242h#, ascender*v#, baseline );

n := 16;
t1 := 0;
t2 := 1;
t3 := 2;
t4 := 3;
t5 := 4;
t6 := 5;
t7 := 6;
t8 := 7;
t9 := 9;
t10 := 11;
t11 := 12;
t12 := 15;
t13 := 16;
t14 := 17;
t15 := 19;
t16 := 20;

adj_fill.A(6, 10, 13)                    % fixed x points
     (1, 9, 11, 15)                    % fixed y points
     ((1,5), (2,1), (3,2), (4,3), (5,4), (16,5))% tied points
     ((8,12))                    % verticals
     ((6,7), (13,14))               % horizontals
     ((270,2550){90,-269}...               % 0
      (360,2281){.7074,-1.869}...{161,-380}     % 1
      (521,1901){0,-572}...{0,-572}          % 2
      (521,1329){321,0}...{321,0}          % 3
      (842,1329){340,0}...{340,0}          % 4
      (1182,1329){-100,-124}...{-100,-124}     % 5
      (1082,1205){-525,0}...{-525,0}          % 6
      (557,1205){0,-670}...{0,-670}          % 7
      (557,535){208,-211}...{278,-201}     % 8
      (843,283){359,178}...{359,178}          % 9
      (1202,461)--                    % 10
      (1242,413){-645,-572}...{-232,-154}     % 11
      (620,-35){-394,351}...{-394,351}     % 12
      (226,316){151,551}...               % 13
      (250,530){20,889}...{0,1}          % *14
      (246,1205){-258,0}...{-258,0}          % 15
      (-12,1205){101,124}...{101,124}     % 16
      (89,1329){157,0}...{157,0}          % 17
      (246,1329){-29,1213}...{-52,496}     % 18
      (217,2542){53,8}...{53,8}          % 19
      (270,2550)--cycle);               % 20

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

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,1), (2,2))                    % tied points
     ()                         % verticals
     ()                         % horizontals
     ((810,2610){-241,-137}...{-413,-347}     % 0
      (360,2281)--                    % 1
      (521,1901){56,694}...               % 2
      (620,2292){163,285}...{231,211}     % 3
      (892,2577)--cycle);               % 4

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

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,3), (3,3), (4,2), (6,4))          % tied points
     ((2,5))                         % verticals
     ()                         % horizontals
     ((521,1329){1,0}...               % 0
      (862,1477){282,335}...               % 1
      (965,1712){0,1}...               % 2
      (920,1838){-172,265}...{-447,380}     % *3
      (793,1977){-424,-212}...          % 4
      (603,1820){-159,-270}...          % 5
      (542,1627){-82,-491}...{0,-1}          % *6
      (521,1329)--                    % 7
      (521,1901){364,282}...{235,158}     % 8