trunk/Master/texmf-dist/metapost

git-svn-id: svn://tug.org/texlive/trunk@104 c570f23f-e606-0410-a88d-b1316a301751

21 files changed, 476 insertions, 0 deletions

diff --git a/Master/texmf-dist/metapost/support/charlib/12 b/Master/texmf-dist/metapost/support/charlib/12
new file mode 100644
index 00000000000..f575c6a88c9
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/12
@@ -0,0 +1,9 @@
+vardef C.xii(expr n) =
+ save s,t,p,q;
+ q=fontsize n;
+ def s=infont "Times" scaled(q/fontsize"Times"/2)enddef;
+ def t=shifted(xpart urcorner p,0)enddef;
+ picture p; p="1"s shifted(0,q/3);
+ addto p also char164 s scaled2 t;
+ addto p also "2"s t;
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/14 b/Master/texmf-dist/metapost/support/charlib/14
new file mode 100644
index 00000000000..c27b0c37ae1
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/14
@@ -0,0 +1,9 @@
+vardef C.xiv(expr n) =
+ save s,t,p,q;
+ q=fontsize n;
+ def s=infont "Times" scaled(q/fontsize"Times"/2)enddef;
+ def t=shifted(xpart urcorner p,0)enddef;
+ picture p; p="1"s shifted(0,q/3);
+ addto p also char164 s scaled2 t;
+ addto p also "4"s t;
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/34 b/Master/texmf-dist/metapost/support/charlib/34
new file mode 100644
index 00000000000..c6ab4cde7dd
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/34
@@ -0,0 +1,9 @@
+vardef C.xxxiv(expr n) =
+ save s,t,p,q;
+ q=fontsize n;
+ def s=infont "Times" scaled(q/fontsize"Times"/2)enddef;
+ def t=shifted(xpart urcorner p,0)enddef;
+ picture p; p="3"s shifted(0,q/3);
+ addto p also char164 s scaled2 t;
+ addto p also "4"s t;
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/Ao b/Master/texmf-dist/metapost/support/charlib/Ao
new file mode 100644
index 00000000000..2bdc39bed1b
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/Ao
@@ -0,0 +1,7 @@
+vardef C.Ao(expr n) =
+ save p,q; picture p,q;
+ p="A"infont n;
+ q=char202 infont n;
+ addto p also q
+  shifted(xpart(urcorner p-urcorner q)/2,.3*fontsize n);
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/Fi b/Master/texmf-dist/metapost/support/charlib/Fi
new file mode 100644
index 00000000000..6979477afe4
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/Fi
@@ -0,0 +1,7 @@
+vardef C.Fi(expr n) =
+ save p;
+ picture p; p="f"infont n;
+ for c="f","i":
+  addto p also c infont n shifted(xpart urcorner p-fontsize n/20,0);
+ endfor
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/Fl b/Master/texmf-dist/metapost/support/charlib/Fl
new file mode 100644
index 00000000000..67838aaf24e
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/Fl
@@ -0,0 +1,7 @@
+vardef C.Fl(expr n) =
+ save p;
+ picture p; p="f"infont n;
+ for c="f","l":
+  addto p also c infont n shifted(xpart urcorner p-fontsize n/20,0);
+ endfor
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/L1 b/Master/texmf-dist/metapost/support/charlib/L1
new file mode 100644
index 00000000000..d295e28e577
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/L1
@@ -0,0 +1,40 @@
+vardef C.Li(expr n) =
+ save p,a,e;
+ picture p; p=nullpicture;
+ def a=addto p contour enddef;
+ def e=withcolor (1,1,1)enddef;
+ a(160,0)--(160,150)--(85,150)--(85,149)--(91,149)--
+ (97,147.5)--(104.5,145)--(112.9,141.4)--(117,138.667)--(117,138)--
+ (84,138)--(68,140)--(47,140)--(41,139)--(41,140)--(47,143)--(54.5,146)--
+ (59,147.5)--(66.5,149)--(72,149)--(72,150)--(0,150)--(0,0)--(71,0)--
+ (71,1)--(66,1)--(56,3.5)--(54.5,4)--(47,7)--(45,8)--(40,11.3333)--
+ (40,12)--(118,12)--(118,11.6667)--(114,9)--(110,7)--(102.5,4)--(101,3.5)--
+ (91,1)--(85,1)--(85,0)--(160,0)--cycle;
+ a(100.5,123)--(87,124.5)--(66,126)--(43,126)--(23,124.333)--(23,125.5)--
+ (29.5,132)--(40.5,131)--(70,131)--(82,132.5)--(91,134)--(123,134)--
+ (126,132.5)--(134,124.5)--(134,123)--(100.5,123)--cycle e;
+ a(109,108)--(85,110)--
+ (27,110)--(13,109)--(13,111)--(16,117)--(30,116)--(86.5,116)--(97,117.5)--
+ (106,119)--(138.5,119)--(144,109.833)--(144,108)--(109,108)--cycle e;
+ a(120,92)--
+ (84,95)--(25.5,95)--(7.5,93)--(6.25,93)--(7.5,98)--(8.71765,101.653)--
+ (55,100)--(80,100)--(98,101.5)--(118,104)--(146.5,104)--(148.5,100)--
+ (150,95.5)--(150,92)--(120,92)--cycle e;
+ a(111,77)--(96,78.5)--(76.5,80)--(41.5,80)--
+ (16,78.5)--(5.5,77)--(4,77)--(4,82.5)--(5.40541,86.7162)--(26,85)--
+ (83.5,85)--(97,86.5)--(105,87.5)--(124.5,89)--(151.167,89)--(153,78)--
+ (153,77)--(111,77)--cycle e;
+ a(104.5,62)--(78.5,64)--(27,64)--(7,62)--(5.5,62)--
+ (4,68)--(4,72)--(8.5,72)--(26.5,70)--(79,70)--(109,73)--(153,73)--
+ (153,71)--(151.5,62)--(104.5,62)--cycle e;
+ a(11,45)--(10.5,45)--(8.5,49)--(7.5,52)--
+ (6.25,57)--(11,57)--(39,55)--(65,55)--(67,56)--(68,56)--(68,55.4)--
+ (79,56.5)--(103,58)--(150,58)--(150,53.5)--(147.833,47)--(61,47)--
+ (53,48)--(29,46.5)--(11,45)--cycle e;
+ a(22.5,30)--(19.5,30)--(17,32.5)--(13.25,38.75)--
+ (12,42.5)--(12,42.8158)--(46.5,41)--(53.5,41)--(91.5,43)--(145,43)--
+ (145,42.5)--(143.667,38.5)--(138.667,31)--(69.5,31)--(48.5,32)--(22.5,30)--
+ cycle e;
+ a(33,16)--(27,20.5)--(25,22.5)--(22,27)--(135,27)--(133.5,24)--(128.5,19)--
+ (124,16)--(33,16)--cycle e;
+ p scaled (fontsize n/150) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/LH b/Master/texmf-dist/metapost/support/charlib/LH
new file mode 100644
index 00000000000..6fde7f6614c
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/LH
@@ -0,0 +1,142 @@
+vardef C.LH(expr n) =
+ save p,a,e;
+ picture p; p=nullpicture;
+ def a=addto p contour enddef;
+ def e=withcolor (1,1,1)enddef;
+ a(68,149)--(68,149)--(60,148)--(55,147)--(52,146)--(49,145)--(47,144)--
+ (44,143)--(42,142)--(40,141)--(38,140)--(37,139)--(39,139)--(53,140)--
+ (68,139)--(76,138)--(112,138)--(111,139)--(109,140)--(108,141)--(105,142)--
+ (103,143)--(101,144)--(98,145)--(95,146)--(92,147)--(88,148)--(80,149)--
+ cycle;
+ a(84,133)--(84,133)--(78,132)--(70,131)--(50,130)--(30,131)--(25,131)--
+ (24,130)--(23,129)--(22,128)--(21,127)--(20,126)--(19,125)--(19,124)--
+ (20,124)--(32,125)--(50,126)--(69,125)--(83,124)--(92,123)--(129,123)--
+ (129,124)--(128,125)--(127,126)--(126,127)--(125,128)--(124,129)--
+ (123,130)--(122,131)--(121,132)--(119,133)--cycle;
+ a(99,118)--(99,118)--(93,117)--
+ (86,116)--(52,115)--(18,116)--(12,116)--(11,115)--(11,114)--(10,113)--
+ (10,112)--(9,111)--(9,110)--(9,109)--(15,109)--(51,110)--(87,109)--
+ (99,108)--(139,108)--(139,109)--(139,110)--(138,111)--(137,112)--
+ (137,113)--(136,114)--(136,115)--(135,116)--(134,117)--(134,118)--
+ cycle;
+ a(110,103)--(110,103)--(102,102)--(94,101)--(82,100)--(59,99)--(36,100)--
+ (8,101)--(5,101)--(4,100)--(4,99)--(4,98)--(3,97)--(3,96)--(3,95)--
+ (3,94)--(2,93)--(7,93)--(16,94)--(51,95)--(86,94)--(98,93)--(110,92)--
+ (145,92)--(145,93)--(145,94)--(145,95)--(145,96)--(144,97)--(144,98)--
+ (144,99)--(143,100)--(143,101)--(142,102)--(142,103)--cycle;
+ a(178,101)--
+ (178,101)--(178,100)--(177,99)--(177,98)--(177,97)--(176,96)--(176,95)--
+ (176,94)--(175,93)--(175,92)--(175,91)--(174,90)--(174,89)--(174,88)--
+ (173,87)--(173,86)--(173,85)--(172,84)--(172,83)--(172,82)--(171,81)--
+ (171,80)--(171,79)--(170,78)--(170,77)--(170,76)--(169,75)--(169,74)--
+ (169,73)--(168,72)--(168,71)--(168,70)--(167,69)--(167,68)--(167,67)--
+ (166,66)--(166,65)--(166,64)--(165,63)--(165,62)--(165,61)--(164,60)--
+ (164,59)--(164,58)--(163,57)--(163,56)--(163,55)--(162,54)--(162,53)--
+ (162,52)--(161,51)--(161,50)--(161,49)--(160,48)--(174,48)--(174,49)--
+ (175,50)--(175,51)--(175,52)--(176,53)--(176,54)--(176,55)--(177,56)--
+ (185,57)--(194,56)--(194,55)--(195,54)--(195,53)--(195,52)--(195,51)--
+ (196,50)--(196,49)--(196,48)--(210,48)--(209,49)--(209,50)--(209,51)--
+ (208,52)--(208,53)--(208,54)--(208,55)--(207,56)--(207,57)--(207,58)--
+ (206,59)--(206,60)--(206,61)--(205,62)--(205,63)--(205,64)--(204,65)--
+ (204,66)--(204,67)--(203,68)--(203,69)--(203,70)--(202,71)--(202,72)--
+ (202,73)--(202,74)--(201,75)--(201,76)--(201,77)--(200,78)--(200,79)--
+ (200,80)--(199,81)--(199,82)--(199,83)--(198,84)--(198,85)--(198,86)--
+ (197,87)--(197,88)--(197,89)--(197,90)--(196,91)--(196,92)--(196,93)--
+ (195,94)--(195,95)--(195,96)--(194,97)--(194,98)--(194,99)--(193,100)--
+ (193,101)--cycle;
+ a(200,101)--(200,101)--(200,100)--(200,99)--(200,98)--(200,97)--
+ (200,96)--(200,95)--(200,94)--(200,93)--(200,92)--(200,91)--(200,90)--
+ (214,89)--(214,88)--(214,87)--(214,86)--(214,85)--(214,84)--(214,83)--
+ (214,82)--(214,81)--(214,80)--(214,79)--(214,78)--(214,77)--(214,76)--
+ (214,75)--(214,74)--(214,73)--(214,72)--(214,71)--(214,70)--(214,69)--
+ (214,68)--(214,67)--(214,66)--(214,65)--(214,64)--(214,63)--(214,62)--
+ (214,61)--(214,60)--(214,59)--(214,58)--(214,57)--(214,56)--(214,55)--
+ (214,54)--(214,53)--(214,52)--(214,51)--(214,50)--(214,49)--(214,48)--
+ (228,48)--(228,49)--(228,50)--(228,51)--(228,52)--(228,53)--(228,54)--
+ (228,55)--(228,56)--(228,57)--(228,58)--(228,59)--(228,60)--(228,61)--
+ (228,62)--(228,63)--(228,64)--(228,65)--(228,66)--(228,67)--(228,68)--
+ (228,69)--(228,70)--(228,71)--(228,72)--(228,73)--(228,74)--(228,75)--
+ (228,76)--(228,77)--(228,78)--(228,79)--(228,80)--(228,81)--(228,82)--
+ (228,83)--(228,84)--(228,85)--(228,86)--(228,87)--(228,88)--(228,89)--
+ (241,90)--(241,91)--(241,92)--(241,93)--(241,94)--(241,95)--(241,96)--
+ (241,97)--(241,98)--(241,99)--(241,100)--(241,101)--cycle;
+ a(266,101)--(266,101)--
+ (266,100)--(266,99)--(266,98)--(266,97)--(266,96)--(266,95)--(266,94)--
+ (266,93)--(266,92)--(266,91)--(266,90)--(280,89)--(280,88)--(280,87)--
+ (280,86)--(280,85)--(280,84)--(280,83)--(280,82)--(280,81)--(280,80)--
+ (280,79)--(280,78)--(280,77)--(280,76)--(280,75)--(280,74)--(280,73)--
+ (280,72)--(280,71)--(280,70)--(280,69)--(280,68)--(280,67)--(280,66)--
+ (280,65)--(280,64)--(280,63)--(280,62)--(280,61)--(280,60)--(280,59)--
+ (280,58)--(280,57)--(280,56)--(280,55)--(280,54)--(280,53)--(280,52)--
+ (280,51)--(280,50)--(280,49)--(280,48)--(294,48)--(294,49)--(294,50)--
+ (294,51)--(294,52)--(294,53)--(294,54)--(294,55)--(294,56)--(294,57)--
+ (294,58)--(294,59)--(294,60)--(294,61)--(294,62)--(294,63)--(294,64)--
+ (294,65)--(294,66)--(294,67)--(294,68)--(294,69)--(294,70)--(294,71)--
+ (294,72)--(294,73)--(294,74)--(294,75)--(294,76)--(294,77)--(294,78)--
+ (294,79)--(294,80)--(294,81)--(294,82)--(294,83)--(294,84)--(294,85)--
+ (294,86)--(294,87)--(294,88)--(294,89)--(308,90)--(308,91)--(308,92)--
+ (308,93)--(308,94)--(308,95)--(308,96)--(308,97)--(308,98)--(308,99)--
+ (308,100)--(308,101)--cycle;
+ a(251,91)--(251,91)--(245,90)--(243,89)--(241,88)--
+ (240,87)--(239,86)--(239,85)--(238,84)--(238,83)--(237,82)--(237,81)--
+ (237,80)--(237,79)--(237,78)--(238,77)--(238,76)--(238,75)--(239,74)--
+ (239,73)--(240,72)--(239,71)--(238,70)--(237,69)--(237,68)--(237,67)--
+ (236,66)--(236,65)--(235,64)--(235,63)--(235,62)--(235,61)--(235,60)--
+ (235,59)--(235,58)--(236,57)--(236,56)--(237,55)--(237,54)--(238,53)--
+ (239,52)--(240,51)--(241,50)--(243,49)--(245,48)--(249,47)--(259,47)--
+ (262,48)--(265,49)--(267,50)--(270,49)--(272,48)--(276,48)--(276,49)--
+ (276,50)--(276,51)--(276,52)--(276,53)--(276,54)--(276,55)--(276,56)--
+ (276,57)--(273,58)--(273,59)--(274,60)--(274,61)--(274,62)--(274,63)--
+ (274,64)--(274,65)--(274,66)--(274,67)--(274,68)--(274,69)--(274,70)--
+ (274,71)--(274,72)--(274,73)--(274,74)--(264,75)--(264,76)--(264,77)--
+ (264,78)--(264,79)--(264,80)--(264,81)--(264,82)--(264,83)--(263,84)--
+ (263,85)--(263,86)--(262,87)--(261,88)--(260,89)--(258,90)--(253,91)--
+ cycle;
+ a(114,88)--(114,88)--(101,87)--(93,86)--(84,85)--(49,84)--(15,85)--
+ (3,86)--(1,86)--(1,85)--(1,84)--(0,83)--(0,82)--(0,81)--(0,80)--(0,79)--
+ (0,78)--(0,77)--(4,77)--(11,78)--(28,79)--(53,80)--(79,79)--(92,78)--
+ (102,77)--(148,77)--(148,78)--(148,79)--(148,80)--(147,81)--(147,82)--
+ (147,83)--(147,84)--(147,85)--(147,86)--(146,87)--(146,88)--cycle;
+ a(185,82)--
+ (185,82)--(186,83)--(187,82)--(187,81)--(187,80)--(188,79)--(188,78)--
+ (188,77)--(188,76)--(189,75)--(189,74)--(189,73)--(189,72)--(190,71)--
+ (190,70)--(190,69)--(185,68)--(181,69)--(181,70)--(181,71)--(182,72)--
+ (182,73)--(182,74)--(183,75)--(183,76)--(183,77)--(184,78)--(184,79)--
+ (184,80)--(184,81)--cycle e;
+ a(250,82)--(250,82)--(251,83)--(253,82)--(254,81)--
+ (254,80)--(254,79)--(254,78)--(254,77)--(254,76)--(254,75)--(252,74)--
+ (251,75)--(250,76)--(249,77)--(249,78)--(249,79)--(249,80)--(249,81)--
+ cycle e;
+ a(254,73)--(254,73)--(259,74)--(264,73)--(264,72)--(264,71)--(264,70)--
+ (264,69)--(264,68)--(264,67)--(264,66)--(263,65)--(262,66)--(261,67)--
+ (260,68)--(258,69)--(257,70)--(256,71)--(255,72)--cycle e;
+ a(100,72)--(100,72)--
+ (90,71)--(80,70)--(48,69)--(17,70)--(8,71)--(0,71)--(0,70)--(0,69)--
+ (0,68)--(0,67)--(0,66)--(1,65)--(1,64)--(1,63)--(1,62)--(7,62)--(17,63)--
+ (49,64)--(81,63)--(94,62)--(147,62)--(147,63)--(147,64)--(147,65)--
+ (147,66)--(147,67)--(148,68)--(148,69)--(148,70)--(148,71)--(148,72)--
+ cycle;
+ a(246,64)--(246,64)--(247,65)--(249,64)--(250,63)--(252,62)--(253,61)--
+ (254,60)--(255,59)--(255,58)--(252,57)--(250,58)--(248,59)--(247,60)--
+ (247,61)--(246,62)--(246,63)--cycle e;
+ a(91,57)--(91,57)--(75,56)--(65,55)--
+ (64,54)--(63,55)--(62,55)--(44,54)--(27,55)--(13,56)--(2,56)--(3,55)--
+ (3,54)--(3,53)--(3,52)--(4,51)--(4,50)--(4,49)--(5,48)--(5,47)--(6,46)--
+ (6,45)--(12,45)--(24,46)--(40,47)--(46,48)--(53,47)--(143,47)--(143,48)--
+ (144,49)--(144,50)--(144,51)--(145,52)--(145,53)--(145,54)--(145,55)--
+ (145,56)--(145,57)--cycle;
+ a(8,42)--(8,42)--(8,41)--(9,40)--(9,39)--(9,38)--
+ (10,37)--(11,36)--(11,35)--(12,34)--(12,33)--(13,32)--(14,31)--(15,30)--
+ (24,30)--(37,31)--(46,32)--(55,31)--(134,31)--(135,32)--(135,33)--
+ (136,34)--(137,35)--(137,36)--(138,37)--(139,38)--(139,39)--(139,40)--
+ (140,41)--(140,42)--(78,42)--(59,41)--(45,40)--(32,41)--(13,42)--
+ cycle;
+ a(18,26)--(18,26)--(19,25)--(20,24)--(20,23)--(21,22)--(22,21)--(23,20)--
+ (24,19)--(26,18)--(27,17)--(28,16)--(120,16)--(121,17)--(123,18)--
+ (124,19)--(125,20)--(126,21)--(127,22)--(128,23)--(129,24)--(129,25)--
+ (130,26)--cycle;
+ a(36,11)--(36,11)--(37,10)--(39,9)--(40,8)--(42,7)--(44,6)--
+ (47,5)--(49,4)--(52,3)--(56,2)--(60,1)--(67,0)--(80,0)--(88,1)--(92,2)--
+ (96,3)--(99,4)--(101,5)--(104,6)--(106,7)--(108,8)--(110,9)--(111,10)--
+ (113,11)--cycle;
+ p scaled (fontsize n/150) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/Lb b/Master/texmf-dist/metapost/support/charlib/Lb
new file mode 100644
index 00000000000..a57e688f85f
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/Lb
@@ -0,0 +1,55 @@
+vardef C.Lb(expr n) =
+ save p,a,e;
+ picture p; p=nullpicture;
+ def a=addto p contour enddef;
+ def e=withcolor(1,1,1)enddef;
+ a(312,0)--(312,150)--(81,150)--(81,149)--(87,149)--(93,147.5)--(100.5,145)--
+ (108.9,141.4)--(113,138.667)--(113,138)--(80,138)--(64,140)--(43,140)--
+ (37,139)--(37,140)--(43,143)--(50.5,146)--(55,147.5)--(62.5,149)--
+ (68,149)--(68,150)--(0,150)--(0,84)--(1,84)--(1,86.75)--(22,85)--
+ (79.5,85)--(93,86.5)--(101,87.5)--(120.5,89)--(147.167,89)--(149,78)--
+ (149,77)--(107,77)--(92,78.5)--(72.5,80)--(37.5,80)--(12,78.5)--
+ (0,76.7857)--(0,72.5)--(22.5,70)--(75,70)--(105,73)--(149,73)--(149,71)--
+ (147.5,62)--(100.5,62)--(74.5,64)--(23,64)--(3,62)--(1,62)--(1,66)--
+ (0,66)--(0,0)--(67,0)--(67,1)--(62,1)--(52,3.5)--(50.5,4)--(43,7)--
+ (41,8)--(36,11.3333)--(36,12)--(114,12)--(114,11.6667)--(110,9)--
+ (106,7)--(98.5,4)--(97,3.5)--(87,1)--(81,1)--(81,0)--(312,0)--cycle;
+ a(96.5,123)--(83,124.5)--(62,126)--(39,126)--(19,124.333)--(19,125.5)--
+ (25.5,132)--(36.5,131)--(66,131)--(78,132.5)--(87,134)--(119,134)--
+ (122,132.5)--(130,124.5)--(130,123)--(96.5,123)--cycle e;
+ a(105,108)--(81,110)--(23,110)--(9,109)--(9,111)--(12,117)--(26,116)--
+ (82.5,116)--(93,117.5)--(102,119)--(134.5,119)--(140,109.833)--(140,108)--
+ (105,108)--cycle e;
+ a(116,92)--(80,95)--(21.5,95)--(3.5,93)--(2.25,93)--(3.5,98)--(4.71765,101.653)--
+ (51,100)--(76,100)--(94,101.5)--(114,104)--(142.5,104)--(144.5,100)--
+ (146,95.5)--(146,92)--(116,92)--cycle e;
+ a(210.871,48)--(196.25,48)--(194,57)--(177.833,57)--(174.833,48)--
+ (160.167,48)--(178.167,102)--(193.833,102)--(195,98.5)--(210.871,48)--
+ cycle e;
+ a(214,48)--(214,90)--(200,90)--(200,102)--(242,102)--(242,90)--(229,90)--
+ (229,48)--(214,48)--cycle e;
+ a(280,48)--(280,90)--(266,90)--(266,102)--(309,102)--(309,90)--(295,90)--
+ (295,48)--(280,48)--cycle e;
+ a(251,47)--(245,48.5)--(241,50.5)--(237.5,54)--(235,59)--(235,63.5)--
+ (237.667,70.1667)--(239.833,72.3333)--(238.5,75)--(237,79.5)--(237,82)--
+ (239.5,87)--(241,88.5)--(245,90.5)--(252.636,91.7727)--(259,90.5)--
+ (261,89.5)--(263.5,87)--(265,82.5)--(265,75)--(275,75)--(275,62)--
+ (274,58)--(277,58)--(277,48)--(273,48)--(269,50)--(267.5,50)--(258.5,47)--
+ (251,47)--cycle e;
+ a(254,75)--(254,81.5)--(252.5,83)--(251.5,83)--(250,81.5)--(250,77.5)--
+ (252.5,75)--(254,75)--cycle;
+ a(190,69)--(190,70)--(186.75,83)--(185.9,83)--(182,70)--(182,69)--
+ (190,69)--cycle;
+ a(264,66)--(264,74)--(255,74)--(255,73.5)--(258,70.5)--(264,66)--
+ cycle;
+ a(255,58)--(255,59.5)--(252.5,62)--(248,65)--(247,65)--(247,63)--
+ (248.5,60)--(249,59.5)--(252,58)--(255,58)--cycle;
+ a(7,45)--(6.5,45)--(4.5,49)--(3.5,52)--(2.25,57)--(7,57)--(35,55)--
+ (61,55)--(63,56)--(64,56)--(64,55.4)--(75,56.5)--(99,58)--(146,58)--
+ (146,53.5)--(143.833,47)--(57,47)--(49,48)--(25,46.5)--(7,45)--cycle e;
+ a(18.5,30)--(15.5,30)--(13,32.5)--(9.25,38.75)--(8,42.5)--(8,42.8158)--
+ (42.5,41)--(49.5,41)--(87.5,43)--(141,43)--(141,42.5)--(139.667,38.5)--
+ (134.667,31)--(65.5,31)--(44.5,32)--(18.5,30)--cycle e;
+ a(29,16)--(23,20.5)--(21,22.5)--(18,27)--(131,27)--(129.5,24)--(124.5,19)--
+ (120,16)--(29,16)--cycle e;
+ p scaled (fontsize n/150) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/Sl b/Master/texmf-dist/metapost/support/charlib/Sl
new file mode 100644
index 00000000000..5e1202e6129
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/Sl
@@ -0,0 +1,22 @@
+vardef C.Sl(expr n) =
+ save p;
+ picture p; p=nullpicture;
+ addto p contour
+ (14,93)--(14,96)--(29,110)--(44,121)--(54,127)--
+ (97,152)--(112,162)--(127,175)--(142,190)--(155,204)--(165,218)--
+ (174,233)--(181,246)--(186,260)--(187,264)--(187,279)--(186,283)--
+ (181,291)--(171,298)--(157,298)--(144,290)--(132,275)--(124,261)--
+ (118,246)--(113,232)--(109,218)--(106,205)--(103,190)--(101,178)--
+ (99,166)--(97,153)--(97,152)--
+ (94,131)--(93,123)--(92,112)--(91,103)--(90,93)--
+ (89,81)--(89,40)--(92,28)--(97,18)--(108,10)--(122,10)--(134,18)--
+ (145,33)--(152,48)--(158,62)--(168,58)--(168,59)--(163,45)--(157,31)--
+ (148,16)--(133,3)--(118,-1)--(103,0)--(88,5)--(73,18)--(64,31)--
+ (58,46)--(55,59)--(53,73)--(52,111)--(54,127)--(55,132)--(57,146)--
+ (59,157)--(62,171)--(66,186)--(70,199)--(75,213)--(81,228)--(88,243)--
+ (96,257)--(106,272)--(118,287)--(133,300)--(148,307)--(163,308)--
+ (178,304)--(191,293)--(197,281)--(198,277)--(198,260)--(194,246)--
+ (187,231)--(179,217)--(168,202)--(155,187)--(141,172)--(126,158)--
+ (111,146)--(96,136)--(94,131)--(52,111)--(37,101)--(22,86)--(14,93)--
+ cycle;
+ p scaled (.0022*fontsize n) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/ao.x b/Master/texmf-dist/metapost/support/charlib/ao.x
new file mode 100644
index 00000000000..07e7562e241
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/ao.x
@@ -0,0 +1,7 @@
+vardef C.ao(expr n) =
+ save p,q; picture p,q;
+ p="a"infont n;
+ q=char202 infont n;
+ addto p also q
+  shifted(xpart(urcorner p-urcorner q)/2,.05*fontsize n);
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/bx b/Master/texmf-dist/metapost/support/charlib/bx
new file mode 100644
index 00000000000..e7e7cdc3885
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/bx
@@ -0,0 +1,6 @@
+vardef C.bx(expr n) =
+ save p; picture p;
+ p=nullpicture;
+ addto p contour ((0,0)--(1,0)--(1,1)--(0,1)--cycle)
+  scaled (fontsize n/2);
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/ci b/Master/texmf-dist/metapost/support/charlib/ci
new file mode 100644
index 00000000000..abe2a8e6367
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/ci
@@ -0,0 +1,7 @@
+vardef C.ci(expr n) =
+ save p; picture p;
+ p=nullpicture;
+ addto p doublepath makepath pencircle shifted(.5,.5)
+  withpen pencircle scaled.0444;
+ p scaled(.75*fontsize n)
+enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/ff b/Master/texmf-dist/metapost/support/charlib/ff
new file mode 100644
index 00000000000..6ad6c93cd47
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/ff
@@ -0,0 +1,5 @@
+vardef C.ff(expr n) =
+ save p;
+ picture p; p="f"infont n;
+ addto p also "f"infont n shifted(xpart urcorner p-fontsize n/20,0);
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/lh.x b/Master/texmf-dist/metapost/support/charlib/lh.x
new file mode 100644
index 00000000000..b856d87229d
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/lh.x
@@ -0,0 +1,31 @@
+vardef C.lh(expr n) =
+ save p,a;
+ picture p; p=nullpicture;
+ def a expr q =
+  addto p doublepath q withpen pencircle scaled15 enddef;
+ a(16,177)--(16,188)--(21,193)--(30,193)--(34,189)--(36,183)--(36,180)--
+ (34,174)--(27,170)--(19,172)--(16,177)--cycle;
+ a(38,194)--(38,196)--(53,199)--(68,201)--(83,202)--(98,203)--(113,204)--
+ (128,204)--(143,205)--(158,205)--(173,205)--(188,204)--(203,203)--
+ (218,202)--(233,200)--(248,198)--(263,196)--(278,194)--(293,190)--
+ (308,186)--(323,181)--(338,176)--(353,168)--(361,162)--(364,153)--
+ (366,138)--(367,126)--(368,106)--(369,80)--(369,74)--(368,60)--(367,54)--
+ (362,43)--(348,34)--(333,28)--(318,25)--(303,26)--(288,29)--(273,31)--
+ (258,32)--(243,32)--(228,30)--(213,27)--(198,24)--(183,23)--(168,23)--
+ (153,27)--(148,34)--(148,47)--(153,54)--(168,58)--(183,58)--(198,58)--
+ (213,59)--(226,60)--(228,62)--(228,67)--(223,71)--(208,71)--(193,70)--
+ (178,70)--(163,70)--(148,70)--(133,71)--(123,76)--(120,84)--(120,91)--
+ (122,98)--(129,104)--(144,106)--(159,107)--(174,107)--(189,107)--
+ (202,108)--(204,110)--(204,117)--(201,119)--(186,119)--(171,119)--
+ (156,119)--(141,119)--(126,119)--(111,121)--(103,128)--(101,137)--
+ (101,142)--(103,150)--(111,158)--(126,161)--(141,161)--(156,162)--
+ (171,163)--(186,163)--(191,165)--(192,167)--(192,171)--(190,174)--
+ (176,175)--(161,175)--(146,175)--(131,174)--(116,174)--(101,174)--
+ (86,173)--(71,172)--(56,171)--(41,171)--(41,174)--(43,178)--(43,187)--
+ (38,194)--cycle;
+ a(373,169)--(373,176)--(375,182)--(386,190)--(401,193)--(408,191)--
+ (411,185)--(412,181)--(414,167)--(415,158)--(416,144)--(417,128)--
+ (418,110)--(418,60)--(417,45)--(415,37)--(409,34)--(394,31)--(381,35)--
+ (379,42)--(379,52)--(380,67)--(380,77)--(379,77)--(378,106)--(377,121)--
+ (376,133)--(375,147)--(374,158)--(373,169)--cycle;
+ p scaled(.0022*fontsize n) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/ob b/Master/texmf-dist/metapost/support/charlib/ob
new file mode 100644
index 00000000000..beb76d68547
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/ob
@@ -0,0 +1,7 @@
+vardef C.ob(expr n) =
+ save p; picture p;
+ p=nullpicture;
+ addto p doublepath makepath pencircle shifted(.5,.5)
+  withpen pencircle scaled.0889;
+ p scaled(.375*fontsize n)
+enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/rh b/Master/texmf-dist/metapost/support/charlib/rh
new file mode 100644
index 00000000000..1f41bdffdd6
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/rh
@@ -0,0 +1,29 @@
+vardef C.rh(expr n) =
+ save p,a;
+ picture p; p=nullpicture;
+ def a expr q =
+  addto p doublepath q withpen pencircle scaled15 enddef;
+ a(15,66)--(15,86)--(16,131)--(17,146)--(18,158)--(19,167)--(21,181)--
+ (24,190)--(34,193)--(49,189)--(58,182)--(60,177)--(60,166)--(59,156)--
+ (58,143)--(57,130)--(56,117)--(55,102)--(54,42)--(53,39)--(49,35)--
+ (34,34)--(19,39)--(16,47)--(15,66)--cycle;
+ a(65,60)--(65,111)--(66,127)--(67,139)--(69,153)--(72,163)--(83,171)--
+ (98,177)--(113,182)--(128,187)--(143,190)--(158,194)--(173,196)--
+ (188,199)--(203,201)--(218,203)--(233,205)--(248,205)--(263,206)--
+ (278,206)--(293,206)--(308,206)--(323,206)--(338,205)--(353,203)--
+ (368,202)--(383,200)--(394,197)--(389,190)--(389,180)--(391,176)--
+ (391,173)--(380,173)--(365,173)--(350,174)--(335,175)--(320,176)--
+ (305,176)--(290,176)--(275,177)--(260,177)--(245,177)--(240,173)--
+ (240,170)--(245,165)--(260,164)--(275,164)--(290,164)--(305,163)--
+ (320,160)--(327,155)--(330,149)--(330,134)--(328,129)--(323,124)--
+ (309,121)--(294,121)--(279,121)--(264,121)--(249,121)--(234,121)--
+ (228,118)--(228,112)--(234,109)--(249,109)--(264,109)--(279,108)--
+ (294,108)--(306,104)--(311,97)--(312,91)--(312,88)--(311,82)--(305,74)--
+ (290,72)--(275,72)--(260,72)--(245,73)--(230,73)--(215,73)--(205,70)--
+ (205,63)--(217,60)--(232,60)--(247,60)--(262,60)--(277,57)--(283,52)--
+ (285,44)--(285,41)--(284,35)--(280,30)--(268,26)--(253,25)--(238,26)--
+ (223,28)--(208,31)--(193,33)--(178,34)--(163,33)--(148,31)--(133,28)--
+ (118,27)--(103,28)--(88,34)--(73,43)--(67,52)--(65,60)--cycle;
+ a(396,180)--(396,188)--(399,194)--(410,196)--(416,190)--(416,180)--
+ (415,177)--(411,173)--(400,173)--(396,180)--cycle;
+ p scaled(.0022*fontsize n) enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/sq b/Master/texmf-dist/metapost/support/charlib/sq
new file mode 100644
index 00000000000..b945f55161b
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/sq
@@ -0,0 +1,9 @@
+vardef C.sq(expr n) =
+ save p,q;
+ picture p; p=nullpicture;
+ path q; q=(0,0)--(1,0)--(1,1)--(0,1)--cycle;
+ addto p
+  if n="Times-Bold": contour q
+  else: doublepath q withpen pencircle scaled.0667 fi;
+ p scaled (fontsize n/2)
+enddef;
diff --git a/Master/texmf-dist/metapost/support/charlib/twiddle b/Master/texmf-dist/metapost/support/charlib/twiddle
new file mode 100644
index 00000000000..11765cb7a98
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/charlib/twiddle
@@ -0,0 +1,5 @@
+vardef C.~eq(expr n) =
+ save p;
+ picture p; p="~"infont n;
+ addto p also "-"infont n shifted(0,-.15*fontsize n);
+ p enddef;
diff --git a/Master/texmf-dist/metapost/support/trchars.adj b/Master/texmf-dist/metapost/support/trchars.adj
new file mode 100644
index 00000000000..df000057025
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/trchars.adj
@@ -0,0 +1,15 @@
+S
+	96	-.530	0
+	165	-.015	-.075
+	214	-.010	0
+	231	-.060	-.170
+	233	.201	0
+	235	.201	0
+	238	.002	0
+	242	.098	-.050
+	249	-.103	0
+	250	-.085	-.125
+	251	-.103	0
+S1
+	95	0	.080
+	177	.014	.090
diff --git a/Master/texmf-dist/metapost/support/trfonts.map b/Master/texmf-dist/metapost/support/trfonts.map
new file mode 100644
index 00000000000..17560ec6996
--- /dev/null
+++ b/Master/texmf-dist/metapost/support/trfonts.map
@@ -0,0 +1,48 @@
+AB	AvantGarde-Demi			pagd8r
+AI	AvantGarde-BookOblique		pagko8r
+AR	AvantGarde-Book			pagk8r
+AX	AvantGarde-DemiOblique		pagdo8r
+B	Times-Bold			ptmb8r
+BI	Times-BoldItalic		ptmbi8r
+CB	Courier-Bold			pcrb8r
+CI	Courier-Oblique			pcrro8r
+CO	Courier				pcrr8r
+CW	Courier				pcrr8r
+CX	Courier-BoldOblique		pcrbo8r
+CaslonI	CaslonFiveForty-Italic
+CaslonR	CaslonFiveForty-Roman
+GR	Symbol				psyr
+H	Helvetica			phvr8r
+HB	Helvetica-Bold			phvb8r
+HI	Helvetica-Oblique		phvro8r
+HX	Helvetica-BoldOblique		phvbo8r
+Hb	Helvetica-Narrow-Bold		phvbrn8r
+Hi	Helvetica-Narrow-Oblique	phvron8r
+Hr	Helvetica-Narrow		phvrrn8r
+Hx	Helvetica-Narrow-BoldOblique	phvbon8r
+I	Times-Italic			ptmri8r
+KB	Bookman-Demi			pbkd8r
+KI	Bookman-LightItalic		pbkli8r
+KR	Bookman-Light			pbkl8r
+KX	Bookman-DemiItalic		pbkdi8r
+MU	Sonata
+NB	NewCenturySchlbk-Bold		pncb8r
+NI	NewCenturySchlbk-Italic		pncri8r
+NR	NewCenturySchlbk-Roman		pncr8r
+NX	NewCenturySchlbk-BoldItalic	pncbi8r
+PA	Palatino-Roman			pplr8r
+PB	Palatino-Bold			pplb8r
+PI	Palatino-Italic			pplri8r
+PX	Palatino-BoldItalic		pplbi8r
+R	Times-Roman			ptmr8r
+S	Symbol				psyr
+S1	Times-Roman			ptmr8r
+Sonata	Sonata
+UnivMath1	Universal-MathOne	M1
+UnivMath2	Universal-MathTwo	M2
+UnivMath3	Universal-MathThree	M3
+UnivMath4	Universal-MathFour	M4
+UnivMath5	Universal-MathFive	M5
+UnivMath6	Universal-MathSix	M6
+ZD	ZapfDingbats			pzdr
+ZI	ZapfChancery-MediumItalic	pzcmi8r