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.tex98
1 files changed, 48 insertions, 50 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 281cfb7c7e1..9d40f3fbcac 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 2019.02.11
+% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2019.03.17
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%% mcf2graph.mf it must be version 4.36 or later
+%%% mcf2graph.mf it must be version 4.40 or later
\documentclass{article}
%------------------------------------------------------------------------------
\usepackage{luamplib}%
@@ -14,8 +14,8 @@
if unknown Ph1: input mcf2graph.mf; fi
sw_aux_out:=1;
sw_label_emu:=1;
- sw_font_frame:=4;
- max_bond_length:=4.5mm;
+ sw_fframe:=4;
+ max_blength:=4.5mm;
defaultfont:="uhvr8r";
defaultsize:=8bp;
defaultscale:=1;
@@ -40,9 +40,10 @@
{{\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;
+ fsize:=(80mm,40mm);
beginfont("NO:1","EN:Chlorophyll a","MW:893.49")
- MCd(.9,.9)(0,0.5)(<54,
+ msize:=(.9,.9);
+ MCat(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:#,>|,
@@ -76,9 +77,10 @@
\vspace{7mm}\\
%----------------------------------------------------------------------------
\begin{mplibcode}
-font_wd:=80mm; font_ht:=20mm;
+fsize:=(80mm,20mm);
beginfont("EN:beta-Carotene","MW:536.888")
- MCd(.65,1)(.9,.5)(
+ msize:=(.65,1);
+ MCat(.9,.5)(
<30,?6,3=dl,{3,5^35,5^-35}:/_,
4:\,|,!18,{1,3,5,7,9,11,13,15,17}=dr,{3,7,12,16}:/_,
|,?6,6=dl,{6,2^35,2^-35}:/_
@@ -104,9 +106,9 @@ endfont
\vspace{7mm}\\
%----------------------------------------------------------------------------
\begin{mplibcode}
- font_wd:=80mm; font_ht:=30mm;
+ fsize:=(80mm,30mm);
beginfont("NO:2","EN:Limonin","MW:470.51")
- MCa(0.7,0.5)(<30,
+ MCat(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,
@@ -135,9 +137,9 @@ endfont
\vspace{7mm}\\%
%----------------------------------------------------------------------------
\begin{mplibcode}
-font_wd:=80mm; font_ht:=20mm;
+fsize:=(80mm,20mm);
beginfont("NO:4","EN:Gibberellin A3","MW:346.37");
- MCa(0.8,0.5)(
+ MCat(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,4}:*/H^60)
@@ -162,9 +164,9 @@ endfont;
\vspace{7mm}\\
%----------------------------------------------------------------------------
\begin{mplibcode}
-font_wd:=80mm; font_ht:=25mm;
+fsize:=(80mm,25mm);
beginfont("EN:Morphine","MW:285.343")
- MCa(0.7,0.5)(
+ MCat(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:#,
15=d,6:/OH,8^180:*/H,12:/*OH
@@ -191,9 +193,9 @@ endfont
\vspace{7mm}\\
%----------------------------------------------------------------------------
\begin{mplibcode}
-font_wd:=80mm; font_ht:=35mm;
+fsize:=(80mm,35mm);
beginfont("NO:5","EN:Erythromycin","MW:733.93");
- MCa(0.8,0.5)(
+ MCat(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,
@@ -225,9 +227,9 @@ $5:\*^30`1.7,O,!,|,?6`.7,6:O,
\vspace{7mm}\\
%----------------------------------------------------------------------------
\begin{mplibcode}
-font_wd:=80mm; font_ht:=35mm;
+fsize:=(80mm,35mm);
beginfont("EN:Paclitaxel","MW:853.918")
- MCa(0.8,0.5)(
+ MCat(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,
@@ -258,9 +260,9 @@ $12:\*^-15,O,60,//O,-60)
%----------------------------------------------------------------------------
\noindent
\begin{mplibcode}
-font_wd:=80mm; font_ht:=70mm;
+fsize:=(80mm,70mm);
beginfont("NO:6","EN:Vancomycin","MW:1449.25");
- MCa(0.9,0)(
+ MCat(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:#,
@@ -304,9 +306,9 @@ $23:\,O,!,|,?6`.7,2:O,3^10:/!OH,{4,5}:/OH,
\vspace{10mm}\\%
%----------------------------------------------------------------------------
\begin{mplibcode}
- font_wd:=170mm; font_ht:=70mm;
+ fsize:=(170mm,70mm);
beginfont("NO:7","EN:Maitotoxin","MW:3425.86")
- MCf(
+ MC(
<55.8,?6,-4=?7 ,{-4,-3,-3,-3}=?6,-3:\,!3,?6,{-4,-3,-3,-3}=?6,-3:\,?6,-3=?6,
-3:\,!3,60,<-30,?6,-3=?6,-3:@,30,<30,?6,{-3,-3}=?6,-3=?7,{-4,-3,-3}=?6,
-2:\,?6,-3=?6,-3=?7,{-3,-3}=?6,-3=?8,-3=dl,{-5,-3,-3,-3}=?6,
@@ -355,20 +357,19 @@ $23:\,O,!,|,?6`.7,2:O,3^10:/!OH,{4,5}:/OH,
\newpage
\begin{mplibcode}
beginfont("EN:TCA cycle")
-font_wd:=160mm;
-font_ht:=75mm;
-max_bond_length:=5mm;
+fsize:=(160mm,75mm);
+max_blength:=5mm;
%------------------------------------------------------------------------
-MCa(0.33, 1)(<30,O[-1],!0,//O,!,//O,!2,//O,!,O[-1])
-MCa(0.66, 1)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4`1:\,//O,!,O[-1],4:/OH^-165)
-MCa(1, 1)(<30,O[-1],!0,//O,!2,!~dr,!,//O,!,O[-1],-4`1:\,//O,!,O[-1])
-MCa(1, 0.55)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4:\`1,//O,!,O[-1])
-MCa(1, 0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1],-4:\`1,//O,!,O[-1])
-MCa(0.66,0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1])
-MCa(0.33,0.05)(<30,O[-1],!0,//O,!3,//O,!,"{S-CoA}")
-MCa(0, 0.05)(<30,O[-1],!0,//O,!3,//O,!,O[-1])
-MCa(0, 0.55)(<30,O[-1],!0,//O,!,!~dr,!,//O,!,O[-1])
-MCa(0, 1)(<30,O[-1],!0,//O,!3,//O,!,O[-1],3:/OH)
+MCat(0.33, 1)(<30,O[-1],!0,//O,!,//O,!2,//O,!,O[-1])
+MCat(0.66, 1)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4`1:\,//O,!,O[-1],4:/OH^-165)
+MCat(1, 1)(<30,O[-1],!0,//O,!2,!~dr,!,//O,!,O[-1],-4`1:\,//O,!,O[-1])
+MCat(1, 0.55)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4:\`1,//O,!,O[-1])
+MCat(1, 0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1],-4:\`1,//O,!,O[-1])
+MCat(0.66,0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1])
+MCat(0.33,0.05)(<30,O[-1],!0,//O,!3,//O,!,"{S-CoA}")
+MCat(0, 0.05)(<30,O[-1],!0,//O,!3,//O,!,O[-1])
+MCat(0, 0.55)(<30,O[-1],!0,//O,!,!~dr,!,//O,!,O[-1])
+MCat(0, 1)(<30,O[-1],!0,//O,!3,//O,!,O[-1],3:/OH)
%-------------------------------------------------------------------------
EXT(
defaultfont:="uhvr8r";
@@ -416,19 +417,18 @@ endfont
\end{mplibcode}
\begin{verbatim}
beginfont("EN:TCA cycle")
-font_wd:=160mm;
-font_ht:=75mm;
-max_bond_length:=5mm;
-MCa(0.33, 1)(<30,O[-1],!0,//O,!,//O,!2,//O,!,O[-1])
-MCa(0.66, 1)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4`1:\,//O,!,O[-1],4:/OH^-165)
-MCa(1, 1)(<30,O[-1],!0,//O,!2,!~dr,!,//O,!,O[-1],-4`1:\,//O,!,O[-1])
-MCa(1, 0.55)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4:\`1,//O,!,O[-1])
-MCa(1, 0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1],-4:\`1,//O,!,O[-1])
-MCa(0.66,0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1])
-MCa(0.33,0.05)(<30,O[-1],!0,//O,!3,//O,!,"{S-CoA}")
-MCa(0, 0.05)(<30,O[-1],!0,//O,!3,//O,!,O[-1])
-MCa(0, 0.55)(<30,O[-1],!0,//O,!,!~dr,!,//O,!,O[-1])
-MCa(0, 1)(<30,O[-1],!0,//O,!3,//O,!,O[-1],3:/OH)
+fsize:=(160mm,75mm);
+max_blength:=5mm;
+MCat(0.33, 1)(<30,O[-1],!0,//O,!,//O,!2,//O,!,O[-1])
+MCat(0.66, 1)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4`1:\,//O,!,O[-1],4:/OH^-165)
+MCat(1, 1)(<30,O[-1],!0,//O,!2,!~dr,!,//O,!,O[-1],-4`1:\,//O,!,O[-1])
+MCat(1, 0.55)(<30,O[-1],!0,//O,!4,//O,!,O[-1],-4:\`1,//O,!,O[-1])
+MCat(1, 0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1],-4:\`1,//O,!,O[-1])
+MCat(0.66,0.05)(<30,O[-1],!0,//O,!3,//O,!,//O,!,O[-1])
+MCat(0.33,0.05)(<30,O[-1],!0,//O,!3,//O,!,"{S-CoA}")
+MCat(0, 0.05)(<30,O[-1],!0,//O,!3,//O,!,O[-1])
+MCat(0, 0.55)(<30,O[-1],!0,//O,!,!~dr,!,//O,!,O[-1])
+MCat(0, 1)(<30,O[-1],!0,//O,!3,//O,!,O[-1],3:/OH)
EXT(
defaultfont:="uhvr8r";
defaultscale:=0.75;
@@ -458,5 +458,3 @@ endfont
\end{verbatim}
%----------------------------------------------------------------------------
\end{document}
----
-\end{document}