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.mf98
1 files changed, 36 insertions, 62 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 d0ba778edc9..f9bc1784425 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
@@ -4,7 +4,7 @@
input mcf2graph.mf;
%------------------------------------------------------------------------
font_wd#:=60mm#;% font width
-font_ht#:=35mm#;% font height
+font_ht#:=40mm#;% font height
max_bond_width:=0.18;
%------------------------------------------------------------------------
sw_auxout:=0;
@@ -26,49 +26,32 @@ beginfont("NO:1","EN:Chlorophyll a","MW:893.49","FM:C55H72MgN4O5")
)
endfont
%***********************************************************************
-beginfont("EN:Chain")
+beginfont("EN:Chain 1")
sw_numberB:=1;
max_bond_width:=0.20;
ratio_chain_ring:=1;
- sw_start_vector:=1;
- MCf(<30,-60,60,-60,60,-60,60)
+ MCf(<30,-60,60,-90,120,-90,60)
endfont
%***********************************************************************
-beginfont("EN:Chain")
+beginfont("EN:Chain 2")
sw_numberB:=1;
max_bond_width:=0.20;
ratio_chain_ring:=1;
- sw_start_vector:=1;
- MCf(<30,!,!,!,!,!,!)
-endfont
-%***********************************************************************
-beginfont("EN:Chain")
- sw_numberB:=1;
- max_bond_width:=0.20;
- ratio_chain_ring:=1;
- sw_start_vector:=1;
MCf(<30,!6)
endfont
%***********************************************************************
-beginfont("EN:Jump")
- sw_numberA:=1;
- max_bond_width:=0.20;
- ratio_chain_ring:=1;
- MCf(<30,!6,3*,0,!)
-endfont
-%***********************************************************************
-beginfont("EN:Branch")
+beginfont("EN:Jump and Branch")
sw_numberA:=1;
max_bond_width:=0.20;
ratio_chain_ring:=1;
MCf(<30,!6,3\,!)
endfont
%***********************************************************************
-beginfont("EN:Connect bond")
+beginfont("EN:Connect atom")
sw_numberA:=1;
max_bond_width:=0.20;
ratio_chain_ring:=1;
- MCf(<30,!6,3\,-60,&5)
+ MCf(<30,!6,3\,!,&5)
endfont
%***********************************************************************
beginfont("EN:ring")
@@ -126,33 +109,27 @@ beginfont("EN:change atom 2")
endfont
%***********************************************************************
beginfont("EN:change atom 3")
- MCd(.5,.5)(.5,.9)(?6,4\,?6,2:N)
+ MCd(.7,1)(.5,1)(?6,4\,?6,2:N)
sw_numberA:=1;
- MCd(.5,.5)(.5,.1)(?6,4\,?6)
+ MCd(.7,1)(.5,0)(?6,4\,?6)
endfont
%***********************************************************************
-beginfont("EN:change atom 4")
- MCd(.5,.5)(.5,.9)(?6,4\,|,?6,2:N)
+beginfont("EN:change atom brock address")
+ MCd(.7,1)(.5,1)(?6,4\,|,?6,2:O,||,2:N)
sw_numberA:=1;
- MCd(.5,.5)(.5,.1)(?6,4\,?6)
+ MCd(.7,.5)(.5,0)(?6,4\,?6)
endfont
%***********************************************************************
-beginfont("EN:change atom 4")
- MCd(.5,.5)(.5,.9)(?6,4\,|,?6,||,2:N)
+beginfont("EN:change atom absolute address")
+ MCd(.7,1)(.5,1)(?6,4\,?6,#2:N)
sw_numberA:=1;
- MCd(.5,.5)(.5,.1)(?6,4\,?6)
+ MCd(.7,1)(.5,0)(?6,4\,?6)
endfont
%***********************************************************************
-beginfont("EN:change atom 5")
- MCd(.5,.5)(.5,.9)(?6,4\,?6,#2:N)
- sw_numberA:=1;
- MCd(.5,.5)(.5,.1)(?6,4\,?6)
-endfont
-%***********************************************************************
-beginfont("EN:change atom 6")
- MCd(.5,.5)(.5,.9)(?6,4\,?6,-2:N)
+beginfont("EN:change atom relative adress")
+ MCd(.7,1)(.5,1)(?6,4\,?6,-2:N)
sw_numberA:=3;
- MCd(.5,.5)(.5,.1)(?6,4\,?6)
+ MCd(.7,1)(.5,0)(?6,4\,?6)
endfont
%***********************************************************************
beginfont("EN:fused ring 1")
@@ -169,16 +146,16 @@ endfont
%***********************************************************************
beginfont("EN:fused ring 2")
sw_numberB:=1;
- MCd(1,.7)( 0,0)(<30,?6,3=?6,(11,4)=?6[4],$(11,4)dt,$(12,13,14,15)bd)
- MCd(1,.6)(.54,1)(<30,?6,3=?6,(11,4)=?5[3],$(11,4)dt,$(12,13,14)bd)
- MCd(1,.6)(1, 0)(<30,?6,3=?6,(11,4)=?4[2],$(11,4)dt,$(12,13)bd)
+ MCd(1,.62)( 0,0)(<30,?6,3=?6,(11,4)=?6[4],$(11,4)dt,$(12,13,14,15)bd)
+ MCd(1,.52)(.54,1)(<30,?6,3=?6,(11,4)=?5[3],$(11,4)dt,$(12,13,14)bd)
+ MCd(1,.52)(1, 0)(<30,?6,3=?6,(11,4)=?4[2],$(11,4)dt,$(12,13)bd)
endfont
%***********************************************************************
beginfont("EN:fused ring 3")
sw_numberB:=1;
- MCd(1,.55)(0,0)(?6,$(3,10)?6,(16,4)=?6[3],$(16,4)dt,$(17,18,19)bd)
- MCd(1,.55)(.5,1)(?6,$(3,10)?6,(16,4)=?5[2],$(16,4)dt,$(17,18)bd)
- MCd(1,.68)(1,0)(?6,$(3,10,15)?6,(21,4)=?6[2],$(21,4)dt,$(22,23)bd)
+ MCd(1,.55)(0 ,0)(?6,$(3,10)?6,(16,4)=?6[3],$(16,4)dt,$(17,18,19)bd)
+ MCd(1,.5)(.5,1)(?6,$(3,10)?6,(16,4)=?5[2],$(16,4)dt,$(17,18)bd)
+ MCd(1,.60)(1 ,0)(?6,$(3,10,15)?6,(21,4)=?6[2],$(21,4)dt,$(22,23)bd)
endfont
%***********************************************************************
beginfont("EN:Spiro ring ")
@@ -416,11 +393,11 @@ endfont
beginfont("EN:margin_top_bottom")
sw_font_frame:=sw_mol_frame:=1;
margin_top_bottom:=0mm;
- MCd(1,1)(0.1, .5)(<30,Ph,2:/OH,5:/NH2)
+ MCd(1,1)(0.0, .5)(<30,Ph,2:/OH,5:/NH2)
margin_top_bottom:=0.4mm;
MCd(1,1)(0.5, .5)(<30,Ph,2:/OH,5:/NH2)
margin_top_bottom:=5mm;
- MCd(1,1)(0.9, .5)(<30,Ph,2:/OH,5:/NH2)
+ MCd(1,1)(1.0, .5)(<30,Ph,2:/OH,5:/NH2)
endfont
%***********************************************************************
beginfont("EN:Switwch numberingA")
@@ -440,15 +417,15 @@ beginfont("EN:Switwch numberingB")
endfont
%***********************************************************************
beginfont("EN:Switwch substituent off")
- MCd(1,.6)( 0, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 0, .5)(<30,Ph,4:/Cl,3:/F)
sw_subst_off:=1;
- MCd(1,.6)( 1, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 1, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
beginfont("EN:Switwch bondtype off")
- MCd(1,.6)( 0, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 0, .5)(<30,Ph,4:/Cl,3:/F)
sw_bond_single:=1;
- MCd(1,.6)( 1, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 1, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
beginfont("EN:Switwch start vector")
@@ -462,9 +439,9 @@ beginfont("EN:Switwch font frame")
endfont
%***********************************************************************
beginfont("EN:Switwch molecular frame")
- MCd(1,.6)( 0, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 0, .5)(<30,Ph,4:/Cl,3:/F)
sw_mol_frame:=1;
- MCd(1,.6)( 1, .5)(<30,Ph,4:/Cl,3:/F)
+ MCd(1,.5)( 1, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
beginfont("EN:Switwch atom frame")
@@ -474,14 +451,15 @@ endfont
%***********************************************************************
beginfont("EN:Switwch Solid ratio")
MCd(1,.7)( 0, .5)(<30,Ph,4:/Cl,3:/F)
- sw_solid:=1; ratio_bond_width:=0.08;
+ sw_solid:=1;
+ ratio_bond_width:=0.08;
MCd(1,.7)( 1, .5)(<30,Ph,4:/Cl,3:/F)
endfont
%***********************************************************************
beginfont("EN:Switwch Expand")
- MCd(1,.6)(0, .5)(<30,Ph,4:/COOH,3:/NH2)
+ MCd(.5,.5)(0, .5)(<30,Ph,4:/COOH,3:/NH2)
sw_expand:=1;
- MCd(1,.6)(1, .5)(<30,Ph,4:/COOH,3:/NH2)
+ MCd(.6,.6)(1, .5)(<30,Ph,4:/COOH,3:/NH2)
endfont
%***********************************************************************
beginfont("EN:MCd()")
@@ -567,10 +545,6 @@ beginfont("EN:Gibberellin A3");
@(3^-60,9^60)*/H
)
endfont
-%**************************************************************************
-beginfont("EN:Capsaicin")
- MCf(<30,Ph,1:/OH,6:/OMe,4\,!,NH,!,//O,|,!8,-3=dr,-1:/Me)
-endfont
%***************************************************************************
beginfont("EN:Quinine")
MCf(<30,Ph,3=Ph,7:N,6:/OMe,