diff options
author | Norbert Preining <norbert@preining.info> | 2022-02-21 03:01:01 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2022-02-21 03:01:01 +0000 |
commit | a9409c96664c73e4fd0586f358845df19b1afd62 (patch) | |
tree | 21f96cdf0ef94f104e43ce589bd0837cd898ce0d /graphics/mcf2graph/mcf_mplib_exa.tex | |
parent | b7690ea2dcb14cafb49e6231940993e677bfc217 (diff) |
CTAN sync 202202210301
Diffstat (limited to 'graphics/mcf2graph/mcf_mplib_exa.tex')
-rw-r--r-- | graphics/mcf2graph/mcf_mplib_exa.tex | 57 |
1 files changed, 26 insertions, 31 deletions
diff --git a/graphics/mcf2graph/mcf_mplib_exa.tex b/graphics/mcf2graph/mcf_mplib_exa.tex index 8033148e4c..998d7378b4 100644 --- a/graphics/mcf2graph/mcf_mplib_exa.tex +++ b/graphics/mcf2graph/mcf_mplib_exa.tex @@ -1,7 +1,7 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2022.01.22 +% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2022.02.20 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% ** mcf2graph.mp must be version 4.79 +% ** mcf2graph.mp must be version 4.80 % ** use mcf_data_base.mcf \documentclass{article} %------------------------------------------------------------------------------ @@ -50,35 +50,26 @@ \begin{verbatim} beginfigm("EN:Erythromycin","MW:733.93") fsize:=(120mm,30mm); - MC( - <30,#1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,##,&1, - 14:O,13:/*Et,{1,9}://O,{2',4,6^-35,8,10',12^35}:/*_, - {6^35,11,12^-35}:*/OH, - @$3,\*,O,30~zb,|,?6`.7,6:O,#.5,{5~wf,3^35}:/_,4:/*OH,3^-35:/*O!,##, - @$5,\*^30`1.7,O,!~zb,|,?6`.7,6:O,#.5,5:/*_,2:*/OH,3:/*N?! - ) - ext(defaultscale:=0.8; - label.lrt("fm: "&cal_FM,(0,h-5mm)); - label.lrt("mw: "&cal_MW,(0,h-9mm)); - label.lrt("MW: "&inf_MW,(0,h-13mm));) + MC(<30,#1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,##,&1, + 14:O,13:/*Et,{1,9}://O,{2',4,6^-35,8,10',12^35}:/*_, + {6^35,11,12^-35}:*/OH, + @$3,\*,O,30~zb,|,?6`.7,6:O,#.5,{5~wf,3^35}:/_,4:/*OH,3^-35:/*O!,##, + @$5,\*^30`1.7,O,!~zb,|,?6`.7,6:O,#.5,5:/*_,2:*/OH,3:/*N?!) + ext(defaultscale:=0.8; label.lrt("fm: "&cal_FM,(0,h-5mm)); + label.lrt("mw: "&cal_MW,(0,h-9mm)); label.lrt("MW: "&inf_MW,(0,h-13mm));) endfigm; \end{verbatim} %---------------------------------------------------------------------------- \begin{mplibcode} beginfigm("EN:Erythromycin","MW:733.93") fsize:=(120mm,30mm); - MC( - <30,#1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,##,&1, - 14:O,13:/*Et,{1,9}://O,{2',4,6^-35,8,10',12^35}:/*_, - {6^35,11,12^-35}:*/OH, - @$3,\*,O,30~zb,|,?6`.7,6:O,#.5,{5~wf,3^35}:/_,4:/*OH,3^-35:/*O!,##, - @$5,\*^30`1.7,O,!~zb,|,?6`.7,6:O,#.5,5:/*_,2:*/OH,3:/*N?! - ) - ext(defaultscale:=0.8; - label.lrt("fm: "&cal_FM,(0,h-5mm)); - label.lrt("mw: "&cal_MW,(0,h-9mm)); - label.lrt("MW: "&inf_MW,(0,h-13mm)); - ) + MC(<30,#1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,##,&1, + 14:O,13:/*Et,{1,9}://O,{2',4,6^-35,8,10',12^35}:/*_, + {6^35,11,12^-35}:*/OH, + @$3,\*,O,30~zb,|,?6`.7,6:O,#.5,{5~wf,3^35}:/_,4:/*OH,3^-35:/*O!,##, + @$5,\*^30`1.7,O,!~zb,|,?6`.7,6:O,#.5,5:/*_,2:*/OH,3:/*N?!) + ext(defaultscale:=0.8; label.lrt("fm: "&cal_FM,(0,h-5mm)); + label.lrt("mw: "&cal_MW,(0,h-9mm)); label.lrt("MW: "&inf_MW,(0,h-13mm));) endfigm; \end{mplibcode} %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% @@ -93,9 +84,11 @@ beginfigm("EN:Paclitaxel","MW:853.918", ": @1,\,O,!,//O,!,*/OH,!,/Ph,60~wf,NH,-60,//O,60,Ph, ", ": @7,\*,O,-45,//O,60,Ph,11:*/OCO!>rl,12:/*OCO!^-15>lr ") %--------------------------------------------------------------------- - fsize:=(140mm,30mm); if check(mc)=0: MCat(0,0.5)(scantokens(mc)) fi - sw_numbering:=Atom; if check(mc)=0: MCat(0.6,0.5)(scantokens(mc)) fi - sw_numbering:=Bond; if check(mc)=0: MCat(1,0.5)(scantokens(mc)) fi + fsize:=(140mm,30mm); + if check(mc)=0: MCat(0,0.5)(scantokens(mc)) + sw_numbering:=Atom; MCat(0.6,0.5)(scantokens(mc)) + sw_numbering:=Bond; MCat(1,0.5)(scantokens(mc)) + fi endfigm \end{verbatim} %---------------------------------------------------------------------------- @@ -107,9 +100,11 @@ beginfigm("EN:Paclitaxel","MW:853.918", ": @1,\,O,!,//O,!,*/OH,!,/Ph,60~wf,NH,-60,//O,60,Ph, ", ": @7,\*,O,-45,//O,60,Ph,11:*/OCO!>rl,12:/*OCO!^-15>lr ") %--------------------------------------------------------------------- - fsize:=(140mm,30mm); if check(mc)=0: MCat(0,0.5)(scantokens(mc)) fi - sw_numbering:=Atom; if check(mc)=0: MCat(0.6,0.5)(scantokens(mc)) fi - sw_numbering:=Bond; if check(mc)=0: MCat(1,0.5)(scantokens(mc)) fi + fsize:=(140mm,30mm); + if check(mc)=0: MCat(0,0.5)(scantokens(mc)) + sw_numbering:=Atom; MCat(0.6,0.5)(scantokens(mc)) + sw_numbering:=Bond; MCat(1,0.5)(scantokens(mc)) + fi endfigm \end{mplibcode} %---------------------------------------------------------------------------- |