eusmch.mf

Concrete_Mathematics_2nd_Ed_TeX_Source_Code

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