diff options
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.mf | 53 |
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 |