summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf')
-rw-r--r--Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf36
1 files changed, 19 insertions, 17 deletions
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 106785ec022..8487a05ac79 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_exa_soc.mf
@@ -13,12 +13,12 @@ sw_atom_frame:=0;
sw_numberB:=0;
sw_expand:=0;
sw_start_vector:=0;
+%%%%sw_info_formula:=1;
+%%%%sw_info_weight:=1;
%%%%sw_checklist:=1;
-%%%%sw_info_fm:=1;
-%%%%sw_info_mw:=1;
%%%%sw_MOLfile:=1;
%**********************************************************************
-beginfont("EN:Acetamiprid")
+beginfont("EN:Acetamiprid","FM:C5H9","MW:89")
MCf(^^30,
Ph,4\,!,NH,!,!~dr,N,!,CN
)
@@ -94,7 +94,7 @@ endfont
%***********************************************************************
beginfont("EN:Etridiazole")
MCf(^^18,
- ?5,$(1,3)dl,@(2,4)N,5:S,1:/OEt,3:/CCl3,1:/Me
+ ?5,$(1,3)dl,@(2,4)N,5:S,1:/OEt,3:/CCl3
)
endfont
%***********************************************************************
@@ -321,12 +321,13 @@ MCf(^^54,
)
endfont
%**********************************************************************
-beginfont("EN:Gibberellin");
+beginfont("EN:Gibberellin A3");
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)
+ 4\^155~zf`-1.2,O,55,//O^180`1,&2~zb,
+ 5=dl,11=wf,13=wb,7:/COOH,11://Me,1:*/OH,12:/*OH,2:*/Me,
+ @(3^-60,9^60)*/H
+ )
endfont;
%**********************************************************************
beginfont("EN:Cholesterol")
@@ -354,9 +355,9 @@ endfont
%***********************************************************************
beginfont("EN:beta-Carotene")
MCf(^^30,
- ?6,3=d,@(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=d,@(6,2^35,2^-35)/Me
+ ?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
%**********************************************************************
@@ -374,11 +375,12 @@ beginfont("EN:Qercetin")
endfont
%***********************************************************************
beginfont("EN:Limonin")
-MCf(^^30,
- {,?6,-3=?6,-4=?6,3:O,-5=?3,1:O,1=wf,2=wb,#6=?5,2:O,-4=?6,2:O,-5=wf,
- #14\*,?5,$(1,4)dl,3:O,},@(3,12,21)//O,
- @(4~wf^60,8~zf^60,18^35,18^-35)/Me,@(1^60,5^180,16^60)/*H
-)
+ 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
%**********************************************************************
beginfont("EN:Cromolyn")
@@ -442,7 +444,7 @@ endfont
%***********************************************************************
beginfont("EN:Podophyllotoxin");
MCf(^^0,
- {,?5,@(2,5)O,-3=Ph2,-3=Ph1,-3=?5,2:O,},-1=wb,-3://O,
+ ?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
)
endfont;