summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf')
-rw-r--r--Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf53
1 files changed, 47 insertions, 6 deletions
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 209747c69cc..df008deb152 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
@@ -1,5 +1,5 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2015.7
+% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2015.7.25
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
input mcf2graph.mf;
%-----------------------------------------------------------------------
@@ -48,16 +48,22 @@ beginfont("EN:change bond 2")
MCf(^^30,!9,1=vf,2=vb,3=tm,4=dt,5=wv,@(7~bd^-45`2,9~ov^45`2)/Me)
endfont
%***********************************************************************
-beginfont("EN:change bond length")
+beginfont("EN:change bond length1")
sw_start_vector:=1;
sw_numberB:=1;
- MCf(^^30,!3,!`1.2,!2)
+ MCf(^^30,!2,!2`1.2,!)
endfont
%***********************************************************************
-beginfont("EN:change bond length")
+beginfont("EN:change bond length2")
sw_start_vector:=1;
sw_numberB:=1;
- MCf(^^30,!3,``1.2,!3)
+ MCf(^^30,!2,``1.2,!2,!)
+endfont
+%***********************************************************************
+beginfont("EN:change bond length3")
+ sw_start_vector:=1;
+ sw_numberB:=1;
+ MCf(^^30,?6,3\,?6`1.2,4=??6)
endfont
%***********************************************************************
beginfont("EN:change atom 1")
@@ -93,6 +99,12 @@ endfont
beginfont("EN:fused ring 1")
sw_start_vector:=1;
sw_numberB:=1;
+ MCf(^^30,?6,3=?5)
+endfont
+%***********************************************************************
+beginfont("EN:fused ring 1")
+ sw_start_vector:=1;
+ sw_numberB:=1;
MCf(^^30,?6,$(3,3,3)?6)
endfont
%***********************************************************************
@@ -250,7 +262,7 @@ beginfont("EN:Ampicillin")
)
endfont
%***********************************************************************
-beginfont("EN:Cholesterol","MW:386.65")
+beginfont("EN:Cholesterol")
MCf(
^^30,?6,$(-4,-2)??6,-4=??5,7=dl,
1:*/OH,@(4,12)*/Me^60,9:*/H^60,
@@ -259,4 +271,33 @@ beginfont("EN:Cholesterol","MW:386.65")
)
endfont
%***********************************************************************
+beginfont("EN:alfa-Tocopherol")
+ 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:Caffeine")
+ MCf(^^30,
+ ?6,-4=??5,$(3,8)dl,@(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O
+ )
+endfont
+%***********************************************************************
+beginfont("EN:Lycorine")
+ MCf(^^30,
+ Ph,-4=??6,-2=??6,6=??5,(9,12)=??5[3],13=dl,8:N,@(15,17)O,
+ 9:/*H^180,10:*/H^60,13:*/OH,14:/*OH
+ )
+endfont
+%***********************************************************************
+beginfont("EN:Gibberellin");
+ MCf(
+ ^^12,?6`1.3,3=??5,9=??7,12\^160`1.6,&8,
+ 4\^155~zf`-1.2,O,55,//O^180`1,&2~zb,
+ 3=dr,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me,
+ @(3^-60,9^60)*/H
+ )
+endfont;
+%***********************************************************************
bye