eufmch.mf

Concrete_Mathematics_2nd_Ed_TeX_Source_Code

"rml6";

charbegin( "6", 1858h#, lfigheight*v#, baseline );
n := 14;
t1 := 2;
t2 := 4;
t3 := 5;
t4 := 8;
t5 := 10;
t6 := 12;
t7 := 13;
t8 := 14;
t9 := 16;
t10 := 18;
t11 := 20;
t12 := 22;
t13 := 25;
t14 := 26;

adj_fill.A(8, 14)                    % fixed x points
     (7)                         % fixed y points
     ((2,1), (3,2), (7,2), (8,1))          % tied points
     ((5,10), (3,12))               % verticals
     ((6,9), (4,11), (1,13))               % horizontals
     ((1670,2346){-28,-19}...{-28,-19}     % 0
      (1642,2327){-249,110}...          % 1
      (1420,2372){-1,0}...               % 2
      (830,2101){-297,-275}...{-5,-523}     % 3
      (477,1134){15,-161}...{15,-161}     % 4
      (492,973){23,-345}...               % 5
      (571,513){237,-751}...               % *6
      (729,222){1,-1}...               % 7
      (972,118){1,0}...               % 8
      (1300,232){1,1}...               % 9
      (1451,635){0,1}...               % 10
      (1282,1033){-1,1}...               % 11
      (946,1161){-1,0}...{-381,-288}          % 12
      (492,973)--                    % 13
      (477,1134){27,-4}...{27,-4}          % 14
      (504,1130){379,308}...               % 15
      (1186,1394){1,0}...               % 16
      (1569,1234){1,-1}...               % 17
      (1744,781){0,-1}...               % 18
      (1478,207){-1,-1}...               % 19
      (875,-48){-1,0}...               % 20
      (425,126){-1,1}...               % 21
      (167,879){0,1}...               % 22
      (661,2133){376,379}...               % 23
      (1107,2472){877,458}...          % *24
      (1538,2591){1,0}...{216,-75}          % 25
      (1703,2555)--cycle);               % 26

endchar(0);

"rmn7";

charbegin( "7", 1858h#, nfigbody*v#, descender*v#);
n := 4;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 10;

adj_fill.A()                         % fixed x points
     (1, 4)                         % fixed y points
     ()                         % tied points
     ()                         % verticals
     ((2,3))                         % horizontals
     ((149,-670){-11,49}...{-11,49}          % 0
      (138,-621){222,310}...               % 1
      (1465,1394){404,641}...{-21,18}     % 2
      (1444,1412){-1,0}...{-824,-23}          % 3
      (216,1412)--                    % 4
      (334,1732){503,-63}...               % 5
      (1099,1694){1,0}...{1,0}          % 6
      (1844,1694){0,-59}...{0,-59}          % 7
      (1844,1635){-426,-602}...          % 8
      (1003,374){-1427,-2305}...{-209,-427}     % *9
      (417,-670)--cycle);               % 10

endchar(0);

"fml8";

charbegin( "8", 1858h#, lfigheight*v#, baseline );
n := 19;
t1 := 0;
t2 := 2;
t3 := 4;
t4 := 6;
t5 := 8;
t6 := 9;
t7 := 11;
t8 := 14;
t9 := 16;
t10 := 18;
t11 := 19;
t12 := 21;
t13 := 23;
t14 := 25;
t15 := 26;
t16 := 29;
t17 := 31;
t18 := 33;
t19 := 35;

adj_fill.A(1, 11)                    % fixed x points
     (10, 19)                    % fixed y points
     ((1,1), (5,1), (6,2), (11,3), (15,3), (19,2))% tied points
     ((9,12), (7,14), (4,16), (2,18))     % verticals
     ((8,13), (3,17))               % horizontals
     ((871,1229){385,-257}...          % 0
      (1200,1012){1,-1}...               % 1
      (1385,623){0,-1}...               % 2
      (1247,251){-1,-1}...               % 3
      (905,135){-1,0}...               % 4
      (615,241){-1,1}...               % 5
      (456,656){0,1}...               % 6
      (589,1032){1,1}...{361,189}          % 7
      (871,1229){255,219}...{255,219}     % 8
      (1126,1448){416,250}...          % 9
      (1479,1757){482,652}...          % *10
      (1608,2100){0,1}...               % 11
      (1475,2439){-1,1}...               % 12
      (1266,2555){-535,172}...{-579,37}     % *13
      (940,2611){-391,-151}...          % 14
      (495,2360){-349,-310}...          % 15
      (328,1960){0,-1}...               % 16
      (442,1633){429,-628}...{385,-257}     % *17
      (757,1332)--                    % 18
      (1012,1538){-384,275}...          % 19
      (716,1817){-402,542}...          % *20
      (610,2080){0,1}...               % 21
      (660,2291){208,285}...{261,200}     % 22
      (827,2423){444,-10}...               % 23
      (1195,2296){1,-1}...               % 24
      (1295,2010){0,-1}...{-276,-190}     % 25
      (1012,1538){-262,-221}...{-262,-221}     % 26
      (750,1317){-366,-211}...          % 27
      (306,1007){-1,-1}...               % 28
      (147,581){0,-1}...               % 29
      (323,132){1,-1}...               % 30
      (812,-37){1,0}...               % 31
      (1517,249){1,1}...               % 32
      (1707,730){0,1}...               % 33
      (1536,1135){-1,1}...{-384,275}          % 34
      (1126,1448)--cycle);               % 35

endchar(0);

"rmn9";

charbegin( "9", 1858h#, nfigbody*v#, descender*v#);
n := 14;
t1 := 0;
t2 := 2;
t3 := 6;
t4 := 8;
t5 := 10;
t6 := 11;
t7 := 12;
t8 := 13;
t9 := 15;
t10 := 17;
t11 := 19;
t12 := 20;
t13 := 21;
t14 := 24;

adj_fill.A(6, 14)                    % fixed x points
     (7)                         % fixed y points
     ((6,1), (7,2), (12,2), (13,1))          % tied points
     ((4,9), (2,11))                    % verticals
     ((5,8), (3,10), (1,14))               % horizontals
     ((267,-672){1,0}...               % 0
      (1307,-302){1,1}...               % 1
      (1730,740){0,1}...               % 2
      (1662,1206){-260,798}...          % *3
      (1470,1538){-1,1}...               % 4
      (1226,1678){-604,200}...{-531,22}     % *5
      (866,1738){-293,-138}...          % 6
      (288,1396){-1,-1}...               % 7
      (101,865){0,-1}...               % 8
      (324,287){1,-1}...{370,-28}          % 9
      (754,125){249,64}...{497,267}          % 10
      (1302,350)--                    % 11
      (1256,464){-1,-1}...               % 12
      (909,348){-1,0}...               % 13
      (628,464){-1,1}...               % 14
      (430,976){0,1}...               % 15
      (600,1459){1,1}...               % 16
      (790,1538){1,0}...               % 17
      (1143,1403){1,-1}...               % 18
      (1367,753){0,-1}...{-1,-1}          % 19
      (1256,464){46,-114}...{46,-114}     % 20
      (1302,350){19,-11}...{19,-11}          % 21
      (1321,339){-74,-379}...          % 22
      (1032,-299){-1,-1}...{-1,0}          % 23
      (265,-569)--cycle);               % 24

endchar(0);

% LOWER CASE
set_stem_round(240,250,267,267,290,315);
initrot:=identity shifted(0,-60v);
more_side(100h#); % DEK

"fmla";

charbegin( "a", 1653h#, lcbody*v#, baseline );

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

adj_fill.A(1)                         % fixed x points
     ()                         % fixed y points
     ((3,1), (4,2), (5,3), (6,4))          % tied points
     ((2,7))                         % verticals
     ()                         % horizontals
     ((1739,368){-454,-409}...{-454,-409}     % 0
      (1285,-41){-160,271}...{-160,271}     % 1
      (1125,230){-10,593}...{-29,609}     % 2
      (1116,396){0,117}...{0,117}          % 3
      (1116,513){-4,897}...{-4,897}          % 4
      (1112,1410){72,244}...{72,244}          % 5
      (1184,1654)--                    % 6
      (1432,1781){29,-22}...{29,-22}          % 7
      (1461,1759){-124,-809}...          % 8
      (1393,1007){0,-1}...{12,-411}          % 9
      (1410,502){132,-169}...{132,-169}     % 10
      (1542,333){180,89}...{180,89}          % 11
      (1722,422)--cycle);               % 12

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

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,1), (3,4), (4,3), (6,2))          % tied points
     ((2,5))                         % verticals
     ()                         % horizontals
     ((1116,396){-645,-468}...{-645,-468}     % 0
      (471,-72){-138,145}...{-346,438}     % 1
      (149,299){-15,275}...{158,688}          % 2
      (216,1411){625,393}...{625,393}     % 3
      (841,1804){198,-141}...{190,-38}     % 4
      (1184,1654)--                    % 5
      (1112,1410){-1,0}...{-353,103}          % 6
      (590,1512){-337,-354}...          % 7
      (460,1153){-142,-1003}...{26,-401}     % *8
      (448,509){316,-431}...               % 9
      (671,269){137,-137}...               % 10
      (694,267){1.948,.2212}...          % 11
      (728,278){384,234}...{390,249}          % 12
      (1116,513)--cycle);               % 13

endchar(0);

"fmlb";

charbegin( "b",1700h#, ascender*v#, baseline );

%rot := identity shifted (60h,0v);
rot := rot shifted (60h,0v); % DEK

n := 9;
t1 := 5;
t2 := 9;
t3 := 12;
t4 := 13;
t5 := 15;
t6 := 20;
t7 := 21;
t8 := 22;
t9 := 25;

adj_fill.A(4, 9)                    % fixed x points
     ()                         % fixed y points
     ((3,1), (4,2), (7,2), (8,1))          % tied points
     ((2,5), (1,6))                    % verticals
     ()                         % horizontals
     ((783,2597){-442,-321}...{-442,-321}     % 0
      (341,2276){-32,-14}...{-32,-14}     % 1
      (309,2262){-61,283}...{-61,283}     % 2
      (248,2545){-65,-14}...{-65,-14}     % 3
      (183,2531){22,-441}...               % 4
      (210,1197){0,-1}...{-115,-621}          % 5
      (160,324){268,-288}...{419,-375}     % 6
      (567,-56){329,151}...{552,358}          % 7
      (1408,420){60,295}...{-34,746}          % 8
      (1472,1574){-205,93}...{-457,267}     % 9
      (1038,1798){-153,-94}...{-421,-351}     % 10
      (519,1404){-21,8}...{-21,8}          % 11
      (498,1412)--                    % 12
      (497,1292){557,397}...{370,174}     % 13
      (853,1487){493,-199}...{180,-98}     % 14
      (1166,1350){62,-697}...          % 15
      (1184,901){0,-1}...               % 16
      (1147,523){-143,-603}...          % *17
      (1041,298){-1,-1}...               % 18
      (894,214){-1,0}...{-221,223}          % 19
      (499,514){0,1}...{-2,778}          % 20
      (497,1292){1,120}...               % 21
      (498,1412){-23,576}...               % 22
      (499,1887){19,381}...               % 23
      (736,2454){111,97}...{243,191}          % 24
      (847,2551)--cycle);               % 25

endchar(0);

"fmlc";

charbegin( "c",1242h#, lcbody*v#, baseline );
n := 4;
t1 := 0;
%t2 := 4;
t2 := 3; % DEK
t3 := 6;
%t4 := 9;
t4 := 10; % DEK

adj_fill.A(1, 3)                    % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ((2,4))                         % verticals
     ()                         % horizontals
     ((1228,401){-635,-449}...{-635,-449}     % 0
      (593,-48){-229,192}...{-477,556}     % 1
      (184,369){-24,346}...               % 2
      (167,970){28,1034}...{153,704}          % *3
      (212,1403){609,382}...{609,382}     % 4
      (821,1785){423,-35}...{481,-311}     % 5
      (1221,1622)--                    % 6
      (1030,1329){-36,-10}...          % 7
      (994,1319){-387,335}...{-1,0}          % 8
      (558,1503){-245,-438}...          % 9
      (480,1167){-76,-908}...{21,-334}     % *10
      (482,595){468,-529}...{239,-219}     % 11
      (809,275){238,69}...{481,275}          % 12
      (1197,463)--cycle);               % 13

endchar(0);

"fmld";

charbegin( "d",1646h#, theight*v#, baseline );
n := 7;
t1 := 0;
t2 := 2.392;
t3 := 4;
t4 := 6;
t5 := 10;
t6 := 13;
t7 := 18.32;

adj_fill.A(1, 2, 5)                    % fixed x points
     ()                         % fixed y points
     ()                         % tied points
     ((4,6), (3,7))                    % verticals
     ()                         % horizontals
     ((-53,2068){285,160}...{632,293}     % 0
      (441,2318){557,-157}...{536,-424}     % 1
      (1480,1742){14,-387}...          % 2
      (1466,962){-121,-1299}...{-208,-521}     % *3
      (1359,443){-666,-507}...{-666,-507}     % 4
      (693,-64){-296,195}...{-467,541}     % 5
      (180,359){-24,437}...               % 6
      (194,1216){66,732}...               % 7
      (194,1300){253,240}...{384,254}     % 8
      (681,1715)--                    % 9
      (751,1700){-357,-351}...          % 10
      (595,1510){-10,-11}...               % 11
      (512,1342){-275,-649}...{39,-454}     % 12
      (489,558){381,-473}...               % 13
      (656,408){433,-311}...               % *14
      (922,247){237,-125}...               % 15
      (968,240){1.751,.4972}...          % 16
      (1008,274){189,301}...               % 17
      (1181,820){138,1263}...{-61,336}     % *18
      (1146,1537){-450,471}...          % 19
      (664,1940){-892,545}...          % *20
      (254,2082){-1,0}...               % 21
      (166,2077){-168,-66}...{-168,-66}     % 22
      (-2,2011)--cycle);               % 23

endchar(0);

"fmle";

charbegin( "e", 1233h# + lefte# + righte#, lcbody*v#, baseline );
n := 8;
t1 := 0;
%t2 := 3;