mcf2graph (3jan17)

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

10 files changed, 319 insertions, 177 deletions

diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/CHANGELOG b/Master/texmf-dist/doc/metapost/mcf2graph/CHANGELOG
index dbd4f1ecf86..baa2227a59a 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/CHANGELOG
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/CHANGELOG
@@ -1,6 +1,11 @@
 *******************************************************************************
- Changelog of mcf2graph software package         by Akira Yamaji 2016-11-15
+ Changelog of mcf2graph software package         by Akira Yamaji 2017-01-03
 *******************************************************************************
+[ver. 4.06  / 2017-01-03]
+  -miner update
+  -corrected molecular examples
+  -update MCF syntax manual
+
 [ver. 4.05  / 2016-11-15]
   -improve molecular checklist
   -update MCF syntax manual
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/README b/Master/texmf-dist/doc/metapost/mcf2graph/README
index aa648091eca..212224824de 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/README
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/README
@@ -1,7 +1,7 @@
 ********************************************************************************
  mcf2graph  : Convert Molecular Coding Format to graphics with METAFONT/METAPOST
  Author     : Akira Yamaji
- version    : 4.05 2016-11-15
+ version    : 4.06 2017-01-03
  E-mail     : mcf2graph@gmail.com
  Located at : http://www.ctan.org/pkg/mcf2graph
 ********************************************************************************
@@ -19,7 +19,7 @@
  ( 3) mcf2graph.mf           Macro of Metafont / Metapost
  ( 4) mcf_manual.tex         MCF syntax manual(LaTeX file)
  ( 5) mcf_man_soc.mf         Molecular difinition file for mcf_manual.tex
- ( 6) mcf_man_soc-042.eps    No.42 EPS(with color) file of (4)
+ ( 6) mcf_man_soc-060.eps    No.60 EPS(with color) file of (4)
  ( 7) mcf_manual.pdf         PDF of (4) (used LaTeX,dvipdfmx)
  ( 8) mcf_example.tex        LaTeX example,
                                Make file 'mcf_exa_soc-info.aux' before typeset
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
index 3ebecf6107a..bb6c14f2cdb 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
@@ -1,11 +1,11 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format for mcf_example.tex  by Akira Yamaji  2016.11.15
+% Molecular Coding Format for mcf_example.tex  by Akira Yamaji  2017.01.03
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-input mcf2graph.mf;   %%% it must be version 4.02 or later
+input mcf2graph.mf;   %%% it must be version 4.06 or later
 %-------------------------------------------------------------------------
 font_wd#:=33mm#;
 font_ht#:=24mm#;
-max_bond_length#:=5mm#;
+max_bond_length#:=4.5mm#;
 %-------------------------------------------------------------------------
 sw_auxout:=1;
 sw_font_frame:=0;
@@ -28,7 +28,7 @@ var4:="cal_MW";  tag4:="cMW";
 %%%% outputformat:="png"; hppp:=vppp:=0.1; outputtemplate:="%j-%3c.png";
 %**************************************************************************
 beginfont("EN:Acetamiprid","MW:222.676")
-  MCf(<30,Ph,2:N,1:/Cl,4\,!,N,/Me,!,/Me,!~dr,N,!,CN)
+  MCf(<30,Ph,2:N,1:/Cl,4\,!,N,/Me,!,/Me,!~dl,N,!,CN)
 endfont
 %***************************************************************************
 beginfont("EN:Imidacloprid","MW:255.662")
@@ -36,7 +36,7 @@ beginfont("EN:Imidacloprid","MW:255.662")
 endfont
 %***************************************************************************
 beginfont("EN:Thiamethoxam","MW:291.71")
-  MCf(<30,?6,@(4,6)N,2:O,6:/Me,5\\,N,!,NO2,4\,!,|,?5,$(1,3)dl,3:N,5:S,4:/Cl)
+  MCf(<30,?6,@(4,6)N,2:O,6:/Me,5\\,N,!,NO2,4\,!,|,?5,$(1,3)d,3:N,5:S,4:/Cl)
 endfont
 %***************************************************************************
 beginfont("EN:Tebufenozide","MW:352.478")
@@ -44,24 +44,24 @@ beginfont("EN:Tebufenozide","MW:352.478")
 endfont
 %***************************************************************************
 beginfont("EN:Pyridaphenthion","MW:340.334")
-  MCf(<-30,!2,O,!,P,//S,/OEt^160>rl,!,O,!,|,?6,$(1,5)dl,@(2,3)N,4://O,3:/Ph)
+  MCf(<-30,!2,O,!,P,//S,/O!2^160>rl,!,O,!,|,?6,$(1,5)dl,@(2,3)N,4://O,3:/Ph)
 endfont
 %***************************************************************************
 beginfont("EN:Fenitrothion","MW:277.231")
-  MCf(<30,!,O,!,P,//S,/OMe^160,!,O,!,|,Ph,3:/Me,4:/NO2)
+  MCf(<30,!,O,!,P,//S,/O!^160,!,O,!,|,Ph,3:/Me,4:/NO2)
 endfont
 %***************************************************************************
 beginfont("EN:Permethrin","MW:391.288")
-  MCf(<-30,?3,2^-35:*/Me,2^35:/*Me,1\,!~dl,/Cl,!,Cl,
+  MCf(<-30,?3,2^-35:*/Me,2^35:/*Me,1\,!~d,/Cl,!,Cl,
      3\,//O,!,O,!2,|,Ph,3\,O,-60,Ph)
 endfont
 %***************************************************************************
 beginfont("EN:Bensultap","MW:431.598")
-  MCf(<30,Ph,4\,SOO,!,S,!2,N,/Me,!2,S,!,SOO,!,Ph)
+  MCf(<30,Ph,4\,SOO,!,S,!2,N,/iPr,!2,S,!,SOO,!,Ph)
 endfont
 %***************************************************************************
 beginfont("EN:Azoxystorbin","MW:403.394")
-  MCf(<30,Ph,2:/OH,3\,O,!,|,Ph,@(4,6)N,3\,O,!,|,Ph,2\,/OMe,!,//O,!,O,!)
+  MCf(<30,Ph,2:/CN,3\,O,!,|,Ph,@(4,6)N,3\,O,!,|,Ph,2\,/COOMe,!~dl,!,O,!)
 endfont
 %***************************************************************************
 beginfont("EN:Isoprothiolane","MW:290.392")
@@ -69,7 +69,7 @@ beginfont("EN:Isoprothiolane","MW:290.392")
 endfont
 %***************************************************************************
 beginfont("EN:Etridiazole","MW:247.518")
-  MCf(<18,?5,$(1,3)dl,@(2,4)N,5:S,1:/OEt,3:/CCl3)
+  MCf(<18,?5,$(1,3)d,@(2,4)N,5:S,1:/O!2,3:/CCl3)
 endfont
 %***************************************************************************
 beginfont("EN:Oxine-Copper","MW:351.852")
@@ -78,7 +78,7 @@ beginfont("EN:Oxine-Copper","MW:351.852")
 endfont
 %***************************************************************************
 beginfont("EN:Captan","MW:300.578")
-  MCf(<12,?6,6=dl,3=?5,8:N,@(7,9)//O,8\,S,!,CCl3)
+  MCf(<12,?6,6=d,3=?5,8:N,@(7,9)//O,8\,S,!,CCl3)
 endfont
 %***************************************************************************
 beginfont("EN:Chlorothalonil","MW:265.902")
@@ -91,7 +91,7 @@ beginfont("EN:Tetraconazole","MW:372.145")
 endfont
 %***************************************************************************
 beginfont("EN:Endosulfan","MW:406.904");
-  MCf(<26,?7,7=?6[13],11*,208~wf`1.45,&8~wb,10=dl,@(3,5)O,4:S,4://O,
+  MCf(<26,?7,7=?6[13],11*,208~wf`1.45,&8~wb,10=d,@(3,5)O,4:S,4://O,
       @(8,9,10,11,12^-210,12^-150)/Cl)
 endfont;
 %***************************************************************************
@@ -100,11 +100,11 @@ beginfont("EN:Flutolanil","MW:323.315")
 endfont
 %***************************************************************************
 beginfont("EN:Propiconazole","MW:342.22")
-  MCf(<-6,?5,$(2,5)d,@(1,3,4)N,4\,!2,|,Ph,@(4,6)/Cl,#7*,|,?5,@(2,5)O,3:/Bu^24)
+  MCf(<-6,?5,$(2,5)d,@(1,3,4)N,4\,!2,|,Ph,@(4,6)/Cl,#7*,|,?5,@(1,4)O,3:/Pr^24)
 endfont
 %***************************************************************************
 beginfont("EN:Pencycuron","MW:328.84")
-  MCf(<30,Ph,6:/Cl,3\,!,N,/?6,!,//O,!,NH,!,Ph)
+  MCf(<30,Ph,6:/Cl,3\,!,N,/?5,!,//O,!,NH,!,Ph)
 endfont
 %***************************************************************************
 beginfont("EN:Asulam","MW:230.238")
@@ -112,20 +112,20 @@ beginfont("EN:Asulam","MW:230.238")
 endfont
 %***************************************************************************
 beginfont("EN:Oxadiargyl","MW:341.19")
-  MCf(<30,Ph,@(1,3)/Cl,4\,|,?5,2=dl,@(1,2)N,4:O,5://O,-3:/tBu,#6\,O,!2,!~tm)
+  MCf(<30,Ph,@(1,3)/Cl,4\,|,?5,2=d,@(1,2)N,4:O,5://O,-3:/tBu,#6\,O,!2,!~tm)
 endfont
 %***************************************************************************
 beginfont("EN:Oxaziclomefone","MW:376.277")
-  MCf(<30,?6,4:N,2:O,1:/Me,5://O,6:/Ph,4\,/Me^35,/Me^-35,!,|,Ph,@(3,5)/Cl)
+  MCf(<30,?6,6=dl,4:N,2:O,1:/Me,5://O,6:/Ph,4\,/Me^35,/Me^-35,!,|,Ph,@(3,5)/Cl)
 endfont
 %***************************************************************************
 beginfont("EN:Cafenstrole","MW:350.437")
-  MCf(<30,Ph,@(2,4,6)/Me,3\,SOO,!,|,?5,$(2,5)d,@(2,4,5)N,4\,!,N,/Me,!2)
+  MCf(<30,Ph,@(2,4,6)/Me,3\,SOO,!,|,?5,$(2,5)d,@(2,4,5)N,4\,//O,!,N,/Et,!2)
 endfont
 %***************************************************************************
 beginfont("EN:Cyclosulfamuron","MW:421.428")
   MCf(<30,
-    Ph,5\,//O,!,?3,4\,NH,!,SOO,!,NH,!,//O,!,NH,!,|,Ph,@(2,6)N,@(3,5)/OMe)
+    Ph,5\,//O,!,?3,4\,NH,!,SOO,!,NH,!,//O,!,NH,!,|,Ph,@(2,6)N,@(3,5)/O!)
 endfont
 %***************************************************************************
 beginfont("EN:Napropamide","MW:271.36")
@@ -133,7 +133,7 @@ beginfont("EN:Napropamide","MW:271.36")
 endfont
 %***************************************************************************
 beginfont("EN:Pyributicarb","MW:330.446")
-  MCf(<30,Ph,5:/tBu,3\,//O,!,S,!,N,/Me,!,|,Ph,@(5,6)/Me,3:/OMe)
+  MCf(<30,Ph,5:/tBu,3\,O,!,//S,!,N,/Me,!,|,Ph,3:/O!)
 endfont
 %***************************************************************************
 beginfont("EN:Propyzamide","MW:256.126")
@@ -141,7 +141,7 @@ beginfont("EN:Propyzamide","MW:256.126")
 endfont
 %***************************************************************************
 beginfont("EN:Pendimethalin","MW:281.312")
-  MCf(<30,Ph,@(1,2)/Me,6:/Cl,@(3,5)/NO2,4\,NH,!,/Et,!2)
+  MCf(<30,Ph,@(1,2)/Me,@(3,5)/NO2,4\,NH,!,/Et,!2)
 endfont
 %***************************************************************************
 beginfont("EN:Benfluralin","MW:335.283")
@@ -149,41 +149,41 @@ beginfont("EN:Benfluralin","MW:335.283")
 endfont
 %***************************************************************************
 beginfont("EN:Trinexapac-ethyl","MW:252.266")
-  MCf(<30,?6,@(2,4)//O,6:/COOEt,3\\,/OH,!,?3)
+  MCf(<30,?6,@(2,4)//O,6:/COO!2,3\\,/OH,!,?3)
 endfont
 %***************************************************************************
 beginfont("EN:Buprofezin","MW:305.44")
-  MCf(<-30,?6,@(1,5)N,3:S,6://O,5:/tBu,4\\,N,!,tBu,1:/Ph)
+  MCf(<-30,?6,@(1,5)N,3:S,6://O,5:/iPr,4\\,N,!,tBu,1:/Ph)
 endfont
 %***************************************************************************
 beginfont("EN:Tricyclazole","MW:189.236")
-  MCf(<30,Ph,2:/Me,|,-4=?5,1:N,3:S,|,-3=?5,$(2,4)dl,@(2,3)N)
+  MCf(<30,Ph,2:/Me,|,-4=?5,1:N,3:S,|,-3=?5,$(2,4)d,@(2,3)N)
 endfont
 %***************************************************************************
-beginfont("EN:Phthalide","MW:134.134")
+beginfont("EN:Phthalide","MW:271.91")
   MCf(<30,Ph,@(1,2,5,6)/Cl,|,-4=?5,2:O,3://O)
 endfont
 %***************************************************************************
 beginfont("EN:Probenazole","MW:223.246")
-  MCf(<12,Ph,|,-4=?5,1:SOO,2:N,3\,O,!2,!~dr)
+  MCf(<12,Ph,|,-4=?5,-2=dl,1:SOO,2:N,3\,O,!2,!~dl)
 endfont
 %***************************************************************************
 beginfont("EN:Simetryn","MW:213.303")
-  MCf(<30,Ph,@(2,4,6)N,5:/SMe,@(1,3)/NHEt)
+  MCf(<30,Ph,@(2,4,6)N,5:/S!,@(1,3)/NH!2)
 endfont
 %***************************************************************************
-beginfont("EN:Rifampicin","MW:822.953")
-  MCf(<30,
-     Ph,6:/Me^30,5:/OH,|,-6=?5,1:O,3://O,2:/*Me^60,|,-8=?6,@(2,4)d,@(1,4)/OH,
+beginfont("EN:Rifampicin","MW:822.94")
+  MCf(<30,Ph,6:/Me^30,5:/OH,|,-6=?5,1:O,3://O,2:/*Me^60,
+      |,-8=?6,$(2,4)dl,@(1,4)/OH,
      {,``1,-2\,NH,60,//O,-60,/Me,60~dl,60,60~dl,-60,
       */Me,60,/*OH,-60,/*Me,60,/*OH,60,*/Me^30,-60,
-      60,/*Me^30,-53,/*OMe,66,-53~dl,66`1.2,O,},&#8,
-      #11\,!~dr,N,!,|,?6,@(1,4)N,4:/Me)
+      60,/*Me^30,-53,66,-53~dl,66`1.2,O,},&#8,
+      -4:/*O!,-6*,-30,O,!,//O,!,#11\,!~d,N,!,|,?6,@(1,4)N,4:/Me)
 endfont
 %***************************************************************************
-beginfont("EN:Wortmanin")
+beginfont("EN:Wortmannin","MW:428.43")
   MCf(<30,?6,$(-4,-2)?6,-4=?5,(2,7)=?5[3],
-     6:O,1://O,$(7,10)dl,8://O,17://O,-3=d,-1:O,
+     6:O,1://O,$(7,10)d,8://O,17://O,-3=d,-1:O,
      @(4,12)*/Me^60,11:/*H^-60,
      #5\*,60,O,!,#14\*^-25,//O,!,O,!)
 endfont
@@ -196,24 +196,23 @@ endfont
 %***************************************************************************
 beginfont("EN:Validamycin","MW:497.494")
   MCf(<30,?6,@(5,6)/OH,3\,-60,OH,
-    #4\,O,-60,|,?6,2:O,@(3,4,5,6)/OH,
-    #1\,NH,!,|,?6,2=d,@(4,5,6)/OH,-4\,!,OH)
+    #4\,O,-60,|,?6,2:O,@(3,4,5)/OH,6:/!OH,
+    #1\,NH,!,|,?6,2=dl,@(4,5,6)/OH,3:/!OH)
 endfont
 %**************************************************************************
 beginfont("EN:Oceltamivir","MW:312.41")
-  MCf(<30,?6,3=dl,1:/NH2,3:/COOEt,6:/NHCOMe,5\~zf,O,!,/Et,!2)
+  MCf(<30,?6,3=d,1:/NH2,3:/COO!2,6:/NHCOMe,5\~zf,O,!,/Et,!2)
 endfont
 %***************************************************************************
-beginfont("EN:Etyprostontromethamine")
-  MCf(?5,@(2,5)/*OH,
-    #3*\^6,!~dl,!3,O,0,Ph,#8*,|,?5,@(1,4)O,#4\*^-6,!,30~dl,30,!3,COOH)
+beginfont("EN:Luciferin","MW:280.33")
+  MCf(<30,Ph,3=?5,8\,?5,$(9,16)d,@(9,14)N,@(7,11)S,1:/OH,-2:*/COOH)
 endfont
 %***************************************************************************
 beginfont("EN:Chlorophyll a","MW:893.509")
 MCf(<54,{,``1,?5,$(2,5)dl,4:N,3\,54~dl,|,?5,$(2,4)dl,5:N,
    -2\,54~dl,|,?5,2=d,5:N,-2\~dl,54,|,?5,5=d,5:N,-2\~dl,&#5,
    -1*,24,/*COOMe^15,72,//O,&#1,},
-   @(2,9,15,20~zf)/Me,8:/Et,14\,!~dr,
+   @(2,9,15,20~zf)/Me,8:/Et,14\,!~d,
    #4\`1.45,Mg,&17,-1*,&11~vb,-1*,&23~vb,
    #21*,-6~wf,!2,//O,!,O,!2,!~dl,|,!13,@(1,5,9,13)/Me)
 endfont
@@ -244,14 +243,14 @@ endfont
 beginfont("EN:beta-Carotene","MW:536.888")
   MCf(<30,?6,3=dl,@(3,5^35,5^-35)/Me,
      4\,|,!18,$(1,3,5,7,9,11,13,15,17)dr,@(3,7,12,16)/Me,
-     |,?6,6=dl,@(6,2^35,2^-35)/Me)
+     |,?6,6=d,@(6,2^35,2^-35)/Me)
 endfont
 %**************************************************************************
 beginfont("EN:alfa-Tocopherol","MW:430.717")
   MCf(<30,Ph,3=?6,7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH,8\,|,!12,@(4,8)/*Me,12:/Me)
 endfont
 %**************************************************************************
-beginfont("EN:Qercetin")
+beginfont("EN:Quercetin","MW:302.24")
   MCf(<30,Ph,3=?6,9\,Ph,9=dl,10:O,7://O,@(2,6,8,13,14)/OH)
 endfont
 %***************************************************************************
@@ -268,12 +267,12 @@ beginfont("EN:Cromolyn","MW:468.37")
 endfont
 %**************************************************************************
 beginfont("EN:Emetine","MW:480.649")
-  MCf(<30,Ph,$(-4,-4)?6,8:N,@(1,6)/OMe,-2:/*Et,@(7^-60,12^-60)/*H,
-     -3\,!~zb,<-60,|,?6,5=d,2:NH,-6^-60:*/H,|,-2=?6,$(2,4)dl)
+  MCf(<30,Ph,$(-4,-4)?6,8:N,@(1,6)/O!,-2:/*Et,@(7^-60,12^-60)/*H,
+     -3\,!~zb,<-60,|,?6,5=d,2:NH,-6^-60:*/H,|,-2=?6,$(2,4)dl,@(-2,-3)/O!)
 endfont
 %***************************************************************************
 beginfont("EN:Colchicine","MW:399.443")
-  MCf(<30,Ph,@(1,2,6)/OMe,-4=?7,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/OH,
+  MCf(<30,Ph,@(1,2,6)/O!,-4=?7,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/O!,
      9\,NH,!,//O,!)
 endfont
 %***************************************************************************
@@ -282,7 +281,7 @@ beginfont("EN:Caffeine","MW:194.194")
 endfont
 %**************************************************************************
 beginfont("EN:Acronycine","MW:321.376")
-  MCf(<30,Ph,|,-4=?6,1:N,4://O,,1:/Me,-3=Ph2,-1:/OMe,
+  MCf(<30,Ph,|,-4=?6,1:N,4://O,,1:/Me,-3=Ph2,-1:/O!,
       |,-4=?6,2=d,4:O,-2^-35:/Me,-2^35:/Me)
 endfont
 %***************************************************************************
@@ -291,7 +290,7 @@ beginfont("EN:Ibotenic acid","MW:158.113")
 endfont
 %**************************************************************************
 beginfont("EN:Piperine","MW:285.343")
-  MCf(<30,Ph,|,-1=?5,@(1,3)O,#4\,!~dr,!,!~dr,!,//O,!,|,?6,1:N)
+  MCf(<30,Ph,|,-1=?5,@(1,3)O,#4\,!~d,!,!~d,!,//O,!,|,?6,1:N)
 endfont
 %***************************************************************************
 beginfont("EN:Febrifugine","MW:301.346")
@@ -301,12 +300,12 @@ endfont
 beginfont("EN:Mitomycine C","MW:334.332")
   MCf(<30,?6,$(3,6)dl,@(2,5)//O,1:/Me,|,-4=?5,1:N,
      #6:/NH2,|,-3=?5,|,-2=?3,-1=wb,-2=wf,-1:NH,
-     #8:/*OMe^35,#9\`1^17.9,!,O,!,//O,!,NH2)
+     #8:/*O!^35,#9\`1^17.9,!,O,!,//O,!,NH2)
 endfont
 %***************************************************************************
-beginfont("EN:Podophyllotoxin");
+beginfont("EN:Podophyllotoxin","MW:414.41");
   MCf(<0,?5,@(2,5)O,-3=Ph2,-3=?6,-3=?5,-2:O,-1=wb,-3://O,
-    10\*,Ph,@(-2,-3,-4)/OMe,#13:/*OH,@(#11~wf^-60,#12~zf^60)/H)
+    10\*,Ph,@(-2,-3,-4)/O!,#13:/*OH,@(#11~wf^-60,#12~zf^60)/H)
 endfont;
 %***************************************************************************
 beginfont("EN:Warfarin","MW:308.333");
@@ -314,39 +313,39 @@ beginfont("EN:Warfarin","MW:308.333");
 endfont;
 %***************************************************************************
 beginfont("EN:Genistein","MW:270.24");
-  MCf(<30,Ph,3=?6,10:O,@(2,6)/OH,9://O,8\,Ph,-3:/OH)
+  MCf(<30,Ph,3=?6,9=dl,10:O,@(2,6)/OH,7://O,8\,Ph,-3:/OH)
 endfont;
 %***************************************************************************
 beginfont("EN:Baicalein","MW:270.24");
-  MCf(<30,Ph,3=?6,10:O,@(1,2,6)/OH,9://O,8\,Ph)
-endfont;
-%***************************************************************************
-beginfont("EN:Baicalein");
-  MCf(<30,Ph,3=?6,9=d,10:O,@(1,2,6)/OH,7://O,-2\,Ph)
+  MCf(<30,Ph,3=?6,9=dl,10:O,@(1,2,6)/OH,7://O,8\,Ph)
 endfont;
 %***************************************************************************
 beginfont("EN:Reserpine","MW:608.688");
   MCf(<54,Ph,-4=?5,-2=?6,-4=?6,-3=?6,9=dl,11:N,7:NH,10:*/H^-60,
     @(15^-60,16^60)/*H,
-    #20*\,O,!,//O,!,|,Ph,@(-2,-3,-4)/OMe,@(#1,#19~zf>rl)/OMe,
+    #20*\,O,!,//O,!,|,Ph,@(-2,-3,-4)/O!,@(#1,#19~zf>rl)/O!,
     #18*\,//O,!,O,!)
 endfont;
 %***************************************************************************
+beginfont("EN:Nicotine","MW:162.23");
+  MCf(<30,Ph,2:N,4\,|,?5,2:N,2:/Me)
+endfont;
+%***************************************************************************
 beginfont("EN:Rotenone","MW:394.423");
-  MCf(<-60,?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)dl,$(3,17)dr,
-   @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/OMe,1*\,/Me,!~dl)
+  MCf(<-60,?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)d,$(3,17)dr,
+   @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/O!,1*\,/Me,!~d)
 endfont;
 %***************************************************************************
 beginfont("EN:Pyrethrin I","MW:328.452");
   MCf(<30,?3,@(3^35~wf,3^-35~zf)/Me,1*\,!~dl,iPr,
-     2\*,//O,!,O,-36~zb,|,?5,-2=d,-1:/Me,-3://O,-2\,!4,$(-1,-3)dl)
+     2\*,//O,!,O,-36~zb,|,?5,-2=d,-1:/Me,-3://O,-2\,!4,$(-1,-3)d)
 endfont;
 %***************************************************************************
 beginfont("EN:Erythromycin","MW:733.937");
 MCf(<30,{,``1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1,
     14:O,13:/*Et,@(1,9)//O,@(2,10)*/Me,@(4,6^-35,8,12^35)/*Me,
     @(6^35,11,12^-35)*/OH,
-    #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/OMe,
+    #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/O!,
     #5\*^30`1.7,O,!,|,?6`.7,6:O,5:/Me,2:/OH,3:/NMeMe)
 endfont;
 %**************************************************************************
@@ -358,11 +357,11 @@ beginfont("EN:Paclitaxel","MW:853.918")
 endfont
 %**************************************************************************
 beginfont("EN:Mevastatin","MW:390.52")
-  MCf(<30,?6,2=d,4:*/H^60,|,-4=?6,2=dl,9:*/Me,
+  MCf(<30,?6,2=d,4:*/H^60,|,-4=?6,2=d,9:*/Me,
      #10*\,!,60~wb,|,?6,6:O,-2://O,-4:/*OH,#5\*,O,60,//O,!,*/Me,!2)
 endfont
 %***************************************************************************
-beginfont("EN:Sesamine","MW:330.336")
+beginfont("EN:Sesamine","MW:354.35")
   MCf(<54,?5,1=?5,@(4,7)O,@(1^-54,2^54)*/H,
    #5*\^-12,Ph,|,-3=?5,@(-1,-3)O,#8*\^-12,Ph,|,-3=?5,@(-1,-3)O)
 endfont
@@ -370,16 +369,16 @@ endfont
 beginfont("EN:Morphine","MW:285.343")
   MCf(<30,Ph,2=?6,-4=?6,(1,12)=?5[2],-1:O,-1=zb,
     7*,60~wf`0.75,70~si_`1.3,45,N,/Me,&9~wb,
-    15=dl,6:/OH,8^180:*/H,12:/*OH)
+    15=d,6:/OH,8^180:*/H,12:/*OH)
 endfont
 %**************************************************************************
 beginfont("EN:Capsaicin","MW:305.418")
-  MCf(<30,Ph,1:/OH,6:/OMe,4\,!,NH,!,//O,|,!8,-3=dr,-1:/Me)
+  MCf(<30,Ph,1:/OH,6:/O!,4\,!,NH,!,//O,|,!8,-3=dr,-1:/Me)
 endfont
 %***************************************************************************
 beginfont("EN:Quinine","MW:324.424")
-  MCf(<30,Ph,3=Ph,7:N,6:/OMe,
-    10\,*/OH,/H~zf^-60,!,|,?6,2:N,1:*/H^60,4*\,!~dr,2*,165~zf,60,&5~zb)
+  MCf(<30,Ph,3=Ph,7:N,6:/O!,
+    10\,*/OH,/H~zf^-60,!,|,?6,2:N,1:*/H^60,4*\,!~d,2*,165~zf,60,&5~zb)
 endfont
 %***************************************************************************
 beginfont("EN:Atoropin","MW:289.375")
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf
index 42d11722bb7..e01c67036d9 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.pdf
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex
index c039f1e1611..38f09068551 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex
@@ -1,5 +1,5 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Example of MCF typeset by LaTeX   mcf_examples.tex   by A.Yamaji  2016.11.15
+% Example of MCF typeset by LaTeX   mcf_examples.tex   by A.Yamaji  2017.01.03
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \documentclass[a4paper]{article}
 \usepackage{graphicx}
@@ -44,7 +44,9 @@
      \advance\@tempcnta -300\relax%
      \put(20,\@tempcnta){\tiny\bf [\the\fontnum] \MOLnameE}%
      \advance\@tempcnta -250\relax%
-     \put(20,\@tempcnta){\tiny\tt FM:\CALfm { / }MW:\CALmw}%
+     \put(20,\@tempcnta){\tiny\tt MW:\CALmw { / }FM:\CALfm}%
+     \advance\@tempcnta -220\relax%
+     \put(20,\@tempcnta){\tiny\tt MW:\MOLmw(data)}%
      \put( 0,0){\makebox(\@tempcntb,\@tempcnta){\@stru{\MOLfile}[\MOLchar]}}%
   \end{picture}%
   \advance\fontnum\@ne\relax\advance\tnum\@ne\relax%
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
index e334100deec..02a6dfc3e91 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
@@ -1,7 +1,7 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format file for mcf_manual.tex  by Akira.Yamaji 2016.11.05
+% Molecular Coding Format file for mcf_manual.tex  by Akira.Yamaji 2017.01.03
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-input mcf2graph.mf;   %% it must be version 4.03 or later
+input mcf2graph.mf;   %% it must be version 4.06 or later
 %------------------------------------------------------------------------
 sw_auxout:=0;
 sw_mol_frame:=0;
@@ -22,7 +22,7 @@ beginfont("EN:Alanine")
 endfont
 %***********************************************************************
 beginfont("EN:Valine")
-  MCf(<30,NH2,!0,!,COOH,2\,/Me,!)
+  MCf(<30,NH2,!0,/iPr,!,COOH)
 endfont
 %***********************************************************************
 beginfont("EN:Leucine")
@@ -74,7 +74,7 @@ beginfont("EN:Asparagine")
 endfont
 %***********************************************************************
 beginfont("EN:Aspartic acid")
-  MCf(<30,NH2,!0,!,COOH,2\,!,COOH)
+  MCf(<30,NH2,!0,/!COOH,!,COOH)
 endfont
 %***********************************************************************
 beginfont("EN:Glutamic acid")
@@ -392,19 +392,19 @@ endfont
 beginfont("EN:substituent 1")
   font_ht#:=25mm#;
   sw_clip:=1;
-  MCf(<30,!,/Me,!,/Et,!3,/Pr,!,/iPr,!3,/tBu,!,/Ph^-30,!)
+  MCf(<30,!,/Me,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!)
 endfont
 %***********************************************************************
 beginfont("EN:substituent 2")
   font_ht#:=15mm#;
   sw_clip:=1;
-  MCf(<-30,!,//O,!2,/*H,!2,*/H,!2,**?3,!)
+  MCf(<-30,!`1,//O,!2`1,/*H,!2`1,*/H,!2`1,**?3,!`1)
 endfont
 %***********************************************************************
 beginfont("EN:substituent 3")
   font_ht#:=18mm#;
   sw_clip:=1;
-  MCf(<30,``1,!2,/Me~zf`2^30,!2,*/Pr>lr,!2,*/Pr>rl,!)
+  MCf(<30,``1,!2,/Me~zf`2^30,!2,*/!2>lr,!2,*/!2>rl,!)
 endfont
 %***********************************************************************
 beginfont("EN:substituent 3")
@@ -418,11 +418,11 @@ beginfont("EN:substituent 3")
 endfont
 %***********************************************************************
 beginfont("EN:substituent 4")
-  font_ht#:=17mm#;
+  font_ht#:=18mm#;
   sw_clip:=1;
   margin_top_bottom:=2mm;
   sw_numberA:=1; numberA_end:=7;
-  MCf(<-30,!6,@(2~wf,4~zf,6^-30)/Me)
+  MCf(<-30,!6`1,@(2~wf,4~zf,6^-30)/Me)
 endfont
 %***********************************************************************
 beginfont("EN:substituent 5")
@@ -430,7 +430,7 @@ beginfont("EN:substituent 5")
   margin_top_bottom:=2mm;
   sw_clip:=1;
   sw_numberA:=1; numberA_end:=8;
-  MCf(<30,!7`1,@(3)/*Me`2^30,5:*/Pr>lr,7:*/Pr>rl)
+  MCf(<30,!7`1,@(3)/*Me`2^30,5:*/!2>lr,7:*/!2>rl)
 endfont
 %***********************************************************************
 beginfont("EN:chain strech direction mode 1")
@@ -799,11 +799,21 @@ beginfont("EN:MCd()")
   MCd(1,0.8)(0.9,0)(<30,Ph,4:/Cl,3:/F)
 endfont
 %***********************************************************************
-beginfont("EN:MCf()")
-  font_ht#:=20mm#;
+beginfont("EN:MCf() ht")
+  margin_left_right:=margin_top_bottom:=0.5mm;
+  font_wd#:=25mm#;
+  font_ht#:=15mm#;
   sw_font_frame:=1;
   sw_mol_frame:=1;
-  MCf(<30,Ph,4:/Cl,3:/F)
+  MCf(<30,Ph)
+endfont
+beginfont("EN:MCf() vt")
+  margin_left_right:=margin_top_bottom:=0.5mm;
+  font_wd#:=13mm#;
+  font_ht#:=25mm#;
+  sw_font_frame:=1;
+  sw_mol_frame:=1;
+  MCf(<30,Ph)
 endfont
 %***********************************************************************
 beginfont("EN:EXT()")
@@ -903,9 +913,7 @@ endfont
 %***********************************************************************
 beginfont("EN:Warfarin","CAS:81-81-2","FM:C19H16O4","MW:308.33")
   font_ht#:=25mm#;
-   MCf(
-     <30,Ph,3=?6,8=dl,10:O,7:/OH,9://O,8\,/Ph`1,60,!,//O,!
-   )
+   MCf(<30,Ph,3=?6,8=dl,10:O,7:/OH,9://O,8\,/Ph`1,60,!,//O,!)
 endfont
 %***************************************************************************
 beginfont("EN:Limonin")
@@ -924,8 +932,8 @@ endfont
 %***************************************************************************
 beginfont("EN:Colchicine","CAS:477-27-0","FM:C21H23NO6","MW:385.41")
   font_ht#:=25mm#;
-  MCf(<30,Ph,@(1,2,6)/OMe,|,-4=?7,
-     |,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/OH,
+  MCf(<30,Ph,@(1,2,6)/O!,|,-4=?7,
+     |,-5=?7,$(-1,-4,-6)dl,-2://O,-3:/O!,
      #9\,NH,!,//O,!)
 endfont
 %***************************************************************************
@@ -946,7 +954,7 @@ endfont
 %***************************************************************************
 beginfont("EN:Quinine","CAS:130-95-0","FM:C20H24N2O2","MW:324.42")
   font_ht#:=25mm#;
-  MCf(<30,Ph,3=Ph,7:N,6:/OMe,
+  MCf(<30,Ph,3=Ph,7:N,6:/O!,
     10\,*/OH,/H~zf^-60,!,|,?6,2:N,1:*/H^60,4*\,!~dr,2*,165~zf,60,&5~zb)
 endfont
 %***************************************************************************
@@ -959,7 +967,7 @@ endfont
 beginfont("EN:Rotenone");
   font_ht#:=30mm#;
   MCf(<-60,?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)dl,$(3,17)dr,
-   @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/OMe,1*\,/Me,!~dl)
+   @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/O!,1*\,/Me,!~dl)
 endfont;
 %***************************************************************************
 beginfont("EN:Pyrethrin I");
@@ -969,9 +977,9 @@ endfont;
 %***************************************************************************
 beginfont("EN:Validamycin")
   font_ht#:=20mm#;
-  MCf(<30,?6,@(5,6)/OH,3\,-60,OH,
-    #4\,O,-60,|,?6,2:O,@(3,4,5,6)/OH,
-    #1\,NH,!,|,?6,2=d,@(4,5,6)/OH,-4\,!,OH)
+  MCf(<30,?6,@(5,6)/OH,3:/!OH>rl,
+    #4\,O,-60,|,?6,2:O,@(3,4,5)/OH,6:/!OH,
+    #1\,NH,!,|,?6,2=dl,@(4,5,6)/OH,3:/!OH)
 endfont
 %***************************************************************************
 beginfont("EN:Paclitaxel","CAS:33069-62-4","FM:C47H51NO14","MW:853.91")
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf
index 8126f5e7e67..3dd0c413636 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.pdf
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex
index 03b78cd584e..c2a73256dc8 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_manual.tex
@@ -1,5 +1,5 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%  Molecular Coding Format manual          by  Akira Yamaji 2016.11.15
+%  Molecular Coding Format manual          by  Akira Yamaji 2017.01.03
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \documentclass[a4paper]{article}
 %%%%\usepackage{graphicx}
@@ -55,12 +55,6 @@
 %----------------------------------------------------------------------------
 \def\INFO#1{\@for\@temp:=#1\do{\mol@sel\@temp}\put@char}%
 %----------------------------------------------------------------------------
-\def\figex#1#2#3#4{%
-\makebox[5mm]{}%%
-\makebox[#1]{\tt #2}%
-\makebox[#1]{\tt #3}%
-\makebox[#1]{\tt #4}}%
-%----------------------------------------------------------------------------
 \begin{document}
 \title{\Huge\sf Molecular Coding Format manual}
 \author{Akira Yamaji}
@@ -183,10 +177,13 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   dl : double left side
   dr : double right side
   tm : triple
-
   <30,!~dm,!~dl,!~dr,!~tm
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+    dm       dl       dr       tm
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Wedge}
 \begin{verbatim}
@@ -198,6 +195,10 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   <30,!~wf,!,!~wb,!,!~zf,!,!~zb
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+    wf       wb       zf       zb
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Vector}
 \begin{verbatim}
@@ -207,25 +208,35 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   <30,!~vf,!,!~vb
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+    vf        vb
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Dotted,wave}
 \begin{verbatim}
   Bn=bond type : change bond type at Bn
-  dt : dotted
-  wv : wave
+  dt : dotted  /  wv : wave
 
   <30,!3,1=dt,3=wv
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+    dt        wv
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Broad}
 \begin{verbatim}
-  bd : broad
-  bz : broad dotted 
+  bd : broad  /  bz : broad dotted 
 
   <30,!3,1=bd,3=bz
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+    bd        bz
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Change multi bond type}
 \begin{verbatim}
@@ -365,11 +376,15 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   (4,11)=?4[2]  : fuse 2/4 ring to B11..B4
   ** ?m[n] (4<=m<=6,n=m-2)
 
-  MCd(1,.7)(  0,0)(<30,?6,3=?6,(11,4)=?6[4])
-  MCd(1,.6)(.54,1)(<30,?6,3=?6,(11,4)=?5[3])
-  MCd(1,.6)(  1,0)(<30,?6,3=?6,(11,4)=?4[2])
+1:MCd(1,.7)(  0,0)(<30,?6,3=?6,(11,4)=?6[4])
+2:MCd(1,.6)(.54,1)(<30,?6,3=?6,(11,4)=?5[3])
+3:MCd(1,.6)(  1,0)(<30,?6,3=?6,(11,4)=?4[2])
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+        1             2             3
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Attached 3 bond}
 \begin{verbatim}
@@ -377,10 +392,14 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   (16,4)=?5[2] : fuse 2/5 ring to B16..B4
   ** ?m[n] (5<=m<=6,n=m-3)
 
-  MCd(1,.55)(0,0)(?6,$(3,10)?6,(16,4)=?6[3])
-  MCd(1,.55)(1,0)(?6,$(3,10)?6,(16,4)=?5[2])
+1:MCd(1,.55)(0,0)(?6,$(3,10)?6,(16,4)=?6[3])
+2:MCd(1,.55)(1,0)(?6,$(3,10)?6,(16,4)=?5[2])
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+         1                 2
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Attached 4 bond}
 \begin{verbatim}
@@ -405,19 +424,19 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
 \subsection{Substituent}
 \subsubsection{Insert substituent}
 \begin{verbatim}
+  /  : single
   <30,!,/Me,!,/Et,!3,/Pr,!,/iPr,
       !3,/tBu,!,/Ph^-30,!
 
-  ** Me:methyl Et:ethyl
-     Pr:propyl iPr:isopropyl
-     tBu:tertial buthyl Ph:phenyl
+  ** Me:methyl Et:ethyl(!)
+     Pr:propyl(!2) iPr:isopropyl
+     tBu:tertial buthyl(!3) Ph:phenyl
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
 \subsubsection{Insert modified substituent}
 \begin{verbatim}
-  /  : single
-  // : double
+  // : double (double middle)
   */ : wedge forward
   /* : wedge dotted forward
   ** : direct
@@ -425,6 +444,10 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   <30,!,//O,!,/*H,!,*/H,!,/?3,!,**?3,!
 \end{verbatim}
 \MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      //      /*      */      **
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \begin{verbatim}
   ~ : change type
@@ -432,14 +455,14 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
   ` : change length
   > : change enviroment
 
-  <30,``1,!,/Me~zf`2^30,!,/Me~zf`2^30,
-   !2,*/Pr>lr,!2,*/Pr>rl,!)
+  <30,``1,!,/Me~zf`2^30,
+   !2,*/!2>lr,!2,*/!2>rl,!)
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
 \subsubsection{Add substituent}
 \begin{verbatim}
-  <-30,!17,2:/Me,4:/Et,6:/Pr,
+  <-30,!17,2:/Me,4:/!,6:/!2,
    10:/iPr,14:/tBu,16:/Ph^-60
 \end{verbatim}
 \MCFstructure
@@ -454,10 +477,11 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
 \MCFstructure
 %-----------------------------------------------------------------------------
 \begin{verbatim}
+
   ^,`,> : change angle,length,environment
 
   <30,!7`1,
-  3:/*Me`2^30,5:*/Pr>lr,7:*/Pr>rl
+  3:/*Me`2^30,5:*/!2>lr,7:*/!2>rl
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
@@ -585,43 +609,61 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
 \begin{verbatim}
  default: margin_top_bottom=0.4mm
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0mm}{0.4mm}{5mm}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0mm       0.4mm       5mm
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Offset thickness of bond}
 \begin{verbatim}
   default: offset_thickness#=0.2pt#
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0pt}{0.2pt}{0.5pt}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0pt       0.2pt       0.5pt
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Offset of doublebond gap}
 \begin{verbatim}
   default: offset_bond_gap#=0.3pt#
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.0pt}{0.3pt}{1.0pt}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.0pt      0.3pt      1.0pt
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Offset of atom width}
 \begin{verbatim}
   default: offset_atom#=0.8pt#
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.0pt}{0.8pt}{2.0pt}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.0pt      0.8pt      2.0pt
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Offset of wedge width}
 \begin{verbatim}
   default:  offset_wedge#=0.4pt#
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.0pt}{0.4pt}{1.0pt}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.0pt      0.4pt      1.0pt
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Max bond length}
 \begin{verbatim}
   default:  max_bond_length#=10mm#
 \end{verbatim}
-\MCFstructure\\
-\figex{18mm}{6mm}{8mm}{20mm}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+     6mm       8mm         20mm
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsection{Ratio parameter}
 %-----------------------------------------------------------------------------
@@ -629,57 +671,81 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
 \begin{verbatim}
   default:  ratio_thickness_bond=0.015
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.005}{0.015}{0.030}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.005      0.015      0.030
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Char/bond thickness}
 \begin{verbatim}
   default:  ratio_char_bond=1.5
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{1.0}{1.5}{2.0}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      1.0        1.5        2.0
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Bondgap/bond length}
 \begin{verbatim}
   default:  ratio_bondgap_bond= 0.15
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.10}{0.15}{0.20}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.10       0.15       0.20
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Atom/bond length}
 \begin{verbatim}
   default:  ratio_atom_bond= 0.36
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.25}{0.36}{0.46}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+       0.25      0.36      0.46
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Wedge/bond length}
 \begin{verbatim}
   default:  ratio_wedge_bond=0.12
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.10}{0.12}{0.20}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.10       0.12       0.20
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Font atom gap/atom length}
 \begin{verbatim}
   default:  ratio_atomgap_atom= 0.050
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.0}{0.050}{0.12}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+      0.0       0.050       0.12
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Chain/ring length}
 \begin{verbatim}
   default:  ratio_chain_ring= 0.66
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.4}{0.65}{1.0}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+       0.4         0.65        1.0
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsubsection{Zebra gap/bond length}
 \begin{verbatim}
   default:  ratio_zebragap_bond=0.12
 \end{verbatim}
-\MCFstructure\\
-\figex{20mm}{0.06}{0.12}{0.20}
+\MCFstructure
+\vspace{-3mm}%
+\begin{verbatim}
+       0.06      0.12      0.20
+\end{verbatim}
 %-----------------------------------------------------------------------------
 \subsection{Drawing mode}
 %-----------------------------------------------------------------------------
@@ -842,15 +908,16 @@ pk font,PNG,SVG,EPS or MDL MOL file(V2000).\\
 %-----------------------------------------------------------------------------
 \subsection{Function MCf()}
 \begin{verbatim}
-  (Draw fit to font size)
-
+  (Draw molecular fit to font size)
   MCf(...) : MCd(1,1)(0.5,0.5)(...)
 
-  beginfont()
-    MCf(<30,Ph,3:/F,4:/Cl)
-  endfont
+  beginfont()            beginfont()
+  font_wd#:=25mm#;       font_wd#:=13mm#;
+  font_ht#:=15mm#;       font_ht#:=25mm#;
+  MCf(<30,Ph)            MCf(<30,Ph)
+  endfont                endfont
 \end{verbatim}
-\MCFstructure
+\MCFstructure\hspace{12mm}\MCFstructure
 %-----------------------------------------------------------------------------
 \newpage
 \subsection{Function EXT()}
@@ -1034,9 +1101,9 @@ F:mcf_man_soc/C:90/EN:Ampicillin/CAS:69-53-4
 %-----------------------------------------------------------------------------
 \subsection{Colchicine}
 \begin{verbatim}
-  <30,Ph,@(1,2,6)/OMe,
+  <30,Ph,@(1,2,6)/O!,
   -4=?7,-5=?7,
-  $(-1,-4,-6)dl,-2://O,-3:/OH,
+  $(-1,-4,-6)dl,-2://O,-3:/O!,
   9\,NH,!,//O,!
 \end{verbatim}
 \MCFstructure
@@ -1048,7 +1115,7 @@ F:mcf_man_soc/C:90/EN:Ampicillin/CAS:69-53-4
   13=dl,
   8:N,@(15,17)O,
   9:/*H^180,10:*/H^60,
-  13:*/OH,14:/*OH
+  13:*/OH,14:/*OMe
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
@@ -1065,7 +1132,7 @@ F:mcf_man_soc/C:90/EN:Ampicillin/CAS:69-53-4
 %-----------------------------------------------------------------------------
 \subsection{Quinine}
 \begin{verbatim}
-  <30,Ph,3=Ph,7:N,6:/OMe,
+  <30,Ph,3=Ph,7:N,6:/O!,
    10\,*/OH,/H~zf^-60,!,
    |,?6,2:N,1:*/H^60,
    4*\,!~dr,
@@ -1087,7 +1154,7 @@ F:mcf_man_soc/C:90/EN:Ampicillin/CAS:69-53-4
   <-60,?5,$(-3,-2,-3,-4)?6,
   $(7,9,-2,-4)dl,$(3,17)dr,
   @(2,13,16)O,10://O,@(11^-60,12^60)*/H,
-  @(-2,-3)/OMe,1*\,/Me,!~dl
+  @(-2,-3)/O!,1*\,/Me,!~dl
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
@@ -1101,9 +1168,9 @@ F:mcf_man_soc/C:90/EN:Ampicillin/CAS:69-53-4
 %-----------------------------------------------------------------------------
 \subsection{Validamycin}
 \begin{verbatim}
-  <30,?6,@(5,6)/OH,3\,-60,OH,
-  #4\,O,-60,|,?6,2:O,@(3,4,5,6)/OH,
-  #1\,NH,!,|,?6,2=d,@(4,5,6)/OH,-4\,!,OH
+  <30,?6,@(5,6)/OH,3:/!OH>rl,
+  #4\,O,-60,|,?6,2:O,@(3,4,5)/OH,6:/!OH,
+  #1\,NH,!,|,?6,2=dl,@(4,5,6)/OH,3:/!OH
 \end{verbatim}
 \MCFstructure
 %-----------------------------------------------------------------------------
@@ -1298,8 +1365,69 @@ MW  : molecular weight from literature data
 M  END
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \end{verbatim}%
-\newpage
 %----------------------------------------------------------------------------
+\newpage
+\subsection{LuaTeX file example}
+%############################################################################
+\begin{verbatim}
+%--------------------------------------------------------------------
+\documentclass{article}
+\usepackage{luamplib}%
+\mplibcodeinherit{enable}%
+\mplibverbatim{enable}%
+\everymplib{if unknown Ph1:
+              input mcf2graph.mf;
+              mp_log_name:="temp-info.aux";
+              sw_auxout:=1; 
+            fi}%
+%--------------------------------------------------------------------
+\begin{document}
+\noindent%
+%--------------------------------------------------------------------
+\begin{mplibcode}
+  font_wd:=50mm; font_ht:=50mm;
+  beginfont("NO:2","EN:Limonin","MW:470.51")
+  MCf(<30,
+    ?6,$(-3,-4)?6,
+      -5=?3,-2=wf,-1=wb,6=?5,-4=?6,-5=wf,
+      @(13,15,17,20)O,@(3,12,21)//O,
+      @(4~wf^60,8~zf^60,18^35,18^-35)/Me,
+      @(1^60,5^180,16^60)/*H,
+      14\*,|,?5,$(1,4)dl,3:O
+  )
+  endfont
+\end{mplibcode}\\
+%--------------------------------------------------------------------
+\begin{mplibcode}
+  font_wd:=80mm; font_ht:=50mm;
+  beginfont("NO:3","EN:beta-carotene","MW:536.87")
+    MCf(<30,
+      ?6,3=dl,@(3,5^35,5^-35)/Me,
+      4\,|,!18,$(1,3,5,7,9,11,13,15,17)dr,
+      @(3,7,12,16)/Me,
+      |,?6,6=dl,@(6,2^35,2^-35)/Me
+    )
+  endfont
+\end{mplibcode}\\
+%--------------------------------------------------------------------
+\begin{mplibcode}
+  font_wd:=50mm; font_ht:=50mm;
+  beginfont("NO:4","EN:Gibberellin A3","MW:346.37");
+  MCf(<18,?5,3=?7,5=?6[12],
+     8*,160`1.3,&3,13=dl,6=wf,8=wb,
+     5*,40~zf`1,O,60,//O^180,&14~zb,
+     2:/COOH,7://Me,13:*/OH,8:/*OH,
+     14:*/Me,@(1^60,4^60)*/H
+  )
+endfont;
+\end{mplibcode}\\
+%--------------------------------------------------------------------
+\end{document}
+%--------------------------------------------------------------------
+\end{verbatim}%
+%############################################################################
+%------------------------------------------------------------------------
+\newpage
 \subsection{LaTeX file example}
 %############################################################################
 \begin{verbatim}
@@ -1333,14 +1461,14 @@ M  END
 %--------------------------------------------------------------------
 \begin{document}
 \unitlength=1mm%
-\INFO{F:mcf_man_soc,C:114,NO:1,cMW:349.40462,cFM:C16H19N3O4S,EN:Ampicillin}%
-\INFO{F:mcf_man_soc,C:115,NO:2,cMW:386.6532,cFM:C27H46O,EN:Cholesterol}%
+\INFO{F:mcf_man_soc,C:115,NO:1,cMW:349.40462,cFM:C16H19N3O4S,EN:Ampicillin}%
+\INFO{F:mcf_man_soc,C:116,NO:2,cMW:386.6532,cFM:C27H46O,EN:Cholesterol}%
 \end{document}
 %--------------------------------------------------------------------
 \end{verbatim}%
 %############################################################################
 %------------------------------------------------------------------------
-\INFO{F:mcf_man_soc,C:114,NO:1,cMW:349.40462,cFM:C16H19N3O4S,EN:Ampicillin}%
-\INFO{F:mcf_man_soc,C:115,NO:2,cMW:386.6532,cFM:C27H46O,EN:Cholesterol}%
+\INFO{F:mcf_man_soc,C:115,NO:1,cMW:349.40462,cFM:C16H19N3O4S,EN:Ampicillin}%
+\INFO{F:mcf_man_soc,C:116,NO:2,cMW:386.6532,cFM:C27H46O,EN:Cholesterol}%
 %------------------------------------------------------------------------
 \end{document}
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf
index 7e6621922a2..a84377df1c7 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.pdf
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex
index 28c3da998fa..243d6252d7c 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex
@@ -1,7 +1,7 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Example of  MCF typest with LuaLaTeX(luamplib)     by A.Yamaji   2016.10.19
+% Example of  MCF typest with LuaLaTeX(luamplib)     by A.Yamaji   2017.01.03
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%% mcf2graph.mf it must be version 4.00 or later
+%%% mcf2graph.mf it must be version 4.06 or later
 \documentclass{article}
 %------------------------------------------------------------------------------
 \usepackage{luamplib}%
@@ -94,7 +94,7 @@
     MCf(<54,
    {,``1,?5,$(2,5)d,4:N,3\,54~dl,|,?5,$(2,4)d,5:N,
    -2\,54~dl,|,?5,2=d,5:N,-2\~dl,54,|,?5,5=d,5:N,-2\~dl,&#5,
-   -1*,24,/*COOMe^15,72,//O,&#1,},
+   -1*,24,/*COO!^15,72,//O,&#1,},
    4\`1.45,Mg,&17,-1*,&11~vb,-1*,&23~vb,
    @(2,9,15,20~zf)/Me,8:/Et,14\,!~dr,
    21*,-6~wf,!2,//O,!,O,!2,!~dl,|,!13,@(1,5,9,13)/Me,
@@ -119,7 +119,7 @@
 \MOLcaption{0mm}{45mm}\vspace{6mm}\\%
 %----------------------------------------------------------------------------
 \begin{mplibcode}
-  font_wd:=90mm; font_ht:=30mm;
+  font_wd:=80mm; font_ht:=28mm;
   beginfont("NO:3","EN:beta-carotene","MW:536.87")
     MCf(<30,
       ?6,3=dl,@(3,5^35,5^-35)/Me,
@@ -143,13 +143,13 @@ endfont;
 \MOLcaption{0mm}{38mm}\vspace{5mm}\\%
 %----------------------------------------------------------------------------
 \begin{mplibcode}
-font_wd:=60mm; font_ht:=60mm;
+font_wd:=55mm; font_ht:=55mm;
 beginfont("NO:5","EN:Erythromycin","MW:733.93");
   MCf(<30,
     {,``1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,},&1,
      14:O,13:/*Et,@(1,9)//O,@(2,10)*/Me,@(4,6^-35,8,12^35)/*Me,
      @(6^35,11,12^-35)*/OH,
-     #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/OMe,
+     #3\*,O,30,|,?6`.7,2:O,@(3,5^35)/Me,4:/OH,5^-35:/O!,
      #5\*^30`1.7,O,!,|,?6`.7,6:O,5:/Me,2:/OH,3:/NMeMe
      )
   endfont;
@@ -168,8 +168,8 @@ beginfont("NO:6","EN:Vancomycin","MW:1449.25");
     @(3^40,6,9,12)//O,@(2,5,8,11)NH,
     @(1^180,4^180)*/H,@(7^-60,10^60,14^60)/*H,
     #10*\^-60,60,//O,!,NH2,
-    #13*\,NH,!,//O,!,/'(!,iPr)^-35>60,*/H^60,!~zf,NH,!,
-    #23\,O,!,|,?6`.7,2:O,3^10:/'(!,OH),@(4,5)/OH,,
+    #13*\,NH,!,//O,!,/!iPr^-35>60,*/H^60,!~zf,NH,!,
+    #23\,O,!,|,?6`.7,2:O,3^10:/!OH,@(4,5)/OH,
         -1\,O,!,|,?6`.7,6:O,@(3^35,5)/Me,3^-35:/NH2,4:/OH
   )
 endfont;