eurbch.mf

Concrete_Mathematics_2nd_Ed_TeX_Source_Code

      (1462,1808)--                    % 2
      (1604,1655){-296,-220}...{-178,-200}     % 3
      (893,978)--cycle);               % 4

n := 2;
t1 := 0;
t2 := 4;

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,3), (2,4))                    % tied points
     ()                         % verticals
     ()                         % horizontals
     ((570,821){-195,-207}...{-225,-398}     % 0
      (-3,71)--                    % 1
      (169,-28){55,15}...{55,15}          % 2
      (224,-13){156,404}...{236,298}          % 3
      (643,683)--cycle);               % 4

endchar(leftx#);

"rbly";

%charbegin( "y", 2052h#+ lefty# + righty#, lcbody*v#, descender*v#);
charbegin( "y", 2052h#+ lefty# + righty#, lcbody*v#, depthy*v#); % DEK

n := 10;
t1 := 1;
t2 := 2;
t3 := 5;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 10;
t8 := 12;
t9 := 14;
t10 := 16;

adj_fill.A(5, 7)                    % fixed x points
     (4, 6, 10)                    % fixed y points
     ((1,3), (2,1), (5,2), (6,2))          % tied points
     ((2,9))                         % verticals
     ((3,8))                         % horizontals
     ((1371,1687){36,-302}...{-49,-641}     % 0
      (1381,445){-17,-209}...{-17,-209}     % 1
      (1364,236){11,-371}...               % 2
      (1331,-173){-154,-662}...          % *3
      (1210,-426){-1,-1}...               % 4
      (920,-562){-1,0}...               % 5
      (665,-469){-1,1}...{-169,480}          % 6
      (509,-194){-65,-5}...{-65,-5}          % 7
      (444,-199)--                    % 8
      (444,-199){-205,-313}...{392,-210}     % 9
      (239,-512){231,-283}...          % 10
      (415,-669){392,-175}...          % 11
      (787,-746){1,0}...               % 12
      (1440,-458){1,1}...               % 13
      (1761,475){0,1}...{0,1}          % 14
      (1778,1805){-62,16}...{-62,16}          % 15
      (1716,1821)--cycle);               % 16

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

adj_fill.B(5)                         % fixed x points
     ()                         % fixed y points
     ((1,3), (9,1))                    % tied points
     ((3,7))                         % verticals
     ((4,6), (2,8))                    % horizontals
     ((1381,445){-248,-324}...          % 0
      (983,230){-1,0}...               % 1
      (766,312){-1,1}...               % 2
      (702,497){-76,669}...               % *3
      (690,981){0,1}...               % 4
      (696,1569){-51,763}...               % *5
      (639,1744){-1,1}...               % 6
      (487,1808){-1,0}...               % 7
      (228,1732){-560,-294}...{-372,-337}     % *8
      (-73,1514)--                    % 9
      (-4,1428){291,276}...               % 10
      (191,1544){1,0}...               % 11
      (280,1508){1,-1}...               % 12
      (338,1327){41,-858}...               % *13
      (321,650){0,-1}...               % 14
      (348,259){105,-593}...               % *15
      (426,57){1,-1}...               % 16
      (694,-40){1,0}...               % 17
      (1000,31){670,276}...{268,188}          % *18
      (1364,236)--cycle);               % 19

endchar(lefty#);

"rblz";

charbegin( "z", 1630h#+ leftz# + rightz#, lcbody*v#, baseline );

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

adj_fill.A()                         % fixed x points
     (2, 5)                         % fixed y points
     ((1,2), (7,1))                    % tied points
     ()                         % verticals
     ((4,6), (3,7))                    % horizontals
     ((1532,1719){-33,69}...{-33,69}          % 0
      (1499,1788){-435,-320}...          % 1
      (1168,1700){-1,0}...               % 2
      (765,1767){-356,93}...               % 3
      (467,1820){-1,0}...               % 4
      (298,1730){-232,-422}...{-232,-422}     % 5
      (66,1308)--                    % 6
      (152,1264){243,327}...               % 7
      (288,1412){248,201}...               % *8
      (400,1465){1,0}...               % 9
      (688,1425){470,-79}...{332,20}          % 10
      (1107,1395)--cycle);               % 11

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

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,1), (2,3), (3,4), (4,2))          % tied points
     ()                         % verticals
     ()                         % horizontals
     ((1107,1395){-284,-384}...          % 0
      (668,851){-323,-350}...{-367,-548}     % 1
      (-11,34)--                    % 2
      (448,394){315,390}...               % 3
      (863,887){279,316}...{220,297}          % 4
      (1532,1719)--cycle);               % 5

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

adj_fill.C()                         % fixed x points
     (2, 5)                         % fixed y points
     ((1,3), (7,4))                    % tied points
     ()                         % verticals
     ((3,7), (4,6))                    % horizontals
     ((-11,34){71,-60}...{71,-60}          % 0
      (60,-26){179,226}...               % 1
      (231,63){1,0}...               % 2
      (658,15){328,-64}...               % 3
      (1142,-29){1,0}...               % 4
      (1370,37){1,1}...               % 5
      (1509,257){152,317}...{152,317}     % 6
      (1661,574)--                    % 7
      (1579,634){-271,-418}...          % 8
      (1434,451){-1,-1}...               % 9
      (1166,349){-1,0}...               % 10
      (850,364){-372,48}...{-234,-11}     % 11
      (448,394)--cycle);               % 12

endchar(leftz#);

% UPPER CASE
set_stem_round(400,415,450,450,480,520); % DEK

"rbua";

charbegin( "A", 2589h#, capheight*v#, baseline );

n := 4;
t1 := 0;
t2 := 4;
t3 := 5;
t4 := 6;

adj_fill.A()                         % fixed x points
     ()                         % fixed y points
     ((1,4), (2,1), (3,2), (4,3))          % tied points
     ()                         % verticals
     ()                         % horizontals
     ((1157,2327){-117,-248}...{-477,-781}     % 0
      (-89,33){7,-37}...{7,-37}          % 1
      (-82,-4)--                    % 2
      (339,38){243,680}...{171,344}          % 3
      (712,990){112,197}...{112,197}          % 4
      (824,1187){323,746}...{113,205}     % 5
      (1220,2045)--cycle);               % 6

n := 8;
t1 := 0;
t2 := 2;
t3 := 3;
t4 := 5;
t5 := 6;
t6 := 9;
t7 := 13;
t8 := 19;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((2,4), (3,3), (4,5), (5,6))          % tied points
     ()                         % verticals
     ((1,8), (6,7))                    % horizontals
     ((829,2404){373,-51}...{313,-47}     % 0
      (1148,2357){9,-30}...{9,-30}          % 1
      (1157,2327){63,-282}...{63,-282}     % 2
      (1220,2045){26,1}...{26,1}          % 3
      (1246,2046){81,-225}...{148,-543}     % 4
      (1496,1180){59,-190}...{59,-190}     % 5
      (1555,990){128,-503}...          % 6
      (1727,318){170,-650}...          % 7
      (1859,29){326,-414}...               % 8
      (2052,-53){1,0}...               % 9
      (2298,-1){608,207}...{322,158}          % *10
      (2660,154)--                    % 11
      (2638,260){-442,-101}...          % 12
      (2397,234){-322,88}...               % 13
      (2298,305){-193,222}...          % *14
      (2204,456){-192,405}...{-254,894}     % 15
      (1959,1162){-234,858}...          % 16
      (1657,2257){-374,1380}...{-93,421}     % *17
      (1585,2542){-753,0}...{-753,0}          % 18
      (832,2542)--cycle);               % 19

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

adj_fill.C()                         % fixed x points
     ()                         % fixed y points
     ((1,6), (2,1), (3,2), (4,5))          % tied points
     ()                         % verticals
     ((2,3))                         % horizontals
     ((1555,990){-843,0}...{-843,0}          % 0
      (712,990)--                    % 1
      (824,1187){12,-7}...{12,-7}          % 2
      (836,1180){542,-1}...{245,-6}          % 3
      (1496,1180)--cycle);               % 4

endchar(0);

"rbub";

charbegin( "B", 2241h#, capheight*v#, baseline );
n := 10;
t1 := 0;
t2 := 3;
t3 := 6;
t4 := 12;
t5 := 13;
t6 := 17;
t7 := 20;
t8 := 23;
t9 := 24;
t10 := 26;

adj_fill.A(8, 9)                    % fixed x points
     (4)                         % fixed y points
     ((1,4), (4,1), (5,2), (10,3))          % tied points
     ((4,5), (2,7))                    % verticals
     ((3,6), (8,9))                    % horizontals
     ((1316,1360){1,55}...{1,55}          % 0
      (1317,1415){385,56}...               % 1
      (1816,1651){1,1}...               % 2
      (1975,2036){0,1}...               % 3
      (1845,2400){-1,1}...               % 4
      (1552,2550){-756,202}...          % *5
      (1089,2602){-1,0}...{-1053,0}          % 6
      (36,2602){0,-118}...{0,-118}          % 7
      (36,2484){270,-12}...               % 8
      (181,2451){271,-95}...               % 9
      (296,2368){1,-1}...               % 10
      (345,2094){0,-1}...{0,-1785}          % 11
      (345,309)--                    % 12
      (793,432){0,1801}...               % 13
      (793,2233){0,1}...               % 14
      (800,2390){51,131}...               % 15
      (835,2428){345,120}...               % 16
      (963,2445){1,0}...               % 17
      (1228,2415){433,-115}...          % *18
      (1396,2330){1,-1}...               % 19
      (1518,2006){0,-1}...               % 20
      (1350,1584){-1,-1}...               % 21
      (1128,1465){-557,-161}...{-1,0}     % *22
      (793,1423){0,-140}...{0,-140}          % 23
      (793,1283){513,-5}...               % 24
      (1179,1239){622,-160}...{1,-1}          % *25
      (1415,1123)--cycle);               % 26

n := 8;
t1 := 0;
t2 := 4;
t3 := 7;
t4 := 10;
t5 := 11;
t6 := 12;
t7 := 14;
t8 := 16;

adj_fill.B()                         % fixed x points
     ()                         % fixed y points
     ((1,1), (4,4), (5,3), (8,2))          % tied points
     ((3,6))                         % verticals
     ((2,7))                         % horizontals
     ((345,309){0,-1}...               % 0
      (318,132){-144,-331}...{-434,-346}     % 1
      (241,50){4,-56}...{4,-56}          % 2
      (245,-6){817,0}...               % 3
      (1062,-6){1,0}...               % 4
      (1534,56){793,240}...               % *5
      (1855,234){1,1}...               % 6
      (2056,766){0,1}...               % 7
      (1905,1150){-1,1}...               % 8
      (1669,1288){-589,210}...{-623,55}     % *9
      (1316,1360)--                    % 10
      (1415,1123){1,-1}...               % 11
      (1568,773){0,-1}...               % 12
      (1386,307){-1,-1}...               % 13
      (919,149){-1,0}...               % 14
      (822,185){-1,1}...{0,1}          % 15
      (793,432)--cycle);               % 16

endchar(0);

"rbuc";

charbegin( "C", 2453h#, capheight*v#, baseline );
n := 10;
t1 := 0;
t2 := 3;
t3 := 5;
t4 := 7;
t5 := 8;
t6 := 9;
t7 := 10;
t8 := 13;
t9 := 15;
t10 := 18;

adj_fill.A(6, 10)                    % fixed x points
     (1, 5)                         % fixed y points
     ()                         % tied points
     ((3,8))                         % verticals
     ((2,9), (4,7))                    % horizontals
     ((2111,1847){-56,9}...{-56,9}          % 0
      (2055,1856){-89,398}...          % 1
      (1827,2319){-1,1}...               % 2
      (1429,2463){-1,0}...               % 3
      (1011,2297){-1,-1}...               % 4
      (683,1331){0,-1}...               % 5
      (1026,371){1,-1}...               % 6
      (1563,159){1,0}...{353,191}          % 7
      (2330,394)--                    % 8
      (2398,298){-469,-363}...          % 9
      (1424,-65){-1,0}...               % 10
      (917,10){-873,289}...               % *11
      (551,224){-1,1}...               % 12
      (188,1224){0,1}...               % 13
      (541,2231){1,1}...               % 14
      (1520,2632){1,0}...               % 15
      (1956,2571){740,-233}...          % *16
      (2260,2399){1,-1}...{124,-219}          % 17
      (2427,2163)--cycle);               % 18

endchar(0);

"rbud";

%charbegin( "D", 2885h#, capheight*v#, baseline );
charbegin( "D", (2885-60)*h#, capheight*v#, baseline ); % DEK
n := 11;
t1 := 0;
t2 := 3;
t3 := 4;
t4 := 6;
t5 := 9;
t6 := 15;
t7 := 16;
t8 := 20;
t9 := 24;
t10 := 27;
t11 := 30;

adj_fill.A(2, 11)                    % fixed x points
     (6, 11)                         % fixed y points
     ((1,1), (6,1), (7,2), (11,2))          % tied points
     ((6,7), (4,9))