summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex')
-rw-r--r--Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex150
1 files changed, 80 insertions, 70 deletions
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 7249a504c0e..252b8a749da 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 2017.10.29
+% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2018.01.03
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%% mcf2graph.mf it must be version 4.29 or later
+%%% mcf2graph.mf it must be version 4.30 or later
\documentclass{article}
%------------------------------------------------------------------------------
\usepackage{luamplib}%
@@ -9,16 +9,15 @@
\usepackage{textcomp}%
\mplibcodeinherit{enable}%
\mplibverbatim{enable}%
-\everymplib{if unknown Ph1:
- input mcf2graph.mf;
- sw_auxout:=1;
- sw_label_emu:=1;
- sw_font_frame:=4;
- max_bond_length:=4.5mm;
- defaultfont:="uhvr8r";
- defaultsize:=8bp;
- defaultscale:=0.7;
- fi}%
+\everymplib{if unknown Ph1: input mcf2graph.mf; fi
+ sw_auxout:=1;
+ sw_label_emu:=1;
+ sw_font_frame:=4;
+ max_bond_length:=4.5mm;
+ defaultfont:="uhvr8r";
+ defaultsize:=8bp;
+ defaultscale:=1;
+ }%
%------------------------------------------------------------------------------
\pagestyle{empty}
\topmargin=-20mm
@@ -35,25 +34,26 @@
\end{center}
\noindent%
%------------------------------------------------------------------------------------
-{{\small {\tt FM(C) :} molecular formula calculated by mcf2graph}\\
-{{\small {\tt MW(C) :} molecular weight calculated by mcf2graph}\\
-{{\small {\tt MW(D) :} molecular weight from literature data}\vspace{5mm}\\
+{{\tt FM(C) :} molecular formula calculated by mcf2graph\\
+{{\tt MW(C) :} molecular weight calculated by mcf2graph\\
+{{\tt MW(D) :} molecular weight from literature data\vspace{5mm}\\
\begin{mplibcode}
font_wd:=80mm; font_ht:=40mm;
beginfont("NO:1","EN:Chlorophyll a","MW:893.49")
MCd(.9,.9)(0,0.5)(<54,
|<,``1,?5,{2,5}=dl,4:N,3:\,54~dl,|,?5,{2,4}=dl,5:N,
- -2:\,54~dl,|,?5,2=dl,5:N,-2:\~dl,54,|,?5,5=dl,5:N,-2:\~dl,&$5,
- -1:@,24,/*COO!^15,72,//O,&$1,>|,
- 4:\`1.45,Mg,&17,-1:@,&11~vb,-1:@,&23~vb,
+ -2:\,54~dl,|,?5,2=dl,5:N,-2:\~dl,54,|,?5,5=dl,5:N,-2:\~dl,$5:&,
+ -1:@,24,/*COO!^15,72,//O,$1:&,>|,
+ 4:\`1.45,Mg,17:&,-1:@,11~vb:&,-1:@,23~vb:&,
{2,9,15,20~zf}:/_,8:/!,14:\,!!,
21:@,-6~wf,!2,//O,!,O,!2,!!,|,!13,{1,5,9,13}:/_,
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont
\end{mplibcode}
@@ -62,9 +62,9 @@
|<,``1,?5,{2,5}=dl,4:N,3:\,54~dl,
|,?5,{2,4}=dl,5:N,
-2:\,54~dl,|,?5,2=dl,5:N,
--2:\~dl,54,|,?5,5=dl,5:N,-2:\~dl,&$5,
--1:@,24,/*COO!^15,72,//O,&$1,>|,
-4:\`1.45,Mg,&17,-1:@,&11~vb,-1:@,&23~vb,
+-2:\~dl,54,|,?5,5=dl,5:N,-2:\~dl,$5:&,
+-1:@,24,/*COO!^15,72,//O,$1:&,>|,
+4:\`1.45,Mg,17:&,-1:@,11~vb:&,-1:@,23~vb:&,
{2,9,15,20~zf}:/_,8:/!,14:\,!!,
21:@,-6~wf,!2,//O,!,O,!2,!!,
|,!13,{1,5,9,13}:/_,
@@ -83,9 +83,10 @@ beginfont("EN:beta-Carotene","MW:536.888")
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont
\end{mplibcode}
@@ -103,7 +104,7 @@ endfont
\begin{mplibcode}
font_wd:=80mm; font_ht:=30mm;
beginfont("NO:2","EN:Limonin","MW:470.51")
- MCa(.6,0.5)(<30,
+ MCa(0.7,0.5)(<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}:/_,{1^60,5^180,16^60}:/*H,
@@ -111,9 +112,10 @@ endfont
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont
\end{mplibcode}
@@ -133,23 +135,24 @@ endfont
\begin{mplibcode}
font_wd:=80mm; font_ht:=20mm;
beginfont("NO:4","EN:Gibberellin A3","MW:346.37");
- MCa(.6,0.5)(
- <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,
+ MCa(0.8,0.5)(
+ <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://_,13:*/OH,8:/*OH,14:*/_,{1^60,4^60}:*/H)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont;
\end{mplibcode}
\begin{minipage}[b]{85mm}
\begin{verbatim}
-<18,?5,3=?7,5=?6[12],8:@,160`1.3,&3,
+<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,
+5:@,40~zf`1,O,60,//O^180,14~zb:&,
2:/COOH,7://_,13:*/OH,8:/*OH,
14:*/_,{1^60,4^60}:*/H)
\end{verbatim}
@@ -159,16 +162,17 @@ endfont;
\begin{mplibcode}
font_wd:=80mm; font_ht:=25mm;
beginfont("EN:Morphine","MW:285.343")
- MCf(
+ MCa(0.7,0.5)(
<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,/_,&9~wb,
+ 7:@,60~wf`0.75,70~si_`1.3,45,N,/_,9~wb:&,
15=d,6:/OH,8^180:*/H,12:/*OH
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont
\end{mplibcode}
@@ -177,7 +181,7 @@ endfont
<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,/_,&9~wb,
+45,N,/_,9~wb:&,
15=dl,
6:/OH,8^180:*/H,12:/*OH
\end{verbatim}
@@ -187,8 +191,8 @@ endfont
\begin{mplibcode}
font_wd:=80mm; font_ht:=35mm;
beginfont("NO:5","EN:Erythromycin","MW:733.93");
- MCa(.6,0.5)(
- <30,|<,``1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,>|,&1,
+ MCa(0.8,0.5)(
+ <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}:*/_,{4,6^-35,8,12^35}:/*_,
{6^35,11,12^-35}:*/OH,
$3:\*,O,30,|,?6`.7,2:O,{3,5^35}:/_,4:/OH,5^-35:/O!,
@@ -196,16 +200,17 @@ beginfont("NO:5","EN:Erythromycin","MW:733.93");
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont;
\end{mplibcode}
\begin{minipage}[b]{85mm}
\begin{verbatim}
<30,|<,``1,<-120,60,60,60,-60,60,
-60,-60,60,60,60,-60,60,60,>|,&1,
+60,-60,60,60,60,-60,60,60,>|,1:&,
14:O,13:/*Et,{1,9}://O,{2,10}:*/_,
{4,6^-35,8,12^35}:/*_,
{6^35,11,12^-35}:*/OH,
@@ -220,26 +225,29 @@ $5:\*^30`1.7,O,!,|,?6`.7,6:O,
\begin{mplibcode}
font_wd:=80mm; font_ht:=35mm;
beginfont("EN:Paclitaxel","MW:853.918")
- MCf(?6,5=d,3:@,|<,``1,36,45,45,45,45,>|,&$5,-4=?6,-4=?4,||,-1=wb,-3=wf,-1:O,
+ MCa(0.8,0.5)(
+ ?6,5=d,3:@,|<,``1,36,45,45,45,45,>|,$5:&,-4=?6,-4=?4,||,-1=wb,-3=wf,-1:O,
{4^35,4^-35,6}:/_,{3^-60,15}:*/OH,8:/*H^-60,9:*/_^60,10://O,
$1:\,O,!,//O,!,*/OH,!,/Ph,60~wf,NH,-60,//O,60,Ph,
$7:\*,O,-45,//O,60,Ph,$11:*\,O,-60,//O,60,$12:\*^-15,O,60,//O,-60
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont
\end{mplibcode}
\begin{minipage}[b]{85mm}
\begin{verbatim}
-?6,5=d,3:@,|<,``1,36,45,45,45,45,>|,&$5,
+?6,5=d,3:@,|<,``1,36,45,45,45,45,>|,$5:&,
-4=?6,-4=?4,||,-1=wb,-3=wf,-1:O,
{4^35,4^-35,6}:/_,{3^-60,15}:*/OH,
8:/*H^-60,9:*/_^60,10://O,
-$1:\,O,!,//O,!,*/OH,!,/Ph,60~wf,NH,-60,//O,60,Ph,
+$1:\,O,!,//O,!,*/OH,!,/Ph,
+60~wf,NH,-60,//O,60,Ph,
$7:\*,O,-45,//O,60,Ph,$11:*\,O,-60,//O,60,
$12:\*^-15,O,60,//O,-60)
\end{verbatim}
@@ -250,12 +258,12 @@ $12:\*^-15,O,60,//O,-60)
\begin{mplibcode}
font_wd:=80mm; font_ht:=65mm;
beginfont("NO:6","EN:Vancomycin","MW:1449.25");
- MCa(0.5,0)(
+ MCa(0.9,0)(
<30,
|<,``1,!12,{1,3,12}=zf,7=wf,/H^-60,60,*/OH,60,
- Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,&$1,
- $7:@,&$26,$1:@,120,//O,60,NH,60,/*H,*/COOH^180,-60,
- Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,&$4,>|,
+ Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,$1:&,
+ $7:@,$26:&,$1:@,120,//O,60,NH,60,/*H,*/COOH^180,-60,
+ Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,$4:&,>|,
{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,
@@ -265,9 +273,10 @@ beginfont("NO:6","EN:Vancomycin","MW:1449.25");
)
EXT(
label.lrt("("&inf_EN&")",(0,h));
- label.lrt("FM(C): "&cal_FM,(0,h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,h-13mm));
)
endfont;
\end{mplibcode}
@@ -276,10 +285,10 @@ endfont;
<30,|<,``1,!12,{1,3,12}=zf,7=wf,
/H^-60,60,*/OH,60,Ph,-4:/Cl,
-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,
--3:\,/*OH,*/H^-60,&$1,
-$7:@,&$26,$1:@,120,//O,60,NH,60,
+-3:\,/*OH,*/H^-60,$1:&,
+$7:@,$26:&,$1:@,120,//O,60,NH,60,
/*H,*/COOH^180,-60,
-Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,&$4,>|,
+Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,$4:&,>|,
{3^40,6,9,12}://O,{2,5,8,11}:NH,
{1^180,4^180}:*/H,
{7^-60,10^60,14^60}:/*H,
@@ -315,9 +324,10 @@ $23:\,O,!,|,?6`.7,2:O,3^10:/!OH,{4,5}:/OH,
)
EXT(
label.lrt("("&inf_EN&")",(0,.8h));
- label.lrt("FM(C): "&cal_FM,(0,.8h-4mm));
- label.lrt("MW(C): "&cal_MW,(0,.8h-8mm));
- label.lrt("MW(D): "&inf_MW,(0,.8h-12mm));
+ defaultscale:=0.8;
+ label.lrt("FM(C): "&cal_FM,(0,.8h-5mm));
+ label.lrt("MW(C): "&cal_MW,(0,.8h-9mm));
+ label.lrt("MW(D): "&inf_MW,(0,.8h-13mm));
)
endfont
\end{mplibcode}