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.mf85
1 files changed, 43 insertions, 42 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 02a6dfc3e91..a974662e9e7 100644
--- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
+++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_man_soc.mf
@@ -18,7 +18,7 @@ beginfont("EN:Glycine")
endfont
%***********************************************************************
beginfont("EN:Alanine")
- MCf(<30,NH2,!0,/Me,!,COOH)
+ MCf(<30,NH2,!0,/_,!,COOH)
endfont
%***********************************************************************
beginfont("EN:Valine")
@@ -26,23 +26,23 @@ beginfont("EN:Valine")
endfont
%***********************************************************************
beginfont("EN:Leucine")
- MCf(<30,NH2,!0,!,COOH,2\,!,/Me,!)
+ MCf(<30,NH2,!0,!,COOH,2\,!,/_,!)
endfont
%***********************************************************************
beginfont("EN:Isoleucine")
- MCf(<30,NH2,!0,!,COOH,2\,/Me,!2)
+ MCf(<30,NH2,!0,!,COOH,2\,/_,!2)
endfont
%***********************************************************************
beginfont("EN:Serine")
- MCf(<30,NH2,!0,!,COOH,2\,!,OH)
+ MCf(<30,NH2,!0,!,COOH,2:/!OH)
endfont
%***********************************************************************
beginfont("EN:Threonine")
- MCf(<30,NH2,!0,!,COOH,2\,/Me,!,OH)
+ MCf(<30,NH2,!0,!,COOH,2\,/_,!,OH)
endfont
%***********************************************************************
beginfont("EN:Cysteine")
- MCf(<30,NH2,!0,!,COOH,2\,!,SH)
+ MCf(<30,NH2,!0,!,COOH,2:/!SH)
endfont
%***********************************************************************
beginfont("EN:Methionine")
@@ -50,7 +50,7 @@ beginfont("EN:Methionine")
endfont
%***********************************************************************
beginfont("EN:Phenylalanine")
- MCf(<30,NH2,!0,!,COOH,2\,!,Ph)
+ MCf(<30,NH2,!0,!,COOH,2:/!Ph)
endfont
%***********************************************************************
beginfont("EN:Tyrosine")
@@ -111,7 +111,7 @@ beginfont("EN:Chain 1")
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MCf(<30,-60,60,-90,120,-90,60,
- @(1^-60,2^60,3^-45,4^30,5^-45,6^60)/Me~dt`.4
+ @(1^-60,2^60,3^-45,4^30,5^-45,6^60)/_~dt`.4
)
endfont
%***********************************************************************
@@ -122,7 +122,7 @@ beginfont("EN:Chain 2")
ratio_chain_ring:=1;
%----------------------------------------------------------------------
MCf(<30,!6,
- @(1^-60,2^60,3^-60,4^60,5^-60,6^60)/Me~dt`.6
+ @(1^-60,2^60,3^-60,4^60,5^-60,6^60)/_~dt`.6
)
endfont
%***********************************************************************
@@ -193,16 +193,17 @@ beginfont("EN:rotate 1")
sw_clip:=1;
sw_numberB:=1;
numberB_end:=5;
- MCf(``1,0,0,<90,0,<-90,0,0,$(1,2,3,4,5)vf,@(3,4^180)/Me~dt`.5)
+ MCf(``1,0,0,<90,0,<-90,0,0,$(1,2,3,4,5)vf,@(3,4^180)/_~dt`.5)
endfont
%***********************************************************************
beginfont("EN:change bond 1")
+ font_wd#:=70mm#;
font_ht#:=12mm#;
bond_len#:=8mm#;
sw_clip:=1;
ratio_chain_ring:=1;
margin_top_bottom:=3mm;
- MCf(<30,!~dm,!,!~dl,!,!~dr,!,!~tm)
+ MCf(<30,!~dm,!,!~dl,!,!~dr,!~db,!~db,!,!~tm)
endfont
%***********************************************************************
beginfont("EN:change bond 2")
@@ -254,7 +255,7 @@ beginfont("EN:over line")
sw_clip:=1;
font_ht#:=20mm#;
ratio_chain_ring:=1;
- MCf(<-30,!8,!,60,90`8,@(2~si_,4~wf_,6~wb_,8~bd_)/Me`2)
+ MCf(<-30,!8,!,60,90`8,@(2~si_,4~wf_,6~wb_,8~bd_)/_`2)
endfont
%***********************************************************************
beginfont("EN:change bond length1")
@@ -392,7 +393,7 @@ endfont
beginfont("EN:substituent 1")
font_ht#:=25mm#;
sw_clip:=1;
- MCf(<30,!,/Me,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!)
+ MCf(<30,!,/_,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!)
endfont
%***********************************************************************
beginfont("EN:substituent 2")
@@ -404,7 +405,7 @@ endfont
beginfont("EN:substituent 3")
font_ht#:=18mm#;
sw_clip:=1;
- MCf(<30,``1,!2,/Me~zf`2^30,!2,*/!2>lr,!2,*/!2>rl,!)
+ MCf(<30,``1,!2,/_~zf`2^30,!2,*/!2>lr,!2,*/!2>rl,!)
endfont
%***********************************************************************
beginfont("EN:substituent 3")
@@ -414,7 +415,7 @@ beginfont("EN:substituent 3")
sw_numberA:=1;
sw_clip:=1;
numberA_end:=17;
- MCf(<-30,!16,2:/Me,4:/Et,6:/Pr,10:/iPr,14:/tBu,16:/Ph^-60)
+ MCf(<-30,!16,2:/_,4:/Et,6:/Pr,10:/iPr,14:/tBu,16:/Ph^-60)
endfont
%***********************************************************************
beginfont("EN:substituent 4")
@@ -422,7 +423,7 @@ beginfont("EN:substituent 4")
sw_clip:=1;
margin_top_bottom:=2mm;
sw_numberA:=1; numberA_end:=7;
- MCf(<-30,!6`1,@(2~wf,4~zf,6^-30)/Me)
+ MCf(<-30,!6`1,@(2~wf,4~zf,6^-30)/_)
endfont
%***********************************************************************
beginfont("EN:substituent 5")
@@ -430,7 +431,7 @@ beginfont("EN:substituent 5")
margin_top_bottom:=2mm;
sw_clip:=1;
sw_numberA:=1; numberA_end:=8;
- MCf(<30,!7`1,@(3)/*Me`2^30,5:*/!2>lr,7:*/!2>rl)
+ MCf(<30,!7`1,@(3)/*_`2^30,5:*/!2>lr,7:*/!2>rl)
endfont
%***********************************************************************
beginfont("EN:chain strech direction mode 1")
@@ -499,7 +500,7 @@ endfont;
beginfont("EN:User definition")
font_ht#:=15mm#;
sw_clip:=1;
- iBuOH:='(!,/Me,!,OH);
+ iBuOH:='(!,/_,!,OH);
MCf(<30,?6,@(4,6)/iBuOH)
endfont
%***********************************************************************
@@ -507,7 +508,7 @@ beginfont("EN:Inline definition")
font_ht#:=15mm#;
margin_left_right:=2mm;
sw_clip:=1;
- MCf(<30,!3,/'(!,/Me,!,OH),!3)
+ MCf(<30,!3,/'(!,/_,!,OH),!3)
endfont
%***********************************************************************
beginfont("EN:Font size")
@@ -516,7 +517,7 @@ beginfont("EN:Font size")
sw_font_frame:=1;
MCf(<30,
?6,-4=?5,$(3,8)dl,@(2,6,7,9)N,
- @(2,6,9)/Me,@(1,5)//O)
+ @(2,6,9)/_,@(1,5)//O)
endfont
%***********************************************************************
beginfont("EN:margin_left_right")
@@ -571,11 +572,11 @@ endfont
%***********************************************************************
beginfont("EN:offset_wedge") offset_wedge#:=0.0pt#;
font_ht#:=14mm#;
- MCd(1,1)(0.08, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(0.08, .5)(<30,?6,5:*/_)
offset_wedge#:=0.4pt#; %<<== default
- MCd(1,1)(.5, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(.5, .5)(<30,?6,5:*/_)
offset_wedge#:=1.0pt#;
- MCd(1,1)(0.92, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(0.92, .5)(<30,?6,5:*/_)
endfont
%***********************************************************************
beginfont("EN:max_bond_length")
@@ -632,11 +633,11 @@ endfont
beginfont("EN:ratio_wedge_bond")
font_ht#:=15mm#;
ratio_wedge_bond:=0.1;
- MCd(1,1)(0.08, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(0.08, .5)(<30,?6,5:*/_)
ratio_wedge_bond:=0.12; %<<== default
- MCd(1,1)(.5, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(.5, .5)(<30,?6,5:*/_)
ratio_wedge_bond:=0.2;;
- MCd(1,1)(0.92, .5)(<30,?6,5:*/Me)
+ MCd(1,1)(0.92, .5)(<30,?6,5:*/_)
endfont
%***********************************************************************
beginfont("EN:ratio_atomgap_atom")
@@ -664,11 +665,11 @@ endfont
beginfont("EN:ratio_zebragap_bond")
font_ht#:=15mm#;
ratio_zebragap_bond:=0.06;
- MCd(1,1)(0.08, .5)(<-30,!2,2:/*Me`1)
+ MCd(1,1)(0.08, .5)(<-30,!2,2:/*_`1)
ratio_zebragap_bond:=0.12; %<<== default
- MCd(1,1)( .5, .5)(<-30,!2,2:/*Me`1)
+ MCd(1,1)( .5, .5)(<-30,!2,2:/*_`1)
ratio_zebragap_bond:=0.20;
- MCd(1,1)(0.92, .5)(<-30,!2,2:/*Me`1)
+ MCd(1,1)(0.92, .5)(<-30,!2,2:/*_`1)
endfont
%***********************************************************************
beginfont("EN:Switwch numberingA")
@@ -881,14 +882,14 @@ beginfont("EN:Caffeine","FM:C8H10N4O2","MW:194.19")
font_ht#:=15mm#;
sw_logout:=sw_info_weight:=sw_info_formula:=1;
MCf(<30,?6,-4=?5,$(3,8)dl,
- @(2,6,7,9)N,@(2,6,9)/Me,@(1,5)//O)
+ @(2,6,7,9)N,@(2,6,9)/_,@(1,5)//O)
endfont
%***********************************************************************
%% Output additional infomation
beginfont("EN:Tocopherol","CAS:59-02-9","FM:C29H50O2","MW:430.71")
font_ht#:=15mm#;
sw_logout:=1;
- MCf(<30,Ph,3=?6,7:O,@(1,2,5)/Me,8:/*Me^60,6:/OH,8\,|,!12,@(4,8)/*Me,12:/Me)
+ MCf(<30,Ph,3=?6,7:O,@(1,2,5)/_,8:/*_^60,6:/OH,8\,|,!12,@(4,8)/*_,12:/_)
endfont
%***********************************************************************
%% Change infomation separater
@@ -896,7 +897,7 @@ beginfont("EN:Ampicillin","CAS:69-53-4","FM:C16H19N3O4S","MW:349.40")
font_ht#:=15mm#;
MCf(<45,
?4,2:N,2=?5,-1:S,
- @(3^45,4^-45)/*H,1://O^15,5:/*COOH^-18,@(6^35,6^-35)/Me,
+ @(3^45,4^-45)/*H,1://O^15,5:/*COOH^-18,@(6^35,6^-35)/_,
4*\^75,NH,!,//O,!,/*NH2,!,Ph
)
endfont
@@ -905,9 +906,9 @@ beginfont("EN:Cholesterol","CAS:57-88-5","FM:C27H46O","MW:386.65")
font_ht#:=15mm#;
MCf(
<30,?6,$(-4,-2)?6,-4=?5,7=dl,
- 1:*/OH,@(4,12)*/Me^60,9:*/H^60,
+ 1:*/OH,@(4,12)*/_^60,9:*/H^60,
10:/*H^180,11:/*H^-60,17:/*H^-54,
- -1\^18,/*Me,-60,!3,/Me,!,
+ -1\^18,/*_,-60,!3,/_,!,
)
endfont
%***********************************************************************
@@ -920,7 +921,7 @@ beginfont("EN:Limonin")
font_ht#:=30mm#;
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,
+ @(4~wf^60,8~zf^60,18^35,18^-35)/_,@(1^60,5^180,16^60)/*H,
14\*,|,?5,$(1,4)dl,3:O)
endfont
%***************************************************************************
@@ -949,30 +950,30 @@ beginfont("EN:Gibberellin A3","CAS:77-06-5","FM:C19H22O6","MW:346.37");
font_ht#:=20mm#;
MCf(<18,?5,3=?7,5=?6[12],8*,160`1.3,&3,13=dl,6=wf,8=wb,
5*,40~zf`1,O,50,//O^180,&14~zb,
- 2:/COOH,7://Me,13:*/OH,8:/*OH,14:*/Me,@(1^60,4^60)*/H)
+ 2:/COOH,7://_,13:*/OH,8:/*OH,14:*/_,@(1^60,4^60)*/H)
endfont
%***************************************************************************
beginfont("EN:Quinine","CAS:130-95-0","FM:C20H24N2O2","MW:324.42")
font_ht#:=25mm#;
MCf(<30,Ph,3=Ph,7:N,6:/O!,
- 10\,*/OH,/H~zf^-60,!,|,?6,2:N,1:*/H^60,4*\,!~dr,2*,165~zf,60,&5~zb)
+ 10\,*/OH,/H~zf^-60,!,|,?6,2:N,1:*/H^60,4*\,!!,2*,165~zf,60,&5~zb)
endfont
%***************************************************************************
beginfont("EN:Atoropin","CAS:51-55-8","FM:C17H23NO3","MW:289.37")
font_ht#:=25mm#;
MCf(<-30,O,!,//O,!,!,Ph,
- #1\~zb^-120,|,?7,6*\^190`1.12,N,/Me,&3~wb,#3\~wv,!,OH)
+ #1\~zb^-120,|,?7,6*\^190`1.12,N,/_,&3~wb,#3\~wv,!,OH)
endfont
%***************************************************************************
beginfont("EN:Rotenone");
font_ht#:=30mm#;
MCf(<-60,?5,$(-3,-2,-3,-4)?6,$(7,9,-2,-4)dl,$(3,17)dr,
- @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/O!,1*\,/Me,!~dl)
+ @(2,13,16)O,10://O,@(11^-60,12^60)*/H,@(-2,-3)/O!,1*\,/_,!!)
endfont;
%***************************************************************************
beginfont("EN:Pyrethrin I");
- MCf(<30,?3,@(3^35~wf,3^-35~zf)/Me,1*\,!~dl,iPr,
- 2\*,//O,!,O,-36~zb,|,?5,-2=d,-1:/Me,-3://O,-2\,!4,$(-1,-3)dl)
+ MCf(<30,?3,@(3^35~wf,3^-35~zf)/_,1*\,!!,iPr,
+ 2\*,//O,!,O,-36~zb,|,?5,-2=d,-1:/_,-3://O,-2\,!4,$(-1,-3)dl)
endfont;
%***************************************************************************
beginfont("EN:Validamycin")
@@ -985,7 +986,7 @@ endfont
beginfont("EN:Paclitaxel","CAS:33069-62-4","FM:C47H51NO14","MW:853.91")
MCf(?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)/Me,@(3^-60,15)*/OH,8:/*H^-60,9:*/Me^60,10://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,
7\*,O,-45,//O,60,Ph,11*\,O,-60,//O,60,12\*^-15,O,60,//O,-60)
endfont