summaryrefslogtreecommitdiff
path: root/graphics/mcf2graph/mcf_man_soc.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2021-07-19 03:01:01 +0000
committerNorbert Preining <norbert@preining.info>2021-07-19 03:01:01 +0000
commit38358cf733cc4815df695ae9c5539f8d7deba8e8 (patch)
treea86407ed7930e2c2e120facd12870f78a5922507 /graphics/mcf2graph/mcf_man_soc.mf
parentba3d555da29f2da7ca04bf225218e22c8d12d7f8 (diff)
CTAN sync 202107190301
Diffstat (limited to 'graphics/mcf2graph/mcf_man_soc.mf')
-rw-r--r--graphics/mcf2graph/mcf_man_soc.mf158
1 files changed, 76 insertions, 82 deletions
diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf
index 75591a8fe3..1561ec3b64 100644
--- a/graphics/mcf2graph/mcf_man_soc.mf
+++ b/graphics/mcf2graph/mcf_man_soc.mf
@@ -1,9 +1,9 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.06.28
+% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.07.18
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-input mcf2graph.mf; %% it must be version 4.68
+input mcf2graph.mf; %% it must be version 4.69
% ** use data base file 'mcf_data_base.mcf'
-message "mcf_man_soc 2021.06.28"; message "";
+message "mcf_man_soc 2021.07.18"; message "";
%------------------------------------------------------------------------
sw_mframe:=0;
sw_expand:=0;
@@ -257,96 +257,95 @@ beginfont("EN:rotate 1")
endfont
%***********************************************************************
beginfont("EN:change bond 1")
- fsize:=(70mm,12mm);
- fmargin:=(2mm,3mm);
+ fsize:=(70mm,10mm);
+ fmargin:=(2mm,2mm);
sw_trimming:=0;
ratio_chain_ring:=1;
MC(<-30,!~dm,!,!~dl,!,!~dr,!~db,!~db,!,!~tm)
add(defaultscale:=0.6; labeloffset:=0;
- label.rt("(dm)",A1+(0,-0.8l));
- label.rt("(dl)",A3+(0,-0.8l));
- label.rt("(dr)",A5+(0,-0.8l));
- label.rt("(db)",A6+(0,-0.3l));
- label.rt("(db)",A7+(0,-0.8l));
- label.rt("(tm)",A9+(0,-0.8l));
+ label.rt("(dm)",A1+(0,-0.7l));
+ label.rt("(dl)",A3+(0,-0.7l));
+ label.rt("(dr)",A5+(0,-0.7l));
+ label.rt("(db)",A6+(0,-0.7l));
+ label.rt("(db)",A7+(0,-0.7l));
+ label.rt("(tm)",A9+(0,-0.7l));
)
endfont
%***********************************************************************
beginfont("EN:change bond 2")
- fsize:=(60mm,12mm);
- fmargin:=(2mm,3mm);
- blength:=9.5mm;
- sw_trimming:=1;
+ fsize:=(70mm,10mm);
+ fmargin:=(2mm,2mm);
+ sw_trimming:=0;
ratio_chain_ring:=1;
- MC(<-30,!~wf,!,!~wb,!,!~zf,!,!~zb)
+ MC(<-30,!~wf,!,!~wb,!,!~zf,!,!~zb,!,!~vf,!,!~vb)
add(defaultscale:=0.6; labeloffset:=0;
label.rt("(wf)",A1+(0,-0.7l));
label.rt("(wb)",A3+(0,-0.7l));
label.rt("(zf)",A5+(0,-0.7l));
label.rt("(zb)",A7+(0,-0.7l));
+ label.rt("(vf)",A9+(0,-0.7l));
+ label.rt("(vb)",A11+(0,-0.7l));
)
endfont
%***********************************************************************
beginfont("EN:change bond 3")
- fsize:=(70mm,12mm);
- fmargin:=(2mm,3mm);
- blength:=10mm;
- sw_trimming:=1;
- ratio_chain_ring:=1;
- MC(<-30,!~vf,!,!~vb)
- add(defaultscale:=0.6; labeloffset:=0;
- label.rt("(vf)",A1+(0,-0.7l));
- label.rt("(vb)",A3+(0,-0.7l));
- )
-endfont
-%***********************************************************************
-beginfont("EN:change bond 3")
- fsize:=(70mm,12mm);
- fmargin:=(2mm,3mm);
+ fsize:=(70mm,10mm);
+ fmargin:=(2mm,2mm);
blength:=9mm;
sw_trimming:=1;
ratio_chain_ring:=1;
MC(<-30,!7,1=dt,3=wv,5=bd,7=bz)
add(defaultscale:=0.6; labeloffset:=0;
- label.rt("(dt)",A1+(0,-0.7l));
- label.rt("(wv)",A3+(0,-0.7l));
- label.rt("(bd)",A5+(0,-0.7l));
- label.rt("(bz)",A7+(0,-0.7l));
+ label.rt("(dt)",A1+(0,-0.6l));
+ label.rt("(wv)",A3+(0,-0.6l));
+ label.rt("(bd)",A5+(0,-0.6l));
+ label.rt("(bz)",A7+(0,-0.6l));
)
endfont
%***********************************************************************
-beginfont("EN:change bond 4")
- fsize:=(60mm,12mm);
- fmargin:=(2mm,3mm);
- blength:=9mm;
- sw_trimming:=1;
- ratio_chain_ring:=1;
- MC(<30,!7,{2,4,6}=dr)
-endfont
-%***********************************************************************
beginfont("EN:over line")
sw_trimming:=1;
- fsize:=(80mm,20mm);
+ fsize:=(75mm,20mm);
ratio_chain_ring:=1;
- MC(<30,!18,!,60,90`17,
+ MC(<30,!18,$90`1.5,90`15.5,
{2~si_,4~wf_,6~wb_,8~zf_,10~zb_,
12~bd_,14~dl_,16~dr_,18~dm_}:/_`2)
endfont
%***********************************************************************
+beginfont("EN:Steric ring")
+ fsize:=(75mm,16mm);
+ MCat(0.05,0.5)(#1.25,-30~wf_r,30~bd_r`1,30~wb_r,120,O,30,&1,##,
+ {1^$-90,2^$90,3^$-90,4^$90}:/OH`-.5,6^$90:/!OH`-.5)
+ defaultscale:=0.6;
+ MCat(0.5,0.7)(0~wf_r) add(label.lft("wf_r:",A1);)
+ MCat(0.5,0.2)(0~wf) add(label.lft("wf:",A1);)
+ MCat(0.75,0.7)(0~bd_r) add(label.lft("bd_r:",A1);)
+ MCat(0.75,0.2)(0~bd) add(label.lft("bd:",A1);)
+ MCat(1,0.7)(0~wb_r) add(label.lft("wb_r:",A1);)
+ MCat(1,0.2)(0~wb) add(label.lft("wb:",A1);)
+endfont
+%***********************************************************************
+beginfont("EN:change multi bond")
+ fsize:=(40mm,8mm);
+ fmargin:=(2mm,3mm);
+ ratio_chain_ring:=1;
+ MC(<30,!7,{2,4,6}=dr)
+endfont
+%***********************************************************************
beginfont("EN:change bond length1")
- fsize:=(75mm,10mm);
+ fsize:=(55mm,8mm);
sw_numbering:=Bond;
MC(<-30,!2,!4`1.2,!2)
endfont
%***********************************************************************
beginfont("EN:change bond length2")
- fsize:=(75mm,10mm);
+ fsize:=(55mm,8mm);
sw_numbering:=Bond;
MC(<-30,!2,#1.2,!4,##,!2)
endfont
%***********************************************************************
beginfont("EN:change ring length")
- fsize:=(60mm,20mm);
+ fsize:=(60mm,16mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
sw_numbering:=Bond;
@@ -355,7 +354,7 @@ endfont
%***********************************************************************
beginfont("EN:Insert atom")
sw_trimming:=1;
- fsize:=(70mm,12mm);
+ fsize:=(50mm,7mm);
MC(<-30,!2,O,!2,N,!2)
endfont
%***********************************************************************
@@ -368,7 +367,7 @@ beginfont("EN:change atom")
endfont
%***********************************************************************
beginfont("EN:change atom brock address 1")
- fsize:=(70mm,15mm);
+ fsize:=(70mm,14mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,|,?6,2:O)
sw_numbering:=Atom;
@@ -377,7 +376,7 @@ beginfont("EN:change atom brock address 1")
endfont
%***********************************************************************
beginfont("EN:change atom brock address 2")
- fsize:=(70mm,15mm);
+ fsize:=(70mm,14mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,|,?6,||,2:N)
sw_numbering:=Atom;
@@ -386,7 +385,7 @@ beginfont("EN:change atom brock address 2")
endfont
%***********************************************************************
beginfont("EN:change atom absolute address")
- fsize:=(70mm,15mm);
+ fsize:=(70mm,14mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,?6,$2:N)
sw_numbering:=Atom;
@@ -395,7 +394,7 @@ beginfont("EN:change atom absolute address")
endfont
%***********************************************************************
beginfont("EN:change atom relative adress")
- fsize:=(70mm,15mm);
+ fsize:=(70mm,14mm);
fmargin:=(3mm,1.5mm);
MCat(0,.5)(?6,@4,\,?6,-2:N)
sw_numbering:=Atom+Inverse;
@@ -414,7 +413,7 @@ beginfont("EN:fused ring")
fmargin:=(2mm,1.5mm);
sw_trimming:=1;
sw_numbering:=Bond;
- MC(<30,?6,3=?6,3=dt,{7--11}=bd)
+ MC(<30,?6,3=?6,3=dt,{7--11}=bd_r)
endfont
%-----------------------------------------------------------------------
beginfont("EN:change ring length")
@@ -423,7 +422,7 @@ beginfont("EN:change ring length")
sw_trimming:=1;
sw_numbering:=Bond;
MC(?6,@4,\,?6`1.2,5=?6,11=?6,
- {14--23}=bd,{5,11}=dt)
+ {14--23}=bd_r,{5,11}=dt)
endfont
%-----------------------------------------------------------------------
beginfont("EN:fused large 6 ring")
@@ -432,7 +431,7 @@ beginfont("EN:fused large 6 ring")
margin_top_bottom:=1.5mm;
sw_numbering:=Bond;
sw_trimming:=1;
- MC(<30,?6,3=?6[13],3=dt,{7--11}=bd)
+ MC(<30,?6,3=?6[13],3=dt,{7--11}=bd_r)
endfont
%-----------------------------------------------------------------------
beginfont("EN:fuse multi ring")
@@ -448,13 +447,13 @@ beginfont("EN:fused ring 2")
fmargin:=(2mm,2mm);
sw_numbering:=Bond;
msize:=(1,.9);
- MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12--15}=bd)
+ MCat( 0,.5)(<30,?6,3=?6,(11,4)=?6[4],{11,4}=dt,{12--15}=bd_r)
add(defaultscale:=0.4; label("(1)",p0);)
msize:=(1,.9);
- MCat(.5,.5)(<30,?6,3=?6,(11,4)=?5[3],{11,4}=dt,{12--14}=bd)
+ MCat(.5,.5)(<30,?6,3=?6,(11,4)=?5[3],{11,4}=dt,{12--14}=bd_r)
add(defaultscale:=0.4; label("(2)",p0);)
msize:=(1,.9);
- MCat( 1,.5)(<30,?6,3=?6,(11,4)=?4[2],{11,4}=dt,{12,13}=bd)
+ MCat( 1,.5)(<30,?6,3=?6,(11,4)=?4[2],{11,4}=dt,{12,13}=bd_r)
add(defaultscale:=0.4; label("(3)",p0);)
endfont
%***********************************************************************
@@ -462,24 +461,22 @@ beginfont("EN:fused ring 3")
fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
sw_numbering:=Bond;
- MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17--19}=bd)
+ MCat(0,1)(?6,{3,10}=?6,(16,4)=?6[3],{16,4}=dt,{17--19}=bd_r)
add(defaultscale:=0.4; label("(1)",p0);)
- MCat(1,0)(?6,{3,10}=?6,(16,4)=?5[2],{16,4}=dt,{17,18}=bd)
+ MCat(1,0)(?6,{3,10}=?6,(16,4)=?5[2],{16,4}=dt,{17,18}=bd_r)
add(defaultscale:=0.4; label("(2)",p0);)
endfont
%***********************************************************************
beginfont("EN:fused ring 4")
- fsize:=(60mm,22mm);
+ fsize:=(60mm,20mm);
fmargin:=(2mm,2mm);
sw_trimming:=1;
sw_numbering:=Bond;
- MC(<-30,?6,{3,10,15}=?6,(21,4)=?6[2],{21,4}=dt,{22,23}=bd)
+ MC(<-30,?6,{3,10,15}=?6,(21,4)=?6[2],{21,4}=dt,{22,23}=bd_r)
endfont
%***********************************************************************
beginfont("EN:Spiro ring ")
- sw_trimming:=1;
- fsize:=(60mm,18mm);
- fmargin:=(2mm,3mm);
+ fsize:=(40mm,15mm);
sw_numbering:=Atom;
numbering_end:=7;
ratio_chain_ring:=1;
@@ -487,14 +484,12 @@ beginfont("EN:Spiro ring ")
endfont
%***********************************************************************
beginfont("EN:group 1")
- fsize:=(60mm,25mm);
- sw_trimming:=1;
- MC(<-30,!,/_,!,/!,!3,/!2,!,/iPr,!3,/tBu,!,/Ph^-30,!)
+ fsize:=(75mm,18mm);
+ MC(<30,!,/_,!2,/!,!2,/!2,!4,/?!,!4,/??!,!2,/'(Ph`0.8)^-60,!)
endfont
%***********************************************************************
beginfont("EN:group 2")
- fsize:=(80mm,15mm);
- sw_trimming:=1;
+ fsize:=(70mm,14mm);
MC(<30,!`1,//O,!2`1,*/H,!2`1,/*H,!2`1,*/*H,!2`1,**?3,!`1)
add(defaultscale:=0.75;
label("//",A2-(0,0.45l));
@@ -506,18 +501,17 @@ beginfont("EN:group 2")
endfont
%***********************************************************************
beginfont("EN:group 3")
- fsize:=(60mm,18mm);
+ fsize:=(60mm,16mm);
sw_trimming:=1;
MC(<-30,#1,!2,/_`2^30,!2,/!2>lr,!2,/!2>rl,!)
endfont
%***********************************************************************
beginfont("EN:group 3")
- fsize:=(80mm,18mm);
+ fsize:=(75mm,18mm);
fmargin:=(2mm,2mm);
sw_numbering:=Atom;
- sw_trimming:=1;
numbering_end:=17;
- MC(<30,!16,2:/_,4:/!,6:/!2,10:/iPr,14:/tBu,16:/Ph^-60)
+ MC(<30,!16,2:/_,4:/!,6:/!2,10:/iPr,14:/tBu,16:/'(Ph`0.8)^-60)
endfont
%***********************************************************************
beginfont("EN:group 4")
@@ -529,14 +523,14 @@ beginfont("EN:group 4")
endfont
%***********************************************************************
beginfont("EN:group 5")
- fsize:=(60mm,18mm);
+ fsize:=(60mm,16mm);
sw_trimming:=1;
sw_numbering:=Atom; numbering_end:=8;
MC(<-30,!7`1,3:/_`2^30,5:/!2>lr,7:/!2>rl)
endfont
%***********************************************************************
beginfont("EN:chain strech direction mode 1")
- fsize:=(50mm,35mm);
+ fsize:=(50mm,25mm);
sw_trimming:=1;
ratio_chain_ring:=1;
MC(
@@ -546,7 +540,7 @@ beginfont("EN:chain strech direction mode 1")
endfont
%***********************************************************************
beginfont("EN:chain strech direction mode 2")
- fsize:=(60mm,23mm);
+ fsize:=(60mm,20mm);
sw_trimming:=1;
ratio_chain_ring:=1;
MC(
@@ -562,7 +556,7 @@ beginfont("EN:chain strech direction mode 3")
endfont
%***********************************************************************
beginfont("EN:chain strech direction mode 4")
- fsize:=(60mm,22mm);
+ fsize:=(60mm,20mm);
sw_trimming:=1;
MC(<30,!6,6>'(90,-90,90,-90,90):/!5)
endfont
@@ -574,7 +568,7 @@ beginfont("EN:change atom and group")
endfont
%***********************************************************************
beginfont("EN:methyl*2,isopropyl,tert-butyl")
- fsize:=(60mm,15mm);
+ fsize:=(60mm,12mm);
sw_trimming:=1;
MC(<30,!9`1,?!,!,??,!,2:??,4:/?!,6:/??!,8:/N?!)
endfont
@@ -612,7 +606,7 @@ beginfont("EN:Serial number")
fsize:=(75mm,14mm);
max_blength:=8mm;
sw_numbering:=Atom; numbering_end:=15;
- MC(<30,!14,{2,6--10,14}:/_~bd`0.5)
+ MC(<30,!14,{2,6--10,14}:/_~bd_r`0.5)
endfont
%***********************************************************************
beginfont("EN:Change color")