From b49dd7c340dbe68a28c8a976cd6a1429ca8aafff Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 4 Jan 2021 03:00:45 +0000 Subject: CTAN sync 202101040300 --- graphics/circuit_macros/CHANGES | 1 + graphics/circuit_macros/Copying | 2 +- graphics/circuit_macros/README | 2 +- graphics/circuit_macros/darrow.m4 | 2 +- graphics/circuit_macros/doc/Circuit_macros.pdf | Bin 950156 -> 973887 bytes graphics/circuit_macros/doc/Circuit_macros.tex | 10 +- graphics/circuit_macros/doc/Makefile | 4 +- graphics/circuit_macros/doc/Version.tex | 2 +- graphics/circuit_macros/doc/body.tex | 14 +- graphics/circuit_macros/dpictools.pic | 2 +- graphics/circuit_macros/examples/examples.pdf | Bin 876477 -> 876504 bytes graphics/circuit_macros/examples/mf/cct.mf | 2 +- graphics/circuit_macros/examples/nsvg/Makefile | 92 -- .../circuit_macros/examples/nsvg/dev/F_test.tex | 5 - graphics/circuit_macros/examples/nsvg/dev/Makefile | 81 -- .../circuit_macros/examples/nsvg/dev/test-1.svg | 162 --- graphics/circuit_macros/examples/nsvg/dev/test.pdf | Bin 35308 -> 0 bytes graphics/circuit_macros/examples/nsvg/dev/test.pic | 383 ------- graphics/circuit_macros/examples/nsvg/dev/test.svg | 239 ---- graphics/circuit_macros/examples/nsvg/dev/test.tex | 1136 -------------------- .../circuit_macros/examples/nsvg/dev/tikztosvg | 181 ---- .../circuit_macros/examples/nsvg/dev/tstSVG.htmx | 62 -- graphics/circuit_macros/examples/nsvg/examples.pdf | Bin 897744 -> 0 bytes .../circuit_macros/examples/nsvg/examplesSVG.htmx | 70 -- graphics/circuit_macros/examples/oFlow.m4 | 108 -- graphics/circuit_macros/examples/shapes.m4 | 2 +- graphics/circuit_macros/gpic.m4 | 2 +- graphics/circuit_macros/lib3D.m4 | 2 +- graphics/circuit_macros/libcct.m4 | 2 +- graphics/circuit_macros/libgen.m4 | 20 +- graphics/circuit_macros/liblog.m4 | 2 +- graphics/circuit_macros/mfpic.m4 | 2 +- graphics/circuit_macros/mpost.m4 | 2 +- graphics/circuit_macros/pgf.m4 | 2 +- graphics/circuit_macros/postscript.m4 | 2 +- graphics/circuit_macros/psfrag.m4 | 2 +- graphics/circuit_macros/pstricks.m4 | 2 +- graphics/circuit_macros/svg.m4 | 2 +- graphics/circuit_macros/xfig.m4 | 2 +- graphics/mcf2graph/CHANGELOG | 16 +- graphics/mcf2graph/README | 2 +- graphics/mcf2graph/mcf2graph.mf | 141 +-- graphics/mcf2graph/mcf_exa_soc.mf | 628 ++++++++--- graphics/mcf2graph/mcf_example.pdf | Bin 306181 -> 527360 bytes graphics/mcf2graph/mcf_example.tex | 7 - graphics/mcf2graph/mcf_man_soc.mf | 46 +- graphics/mcf2graph/mcf_manual.pdf | Bin 596528 -> 597299 bytes graphics/mcf2graph/mcf_manual.tex | 78 +- graphics/mcf2graph/mcf_mplib_exa.pdf | Bin 201510 -> 201986 bytes graphics/mcf2graph/mcf_mplib_exa.tex | 40 +- 50 files changed, 717 insertions(+), 2847 deletions(-) delete mode 100644 graphics/circuit_macros/examples/nsvg/Makefile delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/F_test.tex delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/Makefile delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/test-1.svg delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/test.pdf delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/test.pic delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/test.svg delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/test.tex delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/tikztosvg delete mode 100644 graphics/circuit_macros/examples/nsvg/dev/tstSVG.htmx delete mode 100644 graphics/circuit_macros/examples/nsvg/examples.pdf delete mode 100644 graphics/circuit_macros/examples/nsvg/examplesSVG.htmx delete mode 100644 graphics/circuit_macros/examples/oFlow.m4 (limited to 'graphics') diff --git a/graphics/circuit_macros/CHANGES b/graphics/circuit_macros/CHANGES index 1f84acc33b..3d78630bf7 100644 --- a/graphics/circuit_macros/CHANGES +++ b/graphics/circuit_macros/CHANGES @@ -1,5 +1,6 @@ CHANGES +Version 9.5: Distribution cleaned and a non utf-8 character removed. Version 9.4: Changes to examples and additional SVG examples. New macros RightAngle, PerpTo, langle, ArcAngle, DCsymbol. Rewritten arrester macro. Tweaked Equidist3, ground, antenna, NeedDpicTools. diff --git a/graphics/circuit_macros/Copying b/graphics/circuit_macros/Copying index 1c8e4d1950..26840bdaef 100644 --- a/graphics/circuit_macros/Copying +++ b/graphics/circuit_macros/Copying @@ -1,4 +1,4 @@ -* Circuit_macros Version 9.4, copyright (c) 2020 J. D. Aplevich under * +* Circuit_macros Version 9.5, copyright (c) 2021 J. D. Aplevich under * * the LaTeX Project Public Licence in file Licence.txt. The files of * * this distribution may be redistributed or modified provided that this * * copyright notice is included and provided that modifications are clearly * diff --git a/graphics/circuit_macros/README b/graphics/circuit_macros/README index 1ae81ea52e..1da33f0aa0 100644 --- a/graphics/circuit_macros/README +++ b/graphics/circuit_macros/README @@ -1,5 +1,5 @@ -* Circuit_macros Version 9.4, copyright (c) 2020 J. D. Aplevich under * +* Circuit_macros Version 9.5, copyright (c) 2021 J. D. Aplevich under * * the LaTeX Project Public Licence in file Licence.txt. The files of * * this distribution may be redistributed or modified provided that this * * copyright notice is included and provided that modifications are clearly * diff --git a/graphics/circuit_macros/darrow.m4 b/graphics/circuit_macros/darrow.m4 index 44da3b45da..c3183ccd2c 100644 --- a/graphics/circuit_macros/darrow.m4 +++ b/graphics/circuit_macros/darrow.m4 @@ -1,7 +1,7 @@ divert(-1) darrow.m4 Macros for double lines and arrows -* Circuit_macros Version 9.4, copyright (c) 2020 J. D. Aplevich under * +* Circuit_macros Version 9.5, copyright (c) 2021 J. D. Aplevich under * * the LaTeX Project Public Licence in file Licence.txt. The files of * * this distribution may be redistributed or modified provided that this * * copyright notice is included and provided that modifications are clearly * diff --git a/graphics/circuit_macros/doc/Circuit_macros.pdf b/graphics/circuit_macros/doc/Circuit_macros.pdf index 6e50fe8ba6..a9c34834ce 100644 Binary files a/graphics/circuit_macros/doc/Circuit_macros.pdf and b/graphics/circuit_macros/doc/Circuit_macros.pdf differ diff --git a/graphics/circuit_macros/doc/Circuit_macros.tex b/graphics/circuit_macros/doc/Circuit_macros.tex index 49e6570970..fcd9e09fa6 100644 --- a/graphics/circuit_macros/doc/Circuit_macros.tex +++ b/graphics/circuit_macros/doc/Circuit_macros.tex @@ -58,6 +58,8 @@ \let\@@tmp\@svsec\def\@svsec{\llap{\@@tmp}}% }} +\renewcommand\contentsname{Contents, \Version} + \makeatother \hypersetup{ @@ -70,11 +72,17 @@ \begin{document} \title{M4 Macros for Electric Circuit Diagrams in \LaTeX\ Documents} \author{Dwight Aplevich} +\enlargethispage{\baselineskip} \date{% -\input Version +%\input Version \vspace*{-\baselineskip} } \maketitle +% \pdfbookmark[section]{\contentsname}{toc} + \pdfbookmark[section]{Contents}{toc} +\begin{multicols}{2} + \tableofcontents +\end{multicols} \input body diff --git a/graphics/circuit_macros/doc/Makefile b/graphics/circuit_macros/doc/Makefile index fb7ed9bc93..1abd51504e 100644 --- a/graphics/circuit_macros/doc/Makefile +++ b/graphics/circuit_macros/doc/Makefile @@ -67,7 +67,7 @@ M4LIBS = $(MODE).m4 $(DOC).pdf: touch mode.tex -if grep -q tikz mode.tex ; then true ; else \ - make clean ; printf "\\usepackage{tikz}\n" > mode.tex ; fi + rm mode.tex; make MODE=tikz clean mode.tex ; fi make MODE=pgf PIC="dpic -g" LATEX=pdflatex SFX=pdf \ POST="; printf '\\\\vspace*{-0.5\\\\baselineskip}\\n'" \ $(DOC).pdf @@ -113,6 +113,8 @@ mode.tex: -if test "$(MODE)" = "pstricks" ; then \ printf "\\usepackage{pstricks}\n" > mode.tex ; else \ printf "\\usepackage{tikz}\n" > mode.tex ; fi + printf "\\def\\Version{" >> mode.tex + sed -e 's/$$/}/' Version.tex >> mode.tex heading.tex: printf '\\documentclass{article}\n' > heading.tex diff --git a/graphics/circuit_macros/doc/Version.tex b/graphics/circuit_macros/doc/Version.tex index 9d14ec204e..ccce7cfa86 100644 --- a/graphics/circuit_macros/doc/Version.tex +++ b/graphics/circuit_macros/doc/Version.tex @@ -1 +1 @@ -Version 9.4 +Version 9.5 diff --git a/graphics/circuit_macros/doc/body.tex b/graphics/circuit_macros/doc/body.tex index ac8db93ef5..0afb23e5be 100644 --- a/graphics/circuit_macros/doc/body.tex +++ b/graphics/circuit_macros/doc/body.tex @@ -41,10 +41,10 @@ % \newcommand{\Example}[1]{\vspace{\parsep}\noindent {\bf Example #1:}} % - \pdfbookmark[section]{\contentsname}{toc} -\begin{multicols}{2} - \tableofcontents -\end{multicols} +% \pdfbookmark[section]{\contentsname}{toc} +%\begin{multicols}{2} +% \tableofcontents +%\end{multicols} % \xection{Introduction\label{Introduction:}} \begin{quotation}\noindent @@ -55,10 +55,8 @@ gratifying to try with a computer~\cite{Landauer95}. \end{quotation} -This manual -%\footnote{% -%This manual is best viewed with a reader that shows bookmarks -%for easy navigation and for exploring the list of defined macros.}% +This manual\footnote{% +This document is best displayed with a reader that shows bookmarks.} describes a method for drawing electric circuits and other diagrams in \latex and web documents. The diagrams are defined in the simple \pic drawing language~\cite{KRpic} diff --git a/graphics/circuit_macros/dpictools.pic b/graphics/circuit_macros/dpictools.pic index 008360f9a4..0afd517ce7 100644 --- a/graphics/circuit_macros/dpictools.pic +++ b/graphics/circuit_macros/dpictools.pic @@ -3,7 +3,7 @@ # m4 macro NeedDpicTools or the pic statement copy "HOMELIB_/dpictools.pic" # when HOMELIB_ is defined or, generically, copy "dpictools.pic" -# Circuit_macros Version 9.4, copyright (c) 2020 J. D. Aplevich under # +# Circuit_macros Version 9.5, copyright (c) 2021 J. D. Aplevich under # # the LaTeX Project Public Licence in file Licence.txt. The files of # # this distribution may be redistributed or modified provided that this # # copyright notice is included and provided that modifications are clearly # diff --git a/graphics/circuit_macros/examples/examples.pdf b/graphics/circuit_macros/examples/examples.pdf index a2f15a2c9a..e658c456a0 100644 Binary files a/graphics/circuit_macros/examples/examples.pdf and b/graphics/circuit_macros/examples/examples.pdf differ diff --git a/graphics/circuit_macros/examples/mf/cct.mf b/graphics/circuit_macros/examples/mf/cct.mf index e28b40c9f9..e523a753e2 100644 --- a/graphics/circuit_macros/examples/mf/cct.mf +++ b/graphics/circuit_macros/examples/mf/cct.mf @@ -1,5 +1,5 @@ % cct.mf, generated by Mfpic, v1.10 2012/12/03, -% from TeX source "font" on 2020/12/20 at 17:40 +% from TeX source "font" on 2021/01/03 at 16:42 numeric mfpicversion; mfpicversion := 110; if unknown mode: mode := localfont; fi if unknown mag: mag := 1000/1000; fi diff --git a/graphics/circuit_macros/examples/nsvg/Makefile b/graphics/circuit_macros/examples/nsvg/Makefile deleted file mode 100644 index b2132e1ee8..0000000000 --- a/graphics/circuit_macros/examples/nsvg/Makefile +++ /dev/null @@ -1,92 +0,0 @@ -LIBDIR = $$HOME/lib -M4LIBS = svg.m4 SVGconfig.m4 -M4LIBS = svg.m4 - -# To process a single file, copy it to test.m4 and type "make tst" -# to produce tstSVG.html - -DPIC = dpic -#DPIC = $$HOME/dpic/build/p2c/ftp/dpic -#DPIC = ../../../dpic/build/p2c/ftp/dpic -#DPIC = ../../../dpic/bison/dpic -#DPIC = ../../../dpic/bdev/dpic - -# To test the Windows executable. Change these as needed for the operating -# system. NOTE: AntiqueClockSVG.m4 and Connectors.m4 use awk and sed which -# do not work at present with the Windows version. -# M4LIBS = svg.m4 windows.m4 -# DPIC = ../../../dpic/bison/distsrc/Windows/dpic - -.SUFFIXES: .pic .svg .m4 -.pic.svg: - $(DPIC) -v $*.pic > $*.svg - grep '<\!-- width' $*.svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' > $*.siz -.m4.svg: - m4 $(M4LIBS) $*.m4 | sed -e '/^\%/d' > $*.pic - $(DPIC) -v $*.pic > $*.svg - grep '<\!-- width' $*.svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' > $*.siz - -PAGES = examples_1.svg - -examplesSVG.html: examplesSVG.htmx pages - Version=`sed -e 's/Version //' $(LIBDIR)/doc/Version.tex` ; \ - sed -e 's/Version XXX/Version '$$Version'/' examplesSVG.htmx \ - | m4 > examplesSVG.html - -pages: - (cd .. ; make ) - cp ../examples.pdf . - pdf2svg examples.pdf - touch pages - -SED = sed -e '/^\%/d' -TEST = test -tst: - if test -f test.pic; then printf "\n\nUsage: make clean tst\n\n"; exit 1; fi - m4 $(M4LIBS) test.m4 | $(SED) > test.pic - $(DPIC) -v $(TEST).pic > $(TEST).svg - m4 $(M4LIBS) $(TEST).m4 | $(SED) > $(TEST).pic - $(DPIC) -v $(TEST).pic > $(TEST).svg - grep '<\!-- width' $(TEST).svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' \ - > $(TEST).siz - make tstSVG.html - -test.pic: - if test -f test.pic ; then echo "Usage: make clean tst" ; fi - m4 $(M4LIBS) test.m4 | $(SED) > test.pic - m4 $(M4LIBS) test.m4 | $(SED) > test.pic - -tstSVG.html: tstSVG.htmx $(TEST).svg - Version=`sed -e 's/Version //' $(LIBDIR)/doc/Version.tex` ; \ - sed -e 's/Version XXX/Version '$$Version'/' \ - -e 's/XXXXX/'$(TEST)'/g' \ - tstSVG.htmx | m4 > tstSVG.html -# cp tstSVG.html $(TEST) $$HOME/public_html/svg - -xst: Incleps.png - -AntiqueClockSVG.svg ConnectorsSVG.svg: - m4 $(M4LIBS) $*.m4 | sed -e '/^\%/d' > $*.pic - $(DPIC) -v $*.pic > $*.svg - m4 $(M4LIBS) $*.m4 | sed -e '/^\%/d' > $*.pic - $(DPIC) -v $*.pic > $*.svg - grep '<\!-- width' $*.svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' > $*.siz - -InclepsSVG.svg: InclepsSVG.m4 - m4 $(M4LIBS) $*.m4 | sed -e '/^\%/d' > $*.pic - $(DPIC) -v $*.pic > $*.svg - $(DPIC) -v $*.pic > $*.svg - -Incleps.png: - (cd ..; make Incleps.png); cp ../Incleps.png . - -clean: - @printf "\n svg clean:\n" - rm -f *.svg *.dim *.ps *log *.siz *.pic examplesSVG.html Incleps.png - rm -f tstSVG.html copy_tmp__ - rm -f pages - @printf "\n" - -clobber: clean - (cd dev; make clobber) - rm -f test.m4 diff --git a/graphics/circuit_macros/examples/nsvg/dev/F_test.tex b/graphics/circuit_macros/examples/nsvg/dev/F_test.tex deleted file mode 100644 index 68098bbf3a..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/F_test.tex +++ /dev/null @@ -1,5 +0,0 @@ -\documentclass[crop,tikz,multi=false]{standalone} -\usepackage{boxdims,siunitx,amssymb} -\begin{document} -\input test.tex -\end{document} diff --git a/graphics/circuit_macros/examples/nsvg/dev/Makefile b/graphics/circuit_macros/examples/nsvg/dev/Makefile deleted file mode 100644 index cdc126d8bd..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/Makefile +++ /dev/null @@ -1,81 +0,0 @@ -LIBDIR = $$HOME/lib -M4LIBS = pgf.m4 -M4 = m4 - -# To process a single file, copy it to test.m4 and type "make tst" -# to produce tstSVG.html - -DPIC = dpic -#DPIC = $$HOME/dpic/build/p2c/ftp/dpic -#DPIC = $$HOME/dpic/build/p2c/ftp/dpic -#DPIC = $$HOME/dpic/bison/dpic -#DPIC = $$HOME/dpic/bdev/dpic - -.SUFFIXES: .pic .svg .m4 .pdf -.pic.svg: - $(DPIC) -v $*.pic > $*.svg - grep '<\!-- width' $*.svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' > $*.siz -.m4.svg: - touch F_$*.dim - $(M4) pgf.m4 F_$*.dim $*.m4 > $*.pic - $(DPIC) -g $*.pic >> $*.tex - echo "\documentclass[crop,tikz,multi=false]{standalone}" > F_$*.tex - echo "\usepackage{boxdims,siunitx,amssymb}" >> F_$*.tex - echo "\begin{document}" >> F_$*.tex - echo "\input $*.tex" >> F_$*.tex - echo "\end{document}" >> F_$*.tex - pdflatex --quiet F_$* - $(M4) pgf.m4 F_$*.dim $*.m4 > $*.pic - $(DPIC) -g $*.pic >> $*.tex - pdflatex --quiet F_$* - pdf2svg F_$*.pdf $*.svg - rm -f F_$** -.m4.pdf: - touch F_$*.dim - $(M4) pgf.m4 F_$*.dim $*.m4 > $*.pic - $(DPIC) -g $*.pic >> $*.tex - echo "\documentclass[crop,tikz,multi=false]{standalone}" > F_$*.tex - echo "\usepackage{boxdims,siunitx,amssymb}" >> F_$*.tex - echo "\begin{document}" >> F_$*.tex - echo "\input $*.tex" >> F_$*.tex - echo "\end{document}" >> F_$*.tex - pdflatex --quiet F_$* - $(M4) pgf.m4 F_$*.dim $*.m4 > $*.pic - $(DPIC) -g $*.pic >> $*.tex - pdflatex --quiet F_$* - mv F_$*.pdf $*.pdf - -examplesSVG.html: examplesSVG.htmx pages - Version=`sed -e 's/Version //' $(LIBDIR)/doc/Version.tex` ; \ - sed -e 's/Version XXX/Version '$$Version'/' examplesSVG.htmx \ - | m4 > examplesSVG.html - -SED = sed -e '/^\%/d' -TEST = test -tst: - if test -f test.pic; then printf "\n\nUsage: make clean tst\n\n"; exit 1; fi - m4 $(M4LIBS) test.m4 | $(SED) > test.pic - $(DPIC) -v $(TEST).pic > $(TEST).svg - m4 $(M4LIBS) $(TEST).m4 | $(SED) > $(TEST).pic - $(DPIC) -v $(TEST).pic > $(TEST).svg - grep '<\!-- width' $(TEST).svg | sed -e 's%<\!-- *%%' -e 's% *-->%%' \ - > $(TEST).siz - make tstSVG.html - -tstSVG.html: tstSVG.htmx $(TEST).svg - Version=`sed -e 's/Version //' $(LIBDIR)/doc/Version.tex` ; \ - sed -e 's/Version XXX/Version '$$Version'/' \ - -e 's/XXXXX/'$(TEST)'/g' \ - tstSVG.htmx | m4 > tstSVG.html -# cp tstSVG.html $(TEST) $$HOME/public_html/svg - -clean: - @printf "\n svg clean:\n" - rm -f *.svg *.dim *.ps *log *.siz *.pic examplesSVG.html Incleps.png - rm -f tstSVG.html copy_tmp__ - rm -f pages - @printf "\n" - -clobber: clean - (cd dev; make clobber) - rm -f test.m4 diff --git a/graphics/circuit_macros/examples/nsvg/dev/test-1.svg b/graphics/circuit_macros/examples/nsvg/dev/test-1.svg deleted file mode 100644 index 7c48b506b4..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/test-1.svg +++ /dev/null @@ -1,162 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - \ No newline at end of file diff --git a/graphics/circuit_macros/examples/nsvg/dev/test.pdf b/graphics/circuit_macros/examples/nsvg/dev/test.pdf deleted file mode 100644 index 05af7c1263..0000000000 Binary files a/graphics/circuit_macros/examples/nsvg/dev/test.pdf and /dev/null differ diff --git a/graphics/circuit_macros/examples/nsvg/dev/test.pic b/graphics/circuit_macros/examples/nsvg/dev/test.pic deleted file mode 100644 index d035baa113..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/test.pic +++ /dev/null @@ -1,383 +0,0 @@ -.PS -# ex08.m4 -# log_init Version 9.3: TikZ PGF m4 macro settings. - -# log_init begin - # gen_init Version 9.3: TikZ PGF m4 macro settings. - - - define rpoint__ { - rp_wid = last line.end.x-last line.start.x - rp_ht = last line.end.y-last line.start.y - rp_len = sqrt(abs((rp_wid)^2+(rp_ht)^2)); move to last line.start - rp_ang = atan2(rp_ht,rp_wid) } - - rtod_ = 57.295779513082323; dtor_ = 0.017453292519943295 - twopi_ = 6.2831853071795862; pi_ = (twopi_/2) - rp_ang = 0; right - - - linethick = 0.8 - arrowwid = 0.05*scale; arrowht = 0.1*scale - - - # gen_init end - - -# log_init end - - - - -# Input labels -C: (0,0); "\sf C " rjust at C -DE: C+(0,((linewid/10))*((2*3)*7/4)) -A0: DE+(0,((linewid/10))*(4*3/2)); "\sf A0 " rjust at A0 -A1: A0+(0,((linewid/10))*(4*3/2)); "\sf A1 " rjust at A1 -A2: A1+(0,((linewid/10))*(4*3/2)); "\sf A2 " rjust at A2 - move to (-0.2,0) # Lettering within the global object - -# Buffer strings - line right 3*(linewid/10)*5/2 from A2 - B1: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5+(3/2)),0) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(3.5+((3/2)/2)),0) - In1: (0,0) - C: (((linewid/10))*(3.5/3),0) - - - - ]; line right 2*(linewid/10)*5/2 - T1: last line.c - B2: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - In1: (((linewid/10))*(-(3/2)),0) - N_In1: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(-((3/2)/2)),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5),0) - C: (((linewid/10))*(3.5/3),0) - - - - ] - line right 3*(linewid/10)*5/2 from A1 - B3: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5+(3/2)),0) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(3.5+((3/2)/2)),0) - In1: (0,0) - C: (((linewid/10))*(3.5/3),0) - - - - ]; line right 2*(linewid/10)*5/2 - T2: last line.c - B4: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - In1: (((linewid/10))*(-(3/2)),0) - N_In1: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(-((3/2)/2)),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5),0) - C: (((linewid/10))*(3.5/3),0) - - - - ] - line right 3*(linewid/10)*5/2 from A0 - B5: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5+(3/2)),0) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(3.5+((3/2)/2)),0) - In1: (0,0) - C: (((linewid/10))*(3.5/3),0) - - - - ]; line right 2*(linewid/10)*5/2 - T3: last line.c - B6: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - In1: (((linewid/10))*(-(3/2)),0) - N_In1: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(-((3/2)/2)),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5),0) - C: (((linewid/10))*(3.5/3),0) - - - - ] - - -B7: [Tm: line from (((linewid/10))*(3.5),0) \ - to (0,((linewid/10))*(-4/2)) \ - then to (0,((linewid/10))*(4/2)) \ - then to (((linewid/10))*(3.5),0) - Tc: (((linewid/10))*(3.5/2),0) - NE: (((linewid/10))*(3.5/2),((linewid/10))*(4/4)) - SE: (((linewid/10))*(3.5/2),((linewid/10))*(-4/4)) - Out: (((linewid/10))*(3.5),0) - In1: (0,0) - C: (((linewid/10))*(3.5/3),0) - - - - ] at (B1,C) - -G1: [ Bt: line from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (0,((linewid/10))*((2*3)/2)) chop 0 chop -(linethick *(scale/72)/2) - ArcB: arc cw to (0,((linewid/10))*(-(2*3)/2)) \ - with .c at (((linewid/10))*(0-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)),0) - Bb: line to (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) chop -(linethick *(scale/72)/2) chop 0 - ArcN: arc cw from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - ArcS: arc ccw from (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - NE: (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((60)*dtor_)))) - SE: (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((-60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((-60)*dtor_)))) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(0+7+((3/2)/2)),0) - Out: (((linewid/10))*(0+7+(3/2)),0) - In1: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*1))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*1))) - - In2: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*2))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*2))) - - - - C: (((linewid/10))*(0+7/2),0) - ] with .Out at (B1.Out,DE) -G2: [ Bt: line from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (0,((linewid/10))*((2*3)/2)) chop 0 chop -(linethick *(scale/72)/2) - ArcB: arc cw to (0,((linewid/10))*(-(2*3)/2)) \ - with .c at (((linewid/10))*(0-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)),0) - Bb: line to (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) chop -(linethick *(scale/72)/2) chop 0 - ArcN: arc cw from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - ArcS: arc ccw from (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - NE: (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((60)*dtor_)))) - SE: (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((-60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((-60)*dtor_)))) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(0+7+((3/2)/2)),0) - Out: (((linewid/10))*(0+7+(3/2)),0) - In1: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*1))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*1))) - - In2: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*2))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*2))) - - - - C: (((linewid/10))*(0+7/2),0) - ] at (B2+(((linewid/10))*(((3/2)/2)),0),G1-(0,((linewid/10))*((2*3)))) -G3: [ Bm: line from (((linewid/10))*(7-(2*3)/2),((linewid/10))*(-(2*3)/2)) \ - to (0,((linewid/10))*(-(2*3)/2)) \ - then to (0,((linewid/10))*((2*3)/2)) then \ - to (((linewid/10))*(7-(2*3)/2),((linewid/10))*((2*3)/2)) - Arc: arc cw rad (2*3)/2 \ - to Here+(0,((linewid/10))*(-(2*3))) \ - with .c at Here+(0,((linewid/10))*(-(2*3)/2)) - NE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((45)*dtor_)))) - SE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((-45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((-45)*dtor_)))) - Out: (((linewid/10))*(7),0) - - In1: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-1))) - In2: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-2))) - In3: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-3))) - In4: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-4))) - - C: (((linewid/10))*(7/2),0) - ] with .In1 at (G2.Out+(9*(linewid/10)*5/2,0),A2) -G5: [ Bm: line from (((linewid/10))*(7-(2*3)/2),((linewid/10))*(-(2*3)/2)) \ - to (0,((linewid/10))*(-(2*3)/2)) \ - then to (0,((linewid/10))*((2*3)/2)) then \ - to (((linewid/10))*(7-(2*3)/2),((linewid/10))*((2*3)/2)) - Arc: arc cw rad (2*3)/2 \ - to Here+(0,((linewid/10))*(-(2*3))) \ - with .c at Here+(0,((linewid/10))*(-(2*3)/2)) - NE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((45)*dtor_)))) - SE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((-45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((-45)*dtor_)))) - Out: (((linewid/10))*(7),0) - - In1: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-1))) - In2: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-2))) - In3: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-3))) - In4: (0,((linewid/10))*((2*3)/min(4,6-1)*((4+1)/2-4))) - - C: (((linewid/10))*(7/2),0) - ] with .In4 at (G3.In1,G2.Out) -G6: [ Bm: line from (((linewid/10))*(7-(2*3)/2),((linewid/10))*(-(2*3)/2)) \ - to (0,((linewid/10))*(-(2*3)/2)) \ - then to (0,((linewid/10))*((2*3)/2)) then \ - to (((linewid/10))*(7-(2*3)/2),((linewid/10))*((2*3)/2)) - Arc: arc cw rad (2*3)/2 \ - to Here+(0,((linewid/10))*(-(2*3))) \ - with .c at Here+(0,((linewid/10))*(-(2*3)/2)) - NE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((45)*dtor_)))) - SE: (((linewid/10))*(7-(2*3)/2),0)+(((linewid/10))*(((2*3)/2)*(cos((-45)*dtor_))),((linewid/10))*(((2*3)/2)*(sin((-45)*dtor_)))) - Out: (((linewid/10))*(7),0) - - In1: (0,((linewid/10))*((2*3)/min(2,6-1)*((2+1)/2-1))) - In2: (0,((linewid/10))*((2*3)/min(2,6-1)*((2+1)/2-2))) - - C: (((linewid/10))*(7/2),0) - ] at G5+(((linewid/10))*(7),((linewid/10))*((2*3)*3/4))+((linewid/10)*5/2*2,0) -G4: [ Bt: line from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (0,((linewid/10))*((2*3)/2)) chop 0 chop -(linethick *(scale/72)/2) - ArcB: arc cw to (0,((linewid/10))*(-(2*3)/2)) \ - with .c at (((linewid/10))*(0-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)),0) - Bb: line to (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) chop -(linethick *(scale/72)/2) chop 0 - ArcN: arc cw from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - ArcS: arc ccw from (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - NE: (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((60)*dtor_)))) - SE: (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((-60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((-60)*dtor_)))) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(0+7+((3/2)/2)),0) - Out: (((linewid/10))*(0+7+(3/2)),0) - In1: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*1))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*1))) - - In2: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*2))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*2))) - - - - C: (((linewid/10))*(0+7/2),0) - ] with .In1 at (G6.Out,G3)+(2*(linewid/10)*5/2,0) -G7: [ Bt: line from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (0,((linewid/10))*((2*3)/2)) chop 0 chop -(linethick *(scale/72)/2) - ArcB: arc cw to (0,((linewid/10))*(-(2*3)/2)) \ - with .c at (((linewid/10))*(0-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)),0) - Bb: line to (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) chop -(linethick *(scale/72)/2) chop 0 - ArcN: arc cw from (((linewid/10))*(0+7/3),((linewid/10))*((2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - ArcS: arc ccw from (((linewid/10))*(0+7/3),((linewid/10))*(-(2*3)/2)) \ - to (((linewid/10))*(0+7),0) \ - with .c at (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3)))) - NE: (((linewid/10))*(0+7/3),((linewid/10))*(-((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((60)*dtor_)))) - SE: (((linewid/10))*(0+7/3),((linewid/10))*(((7*2/3)^2-((2*3)/2)^2)/((2*3))))+(((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(cos((-60)*dtor_))),((linewid/10))*(((2*3)/2+((7*2/3)^2-((2*3)/2)^2)/((2*3)))*(sin((-60)*dtor_)))) - N_Out: circle diam (3/2)*(linewid/10) \ - at (((linewid/10))*(0+7+((3/2)/2)),0) - Out: (((linewid/10))*(0+7+(3/2)),0) - In1: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*1))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*1))) - - In2: (((linewid/10))*(-sqrt((7*(2*3)/((2*3)))^2-((2*3)/2)^2)+sqrt((7*(2*3)/((2*3)))^2-((2*3)/2/min(2,6-1)*(2+1-2*2))^2)),((linewid/10))*((2*3)/2/min(2,6-1)*(2+1-2*2))) - - - - C: (((linewid/10))*(0+7/2),0) - ] with .In2 at (G4.In2,G5.Out) - -# Output to other latches -TOL: (G2.Out,C)+(4*(linewid/10)*5/2,-4*(linewid/10)) - move to TOL+(3*(linewid/10)*5/2,-(linewid/10)*5/2/3) ; {move down 0.15} - "\sf {\sl To other latches}" below - -# Remaining input lines - line from G1.In1 to (DE,G1.In1); "\sf D " rjust - line from G1.In2 to (DE,G1.In2); "\sf E " rjust - [ circle rad (0.04*linewid) fill 0 ] with .c at G1.In2-((linewid/10)*5/2,0) - move to last [].c; line to (Here,G2.In2) then to G2.In2 - line from C to B7.In1 - -# Connect Bi, and connect to output bus - [ circle rad (0.04*linewid) fill 0 ] with .c at T1.c - move to last [].c ; line down (A2.y-A1.y)/2 - line to (TOL-(1*(linewid/10)*5/2,0),Here) ; arrow to (Here,TOL) - [ circle rad (0.04*linewid) fill 0 ] with .c at T2.c - move to last [].c ; line down (A2.y-A1.y)/2 - line to (TOL-(2*(linewid/10)*5/2,0),Here) ; arrow to (Here,TOL) - [ circle rad (0.04*linewid) fill 0 ] with .c at T3.c - move to last [].c ; line down (A2.y-A1.y)/2 - line to (TOL-(3*(linewid/10)*5/2,0),Here) ; arrow to (Here,TOL) - - -# G1 to G2 - [ circle rad (0.04*linewid) fill 0 ] with .c at (T1.c,G1) - move to last [].c; line to (Here,G2.In1) then to G2.In1 - -# Upper And inputs to output bus - line left 4*(linewid/10)*5/2 from G3.In1 - arrow to (Here,TOL) - line left 3*(linewid/10)*5/2 from G3.In2 - arrow to (Here,TOL) - line left 2*(linewid/10)*5/2 from G3.In3 - arrow to (Here,TOL) - line left 1*(linewid/10)*5/2 from G3.In4 - arrow to (Here,TOL) - - - line from B2.Out to (G3.In1,B2)-(4*(linewid/10)*5/2,0) ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line from B4.Out to (G3.In2,B4)-(3*(linewid/10)*5/2,0) ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line from B6.Out to (G3.In3,B6)-(2*(linewid/10)*5/2,0) ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line from G1.Out to (G3.In4,G1)-((linewid/10)*5/2,0) ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - -# Lower And inputs - line left 4*(linewid/10)*5/2 from G5.In1 ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line left 3*(linewid/10)*5/2 from G5.In2 ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line left 2*(linewid/10)*5/2 from G5.In3 ; [ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c - line from G2.Out to G5.In4 ; [ circle rad (0.04*linewid) fill 0 ] with .c at (TOL,Here) - move to last [].c ; arrow to (Here,TOL) - -# Fix up G4, G6, G7 - line from G3.Out to G4.In1 - line right (linewid/10)*5/2 from G4.Out - {[ circle rad (0.04*linewid) fill 0 ] with .c at Here - move to last [].c; line right (linewid/10)*5/2 ; "\sf Q7" ljust; move right 0.2 } # letters in object - line down 2*(linewid/10)*5/2 then to G6.In1+(-(linewid/10)*5/2,(linewid/10)*5/2) - line to (Here,G6.In1) then to G6.In1 - line from G4.In2 to (G6.In1+(-(linewid/10)*5/2,0),G4.In2) - line down (linewid/10)*5/2 then to G7.Out+((linewid/10)*5/2,2*(linewid/10)*5/2) - line to (Here,G7) then to G7.Out - line from G6.Out right (linewid/10)*5/2 ; line to (Here,G7.In1) then to G7.In1 - line from G5.Out to G7.In2 - line left (linewid/10)*5/2 from G6.In2 ; arrow to (Here,TOL) - [ circle rad (0.04*linewid) fill 0 ] with .c at (Here,C) - move to last [].c ; line to B7.Out - -.PE diff --git a/graphics/circuit_macros/examples/nsvg/dev/test.svg b/graphics/circuit_macros/examples/nsvg/dev/test.svg deleted file mode 100644 index a9c554efdc..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/test.svg +++ /dev/null @@ -1,239 +0,0 @@ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/graphics/circuit_macros/examples/nsvg/dev/test.tex b/graphics/circuit_macros/examples/nsvg/dev/test.tex deleted file mode 100644 index e4361f7033..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/test.tex +++ /dev/null @@ -1,1136 +0,0 @@ -\begin{tikzpicture}[scale=2.54] -% dpic version 2020.06.01 option -g for TikZ and PGF 1.01 -\ifx\dpiclw\undefined\newdimen\dpiclw\fi -\global\def\dpicdraw{\draw[line width=\dpiclw]} -\global\def\dpicstop{;} -\dpiclw=0.8bp -\dpiclw=0.8bp -\draw (0,0) node[left=-2bp]{\sf C }; -\draw (0,0.825) node[left=-2bp]{\sf A0 }; -\draw (0,1.125) node[left=-2bp]{\sf A1 }; -\draw (0,1.425) node[left=-2bp]{\sf A2 }; -\dpicdraw (0,1.425) - --(0.375,1.425)\dpicstop -\dpicdraw (0.55,1.425) - --(0.375,1.325) - --(0.375,1.525) - --(0.55,1.425)\dpicstop -\dpicdraw (0.5875,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.425) - --(0.875,1.425)\dpicstop -\dpicdraw (1.125,1.425) - --(0.95,1.325) - --(0.95,1.525) - --(1.125,1.425)\dpicstop -\dpicdraw (0.9125,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0,1.125) - --(0.375,1.125)\dpicstop -\dpicdraw (0.55,1.125) - --(0.375,1.025) - --(0.375,1.225) - --(0.55,1.125)\dpicstop -\dpicdraw (0.5875,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.125) - --(0.875,1.125)\dpicstop -\dpicdraw (1.125,1.125) - --(0.95,1.025) - --(0.95,1.225) - --(1.125,1.125)\dpicstop -\dpicdraw (0.9125,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0,0.825) - --(0.375,0.825)\dpicstop -\dpicdraw (0.55,0.825) - --(0.375,0.725) - --(0.375,0.925) - --(0.55,0.825)\dpicstop -\dpicdraw (0.5875,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.625,0.825) - --(0.875,0.825)\dpicstop -\dpicdraw (1.125,0.825) - --(0.95,0.725) - --(0.95,0.925) - --(1.125,0.825)\dpicstop -\dpicdraw (0.9125,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.5875,0) - --(0.4125,-0.1) - --(0.4125,0.1) - --(0.5875,0)\dpicstop -\dpicdraw (0.316667,0.675) - --(0.194444,0.675)\dpicstop -\dpicdraw (0.198957,0.677179) - ..controls (0.245009,0.581799) and (0.245392,0.470695) - ..(0.2,0.375)\dpicstop -\dpicdraw (0.194444,0.375) - --(0.316667,0.375)\dpicstop -\dpicdraw (0.316667,0.675) - ..controls (0.417105,0.675) and (0.508302,0.616374) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.316667,0.375) - ..controls (0.417105,0.375) and (0.508302,0.433626) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.5875,0.525) circle (0.014764in)\dpicstop -\dpicdraw (0.944444,0.375) - --(0.822222,0.375)\dpicstop -\dpicdraw (0.826735,0.377179) - ..controls (0.872787,0.281799) and (0.87317,0.170695) - ..(0.827778,0.075)\dpicstop -\dpicdraw (0.822222,0.075) - --(0.944444,0.075)\dpicstop -\dpicdraw (0.944444,0.375) - ..controls (1.044883,0.375) and (1.136079,0.316374) - ..(1.177778,0.225)\dpicstop -\dpicdraw (0.944444,0.075) - ..controls (1.044883,0.075) and (1.136079,0.133626) - ..(1.177778,0.225)\dpicstop -\dpicdraw (1.215278,0.225) circle (0.014764in)\dpicstop -\dpicdraw (2.577778,1.1625) - --(2.377778,1.1625) - --(2.377778,1.4625) - --(2.577778,1.4625)\dpicstop -\dpicdraw (2.577778,1.4625) - ..controls (2.66062,1.4625) and (2.727778,1.395343) - ..(2.727778,1.3125) - ..controls (2.727778,1.229657) and (2.66062,1.1625) - ..(2.577778,1.1625)\dpicstop -\dpicdraw (2.577778,0.1875) - --(2.377778,0.1875) - --(2.377778,0.4875) - --(2.577778,0.4875)\dpicstop -\dpicdraw (2.577778,0.4875) - ..controls (2.66062,0.4875) and (2.727778,0.420343) - ..(2.727778,0.3375) - ..controls (2.727778,0.254657) and (2.66062,0.1875) - ..(2.577778,0.1875)\dpicstop -\dpicdraw (3.177778,0.4125) - --(2.977778,0.4125) - --(2.977778,0.7125) - --(3.177778,0.7125)\dpicstop -\dpicdraw (3.177778,0.7125) - ..controls (3.26062,0.7125) and (3.327778,0.645343) - ..(3.327778,0.5625) - ..controls (3.327778,0.479657) and (3.26062,0.4125) - ..(3.177778,0.4125)\dpicstop -\dpicdraw (3.668802,1.3875) - --(3.54658,1.3875)\dpicstop -\dpicdraw (3.551093,1.389679) - ..controls (3.597145,1.294299) and (3.597528,1.183195) - ..(3.552136,1.0875)\dpicstop -\dpicdraw (3.54658,1.0875) - --(3.668802,1.0875)\dpicstop -\dpicdraw (3.668802,1.3875) - ..controls (3.769241,1.3875) and (3.860437,1.328874) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.668802,1.0875) - ..controls (3.769241,1.0875) and (3.860437,1.146126) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.939636,1.2375) circle (0.014764in)\dpicstop -\dpicdraw (3.668802,0.5625) - --(3.54658,0.5625)\dpicstop -\dpicdraw (3.551093,0.564679) - ..controls (3.597145,0.469299) and (3.597528,0.358195) - ..(3.552136,0.2625)\dpicstop -\dpicdraw (3.54658,0.2625) - --(3.668802,0.2625)\dpicstop -\dpicdraw (3.668802,0.5625) - ..controls (3.769241,0.5625) and (3.860437,0.503874) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.668802,0.2625) - ..controls (3.769241,0.2625) and (3.860437,0.321126) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.939636,0.4125) circle (0.014764in)\dpicstop -\draw (2.127778,-0.241667) node[below=-2bp]{\sf {\sl To other latches}}; -\dpicdraw (0.225642,0.6) - --(0,0.6)\dpicstop -\draw (0,0.6) node[left=-2bp]{\sf D }; -\dpicdraw (0.225642,0.45) - --(0,0.45)\dpicstop -\draw (0,0.45) node[left=-2bp]{\sf E }; -\dpicdraw[fill=black](0.100642,0.45) circle (0.007874in)\dpicstop -\dpicdraw (0.100642,0.45) - --(0.100642,0.15) - --(0.85342,0.15)\dpicstop -\dpicdraw (0,0) - --(0.4125,0)\dpicstop -\dpicdraw[fill=black](0.75,1.425) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.425) - --(0.75,1.275)\dpicstop -\dpicdraw (0.75,1.275) - --(1.627778,1.275)\dpicstop -\filldraw[line width=0bp](1.602778,-0.1) - --(1.627778,-0.2) - --(1.652778,-0.1) --cycle\dpicstop -\dpicdraw (1.627778,1.275) - --(1.627778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,1.125) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.125) - --(0.75,0.975)\dpicstop -\dpicdraw (0.75,0.975) - --(1.502778,0.975)\dpicstop -\filldraw[line width=0bp](1.477778,-0.1) - --(1.502778,-0.2) - --(1.527778,-0.1) --cycle\dpicstop -\dpicdraw (1.502778,0.975) - --(1.502778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.825) - --(0.75,0.675)\dpicstop -\dpicdraw (0.75,0.675) - --(1.377778,0.675)\dpicstop -\filldraw[line width=0bp](1.352778,-0.1) - --(1.377778,-0.2) - --(1.402778,-0.1) --cycle\dpicstop -\dpicdraw (1.377778,0.675) - --(1.377778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.526089) - --(0.75,0.3) - --(0.85342,0.3)\dpicstop -\dpicdraw (2.377778,1.425) - --(1.877778,1.425)\dpicstop -\filldraw[line width=0bp](1.852778,-0.1) - --(1.877778,-0.2) - --(1.902778,-0.1) --cycle\dpicstop -\dpicdraw (1.877778,1.425) - --(1.877778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.35) - --(2.002778,1.35)\dpicstop -\filldraw[line width=0bp](1.977778,-0.1) - --(2.002778,-0.2) - --(2.027778,-0.1) --cycle\dpicstop -\dpicdraw (2.002778,1.35) - --(2.002778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.275) - --(2.127778,1.275)\dpicstop -\filldraw[line width=0bp](2.102778,-0.1) - --(2.127778,-0.2) - --(2.152778,-0.1) --cycle\dpicstop -\dpicdraw (2.127778,1.275) - --(2.127778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.2) - --(2.252778,1.2)\dpicstop -\filldraw[line width=0bp](2.227778,-0.1) - --(2.252778,-0.2) - --(2.277778,-0.1) --cycle\dpicstop -\dpicdraw (2.252778,1.2) - --(2.252778,-0.177094)\dpicstop -\dpicdraw (1.125,1.425) - --(1.877778,1.425)\dpicstop -\dpicdraw[fill=black](1.877778,1.425) circle (0.007874in)\dpicstop -\dpicdraw (1.125,1.125) - --(2.002778,1.125)\dpicstop -\dpicdraw[fill=black](2.002778,1.125) circle (0.007874in)\dpicstop -\dpicdraw (1.125,0.825) - --(2.127778,0.825)\dpicstop -\dpicdraw[fill=black](2.127778,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.625,0.525) - --(2.252778,0.526089)\dpicstop -\dpicdraw[fill=black](2.252778,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.45) - --(1.877778,0.45)\dpicstop -\dpicdraw[fill=black](1.877778,0.45) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.375) - --(2.002778,0.375)\dpicstop -\dpicdraw[fill=black](2.002778,0.375) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.3) - --(2.127778,0.3)\dpicstop -\dpicdraw[fill=black](2.127778,0.3) circle (0.007874in)\dpicstop -\dpicdraw (1.252778,0.225) - --(2.377778,0.225)\dpicstop -\dpicdraw[fill=black](1.752778,0.225) circle (0.007874in)\dpicstop -\filldraw[line width=0bp](1.727778,-0.1) - --(1.752778,-0.2) - --(1.777778,-0.1) --cycle\dpicstop -\dpicdraw (1.752778,0.225) - --(1.752778,-0.177094)\dpicstop -\dpicdraw (2.727778,1.3125) - --(3.577778,1.3125)\dpicstop -\dpicdraw (3.977136,1.2375) - --(4.102136,1.2375)\dpicstop -\dpicdraw[fill=black](4.102136,1.2375) circle (0.007874in)\dpicstop -\dpicdraw (4.102136,1.2375) - --(4.227136,1.2375)\dpicstop -\draw (4.227136,1.2375) node[right=-2bp]{\sf Q7}; -\dpicdraw (4.102136,1.2375) - --(4.102136,0.9875) - --(2.852778,0.7625)\dpicstop -\dpicdraw (2.852778,0.7625) - --(2.852778,0.6375) - --(2.977778,0.6375)\dpicstop -\dpicdraw (3.577778,1.1625) - --(2.852778,1.1625)\dpicstop -\dpicdraw (2.852778,1.1625) - --(2.852778,1.0375) - --(4.102136,0.6625)\dpicstop -\dpicdraw (4.102136,0.6625) - --(4.102136,0.413589) - --(3.977136,0.4125)\dpicstop -\dpicdraw (3.327778,0.5625) - --(3.452778,0.5625)\dpicstop -\dpicdraw (3.452778,0.5625) - --(3.452778,0.4875) - --(3.577778,0.4875)\dpicstop -\dpicdraw (2.727778,0.3375) - --(3.577778,0.3375)\dpicstop -\dpicdraw (2.977778,0.4875) - --(2.852778,0.4875)\dpicstop -\filldraw[line width=0bp](2.827778,-0.1) - --(2.852778,-0.2) - --(2.877778,-0.1) --cycle\dpicstop -\dpicdraw (2.852778,0.4875) - --(2.852778,-0.177094)\dpicstop -\dpicdraw[fill=black](2.852778,0) circle (0.007874in)\dpicstop -\dpicdraw (2.852778,0) - --(0.5875,0)\dpicstop -\end{tikzpicture} -\begin{tikzpicture}[scale=2.54] -% dpic version 2020.06.01 option -g for TikZ and PGF 1.01 -\ifx\dpiclw\undefined\newdimen\dpiclw\fi -\global\def\dpicdraw{\draw[line width=\dpiclw]} -\global\def\dpicstop{;} -\dpiclw=0.8bp -\dpiclw=0.8bp -\draw (0,0) node[left=-2bp]{\sf C }; -\draw (0,0.825) node[left=-2bp]{\sf A0 }; -\draw (0,1.125) node[left=-2bp]{\sf A1 }; -\draw (0,1.425) node[left=-2bp]{\sf A2 }; -\dpicdraw (0,1.425) - --(0.375,1.425)\dpicstop -\dpicdraw (0.55,1.425) - --(0.375,1.325) - --(0.375,1.525) - --(0.55,1.425)\dpicstop -\dpicdraw (0.5875,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.425) - --(0.875,1.425)\dpicstop -\dpicdraw (1.125,1.425) - --(0.95,1.325) - --(0.95,1.525) - --(1.125,1.425)\dpicstop -\dpicdraw (0.9125,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0,1.125) - --(0.375,1.125)\dpicstop -\dpicdraw (0.55,1.125) - --(0.375,1.025) - --(0.375,1.225) - --(0.55,1.125)\dpicstop -\dpicdraw (0.5875,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.125) - --(0.875,1.125)\dpicstop -\dpicdraw (1.125,1.125) - --(0.95,1.025) - --(0.95,1.225) - --(1.125,1.125)\dpicstop -\dpicdraw (0.9125,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0,0.825) - --(0.375,0.825)\dpicstop -\dpicdraw (0.55,0.825) - --(0.375,0.725) - --(0.375,0.925) - --(0.55,0.825)\dpicstop -\dpicdraw (0.5875,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.625,0.825) - --(0.875,0.825)\dpicstop -\dpicdraw (1.125,0.825) - --(0.95,0.725) - --(0.95,0.925) - --(1.125,0.825)\dpicstop -\dpicdraw (0.9125,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.5875,0) - --(0.4125,-0.1) - --(0.4125,0.1) - --(0.5875,0)\dpicstop -\dpicdraw (0.316667,0.675) - --(0.194444,0.675)\dpicstop -\dpicdraw (0.198957,0.677179) - ..controls (0.245009,0.581799) and (0.245392,0.470695) - ..(0.2,0.375)\dpicstop -\dpicdraw (0.194444,0.375) - --(0.316667,0.375)\dpicstop -\dpicdraw (0.316667,0.675) - ..controls (0.417105,0.675) and (0.508302,0.616374) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.316667,0.375) - ..controls (0.417105,0.375) and (0.508302,0.433626) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.5875,0.525) circle (0.014764in)\dpicstop -\dpicdraw (0.944444,0.375) - --(0.822222,0.375)\dpicstop -\dpicdraw (0.826735,0.377179) - ..controls (0.872787,0.281799) and (0.87317,0.170695) - ..(0.827778,0.075)\dpicstop -\dpicdraw (0.822222,0.075) - --(0.944444,0.075)\dpicstop -\dpicdraw (0.944444,0.375) - ..controls (1.044883,0.375) and (1.136079,0.316374) - ..(1.177778,0.225)\dpicstop -\dpicdraw (0.944444,0.075) - ..controls (1.044883,0.075) and (1.136079,0.133626) - ..(1.177778,0.225)\dpicstop -\dpicdraw (1.215278,0.225) circle (0.014764in)\dpicstop -\dpicdraw (2.577778,1.1625) - --(2.377778,1.1625) - --(2.377778,1.4625) - --(2.577778,1.4625)\dpicstop -\dpicdraw (2.577778,1.4625) - ..controls (2.66062,1.4625) and (2.727778,1.395343) - ..(2.727778,1.3125) - ..controls (2.727778,1.229657) and (2.66062,1.1625) - ..(2.577778,1.1625)\dpicstop -\dpicdraw (2.577778,0.1875) - --(2.377778,0.1875) - --(2.377778,0.4875) - --(2.577778,0.4875)\dpicstop -\dpicdraw (2.577778,0.4875) - ..controls (2.66062,0.4875) and (2.727778,0.420343) - ..(2.727778,0.3375) - ..controls (2.727778,0.254657) and (2.66062,0.1875) - ..(2.577778,0.1875)\dpicstop -\dpicdraw (3.177778,0.4125) - --(2.977778,0.4125) - --(2.977778,0.7125) - --(3.177778,0.7125)\dpicstop -\dpicdraw (3.177778,0.7125) - ..controls (3.26062,0.7125) and (3.327778,0.645343) - ..(3.327778,0.5625) - ..controls (3.327778,0.479657) and (3.26062,0.4125) - ..(3.177778,0.4125)\dpicstop -\dpicdraw (3.668802,1.3875) - --(3.54658,1.3875)\dpicstop -\dpicdraw (3.551093,1.389679) - ..controls (3.597145,1.294299) and (3.597528,1.183195) - ..(3.552136,1.0875)\dpicstop -\dpicdraw (3.54658,1.0875) - --(3.668802,1.0875)\dpicstop -\dpicdraw (3.668802,1.3875) - ..controls (3.769241,1.3875) and (3.860437,1.328874) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.668802,1.0875) - ..controls (3.769241,1.0875) and (3.860437,1.146126) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.939636,1.2375) circle (0.014764in)\dpicstop -\dpicdraw (3.668802,0.5625) - --(3.54658,0.5625)\dpicstop -\dpicdraw (3.551093,0.564679) - ..controls (3.597145,0.469299) and (3.597528,0.358195) - ..(3.552136,0.2625)\dpicstop -\dpicdraw (3.54658,0.2625) - --(3.668802,0.2625)\dpicstop -\dpicdraw (3.668802,0.5625) - ..controls (3.769241,0.5625) and (3.860437,0.503874) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.668802,0.2625) - ..controls (3.769241,0.2625) and (3.860437,0.321126) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.939636,0.4125) circle (0.014764in)\dpicstop -\draw (2.127778,-0.241667) node[below=-2bp]{\sf {\sl To other latches}}; -\dpicdraw (0.225642,0.6) - --(0,0.6)\dpicstop -\draw (0,0.6) node[left=-2bp]{\sf D }; -\dpicdraw (0.225642,0.45) - --(0,0.45)\dpicstop -\draw (0,0.45) node[left=-2bp]{\sf E }; -\dpicdraw[fill=black](0.100642,0.45) circle (0.007874in)\dpicstop -\dpicdraw (0.100642,0.45) - --(0.100642,0.15) - --(0.85342,0.15)\dpicstop -\dpicdraw (0,0) - --(0.4125,0)\dpicstop -\dpicdraw[fill=black](0.75,1.425) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.425) - --(0.75,1.275)\dpicstop -\dpicdraw (0.75,1.275) - --(1.627778,1.275)\dpicstop -\filldraw[line width=0bp](1.602778,-0.1) - --(1.627778,-0.2) - --(1.652778,-0.1) --cycle\dpicstop -\dpicdraw (1.627778,1.275) - --(1.627778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,1.125) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.125) - --(0.75,0.975)\dpicstop -\dpicdraw (0.75,0.975) - --(1.502778,0.975)\dpicstop -\filldraw[line width=0bp](1.477778,-0.1) - --(1.502778,-0.2) - --(1.527778,-0.1) --cycle\dpicstop -\dpicdraw (1.502778,0.975) - --(1.502778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.825) - --(0.75,0.675)\dpicstop -\dpicdraw (0.75,0.675) - --(1.377778,0.675)\dpicstop -\filldraw[line width=0bp](1.352778,-0.1) - --(1.377778,-0.2) - --(1.402778,-0.1) --cycle\dpicstop -\dpicdraw (1.377778,0.675) - --(1.377778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.526089) - --(0.75,0.3) - --(0.85342,0.3)\dpicstop -\dpicdraw (2.377778,1.425) - --(1.877778,1.425)\dpicstop -\filldraw[line width=0bp](1.852778,-0.1) - --(1.877778,-0.2) - --(1.902778,-0.1) --cycle\dpicstop -\dpicdraw (1.877778,1.425) - --(1.877778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.35) - --(2.002778,1.35)\dpicstop -\filldraw[line width=0bp](1.977778,-0.1) - --(2.002778,-0.2) - --(2.027778,-0.1) --cycle\dpicstop -\dpicdraw (2.002778,1.35) - --(2.002778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.275) - --(2.127778,1.275)\dpicstop -\filldraw[line width=0bp](2.102778,-0.1) - --(2.127778,-0.2) - --(2.152778,-0.1) --cycle\dpicstop -\dpicdraw (2.127778,1.275) - --(2.127778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.2) - --(2.252778,1.2)\dpicstop -\filldraw[line width=0bp](2.227778,-0.1) - --(2.252778,-0.2) - --(2.277778,-0.1) --cycle\dpicstop -\dpicdraw (2.252778,1.2) - --(2.252778,-0.177094)\dpicstop -\dpicdraw (1.125,1.425) - --(1.877778,1.425)\dpicstop -\dpicdraw[fill=black](1.877778,1.425) circle (0.007874in)\dpicstop -\dpicdraw (1.125,1.125) - --(2.002778,1.125)\dpicstop -\dpicdraw[fill=black](2.002778,1.125) circle (0.007874in)\dpicstop -\dpicdraw (1.125,0.825) - --(2.127778,0.825)\dpicstop -\dpicdraw[fill=black](2.127778,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.625,0.525) - --(2.252778,0.526089)\dpicstop -\dpicdraw[fill=black](2.252778,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.45) - --(1.877778,0.45)\dpicstop -\dpicdraw[fill=black](1.877778,0.45) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.375) - --(2.002778,0.375)\dpicstop -\dpicdraw[fill=black](2.002778,0.375) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.3) - --(2.127778,0.3)\dpicstop -\dpicdraw[fill=black](2.127778,0.3) circle (0.007874in)\dpicstop -\dpicdraw (1.252778,0.225) - --(2.377778,0.225)\dpicstop -\dpicdraw[fill=black](1.752778,0.225) circle (0.007874in)\dpicstop -\filldraw[line width=0bp](1.727778,-0.1) - --(1.752778,-0.2) - --(1.777778,-0.1) --cycle\dpicstop -\dpicdraw (1.752778,0.225) - --(1.752778,-0.177094)\dpicstop -\dpicdraw (2.727778,1.3125) - --(3.577778,1.3125)\dpicstop -\dpicdraw (3.977136,1.2375) - --(4.102136,1.2375)\dpicstop -\dpicdraw[fill=black](4.102136,1.2375) circle (0.007874in)\dpicstop -\dpicdraw (4.102136,1.2375) - --(4.227136,1.2375)\dpicstop -\draw (4.227136,1.2375) node[right=-2bp]{\sf Q7}; -\dpicdraw (4.102136,1.2375) - --(4.102136,0.9875) - --(2.852778,0.7625)\dpicstop -\dpicdraw (2.852778,0.7625) - --(2.852778,0.6375) - --(2.977778,0.6375)\dpicstop -\dpicdraw (3.577778,1.1625) - --(2.852778,1.1625)\dpicstop -\dpicdraw (2.852778,1.1625) - --(2.852778,1.0375) - --(4.102136,0.6625)\dpicstop -\dpicdraw (4.102136,0.6625) - --(4.102136,0.413589) - --(3.977136,0.4125)\dpicstop -\dpicdraw (3.327778,0.5625) - --(3.452778,0.5625)\dpicstop -\dpicdraw (3.452778,0.5625) - --(3.452778,0.4875) - --(3.577778,0.4875)\dpicstop -\dpicdraw (2.727778,0.3375) - --(3.577778,0.3375)\dpicstop -\dpicdraw (2.977778,0.4875) - --(2.852778,0.4875)\dpicstop -\filldraw[line width=0bp](2.827778,-0.1) - --(2.852778,-0.2) - --(2.877778,-0.1) --cycle\dpicstop -\dpicdraw (2.852778,0.4875) - --(2.852778,-0.177094)\dpicstop -\dpicdraw[fill=black](2.852778,0) circle (0.007874in)\dpicstop -\dpicdraw (2.852778,0) - --(0.5875,0)\dpicstop -\end{tikzpicture} -\begin{tikzpicture}[scale=2.54] -% dpic version 2020.06.01 option -g for TikZ and PGF 1.01 -\ifx\dpiclw\undefined\newdimen\dpiclw\fi -\global\def\dpicdraw{\draw[line width=\dpiclw]} -\global\def\dpicstop{;} -\dpiclw=0.8bp -\dpiclw=0.8bp -\draw (0,0) node[left=-2bp]{\sf C }; -\draw (0,0.825) node[left=-2bp]{\sf A0 }; -\draw (0,1.125) node[left=-2bp]{\sf A1 }; -\draw (0,1.425) node[left=-2bp]{\sf A2 }; -\dpicdraw (0,1.425) - --(0.375,1.425)\dpicstop -\dpicdraw (0.55,1.425) - --(0.375,1.325) - --(0.375,1.525) - --(0.55,1.425)\dpicstop -\dpicdraw (0.5875,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.425) - --(0.875,1.425)\dpicstop -\dpicdraw (1.125,1.425) - --(0.95,1.325) - --(0.95,1.525) - --(1.125,1.425)\dpicstop -\dpicdraw (0.9125,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0,1.125) - --(0.375,1.125)\dpicstop -\dpicdraw (0.55,1.125) - --(0.375,1.025) - --(0.375,1.225) - --(0.55,1.125)\dpicstop -\dpicdraw (0.5875,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.125) - --(0.875,1.125)\dpicstop -\dpicdraw (1.125,1.125) - --(0.95,1.025) - --(0.95,1.225) - --(1.125,1.125)\dpicstop -\dpicdraw (0.9125,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0,0.825) - --(0.375,0.825)\dpicstop -\dpicdraw (0.55,0.825) - --(0.375,0.725) - --(0.375,0.925) - --(0.55,0.825)\dpicstop -\dpicdraw (0.5875,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.625,0.825) - --(0.875,0.825)\dpicstop -\dpicdraw (1.125,0.825) - --(0.95,0.725) - --(0.95,0.925) - --(1.125,0.825)\dpicstop -\dpicdraw (0.9125,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.5875,0) - --(0.4125,-0.1) - --(0.4125,0.1) - --(0.5875,0)\dpicstop -\dpicdraw (0.316667,0.675) - --(0.194444,0.675)\dpicstop -\dpicdraw (0.198957,0.677179) - ..controls (0.245009,0.581799) and (0.245392,0.470695) - ..(0.2,0.375)\dpicstop -\dpicdraw (0.194444,0.375) - --(0.316667,0.375)\dpicstop -\dpicdraw (0.316667,0.675) - ..controls (0.417105,0.675) and (0.508302,0.616374) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.316667,0.375) - ..controls (0.417105,0.375) and (0.508302,0.433626) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.5875,0.525) circle (0.014764in)\dpicstop -\dpicdraw (0.944444,0.375) - --(0.822222,0.375)\dpicstop -\dpicdraw (0.826735,0.377179) - ..controls (0.872787,0.281799) and (0.87317,0.170695) - ..(0.827778,0.075)\dpicstop -\dpicdraw (0.822222,0.075) - --(0.944444,0.075)\dpicstop -\dpicdraw (0.944444,0.375) - ..controls (1.044883,0.375) and (1.136079,0.316374) - ..(1.177778,0.225)\dpicstop -\dpicdraw (0.944444,0.075) - ..controls (1.044883,0.075) and (1.136079,0.133626) - ..(1.177778,0.225)\dpicstop -\dpicdraw (1.215278,0.225) circle (0.014764in)\dpicstop -\dpicdraw (2.577778,1.1625) - --(2.377778,1.1625) - --(2.377778,1.4625) - --(2.577778,1.4625)\dpicstop -\dpicdraw (2.577778,1.4625) - ..controls (2.66062,1.4625) and (2.727778,1.395343) - ..(2.727778,1.3125) - ..controls (2.727778,1.229657) and (2.66062,1.1625) - ..(2.577778,1.1625)\dpicstop -\dpicdraw (2.577778,0.1875) - --(2.377778,0.1875) - --(2.377778,0.4875) - --(2.577778,0.4875)\dpicstop -\dpicdraw (2.577778,0.4875) - ..controls (2.66062,0.4875) and (2.727778,0.420343) - ..(2.727778,0.3375) - ..controls (2.727778,0.254657) and (2.66062,0.1875) - ..(2.577778,0.1875)\dpicstop -\dpicdraw (3.177778,0.4125) - --(2.977778,0.4125) - --(2.977778,0.7125) - --(3.177778,0.7125)\dpicstop -\dpicdraw (3.177778,0.7125) - ..controls (3.26062,0.7125) and (3.327778,0.645343) - ..(3.327778,0.5625) - ..controls (3.327778,0.479657) and (3.26062,0.4125) - ..(3.177778,0.4125)\dpicstop -\dpicdraw (3.668802,1.3875) - --(3.54658,1.3875)\dpicstop -\dpicdraw (3.551093,1.389679) - ..controls (3.597145,1.294299) and (3.597528,1.183195) - ..(3.552136,1.0875)\dpicstop -\dpicdraw (3.54658,1.0875) - --(3.668802,1.0875)\dpicstop -\dpicdraw (3.668802,1.3875) - ..controls (3.769241,1.3875) and (3.860437,1.328874) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.668802,1.0875) - ..controls (3.769241,1.0875) and (3.860437,1.146126) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.939636,1.2375) circle (0.014764in)\dpicstop -\dpicdraw (3.668802,0.5625) - --(3.54658,0.5625)\dpicstop -\dpicdraw (3.551093,0.564679) - ..controls (3.597145,0.469299) and (3.597528,0.358195) - ..(3.552136,0.2625)\dpicstop -\dpicdraw (3.54658,0.2625) - --(3.668802,0.2625)\dpicstop -\dpicdraw (3.668802,0.5625) - ..controls (3.769241,0.5625) and (3.860437,0.503874) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.668802,0.2625) - ..controls (3.769241,0.2625) and (3.860437,0.321126) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.939636,0.4125) circle (0.014764in)\dpicstop -\draw (2.127778,-0.241667) node[below=-2bp]{\sf {\sl To other latches}}; -\dpicdraw (0.225642,0.6) - --(0,0.6)\dpicstop -\draw (0,0.6) node[left=-2bp]{\sf D }; -\dpicdraw (0.225642,0.45) - --(0,0.45)\dpicstop -\draw (0,0.45) node[left=-2bp]{\sf E }; -\dpicdraw[fill=black](0.100642,0.45) circle (0.007874in)\dpicstop -\dpicdraw (0.100642,0.45) - --(0.100642,0.15) - --(0.85342,0.15)\dpicstop -\dpicdraw (0,0) - --(0.4125,0)\dpicstop -\dpicdraw[fill=black](0.75,1.425) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.425) - --(0.75,1.275)\dpicstop -\dpicdraw (0.75,1.275) - --(1.627778,1.275)\dpicstop -\filldraw[line width=0bp](1.602778,-0.1) - --(1.627778,-0.2) - --(1.652778,-0.1) --cycle\dpicstop -\dpicdraw (1.627778,1.275) - --(1.627778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,1.125) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.125) - --(0.75,0.975)\dpicstop -\dpicdraw (0.75,0.975) - --(1.502778,0.975)\dpicstop -\filldraw[line width=0bp](1.477778,-0.1) - --(1.502778,-0.2) - --(1.527778,-0.1) --cycle\dpicstop -\dpicdraw (1.502778,0.975) - --(1.502778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.825) - --(0.75,0.675)\dpicstop -\dpicdraw (0.75,0.675) - --(1.377778,0.675)\dpicstop -\filldraw[line width=0bp](1.352778,-0.1) - --(1.377778,-0.2) - --(1.402778,-0.1) --cycle\dpicstop -\dpicdraw (1.377778,0.675) - --(1.377778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.526089) - --(0.75,0.3) - --(0.85342,0.3)\dpicstop -\dpicdraw (2.377778,1.425) - --(1.877778,1.425)\dpicstop -\filldraw[line width=0bp](1.852778,-0.1) - --(1.877778,-0.2) - --(1.902778,-0.1) --cycle\dpicstop -\dpicdraw (1.877778,1.425) - --(1.877778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.35) - --(2.002778,1.35)\dpicstop -\filldraw[line width=0bp](1.977778,-0.1) - --(2.002778,-0.2) - --(2.027778,-0.1) --cycle\dpicstop -\dpicdraw (2.002778,1.35) - --(2.002778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.275) - --(2.127778,1.275)\dpicstop -\filldraw[line width=0bp](2.102778,-0.1) - --(2.127778,-0.2) - --(2.152778,-0.1) --cycle\dpicstop -\dpicdraw (2.127778,1.275) - --(2.127778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.2) - --(2.252778,1.2)\dpicstop -\filldraw[line width=0bp](2.227778,-0.1) - --(2.252778,-0.2) - --(2.277778,-0.1) --cycle\dpicstop -\dpicdraw (2.252778,1.2) - --(2.252778,-0.177094)\dpicstop -\dpicdraw (1.125,1.425) - --(1.877778,1.425)\dpicstop -\dpicdraw[fill=black](1.877778,1.425) circle (0.007874in)\dpicstop -\dpicdraw (1.125,1.125) - --(2.002778,1.125)\dpicstop -\dpicdraw[fill=black](2.002778,1.125) circle (0.007874in)\dpicstop -\dpicdraw (1.125,0.825) - --(2.127778,0.825)\dpicstop -\dpicdraw[fill=black](2.127778,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.625,0.525) - --(2.252778,0.526089)\dpicstop -\dpicdraw[fill=black](2.252778,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.45) - --(1.877778,0.45)\dpicstop -\dpicdraw[fill=black](1.877778,0.45) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.375) - --(2.002778,0.375)\dpicstop -\dpicdraw[fill=black](2.002778,0.375) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.3) - --(2.127778,0.3)\dpicstop -\dpicdraw[fill=black](2.127778,0.3) circle (0.007874in)\dpicstop -\dpicdraw (1.252778,0.225) - --(2.377778,0.225)\dpicstop -\dpicdraw[fill=black](1.752778,0.225) circle (0.007874in)\dpicstop -\filldraw[line width=0bp](1.727778,-0.1) - --(1.752778,-0.2) - --(1.777778,-0.1) --cycle\dpicstop -\dpicdraw (1.752778,0.225) - --(1.752778,-0.177094)\dpicstop -\dpicdraw (2.727778,1.3125) - --(3.577778,1.3125)\dpicstop -\dpicdraw (3.977136,1.2375) - --(4.102136,1.2375)\dpicstop -\dpicdraw[fill=black](4.102136,1.2375) circle (0.007874in)\dpicstop -\dpicdraw (4.102136,1.2375) - --(4.227136,1.2375)\dpicstop -\draw (4.227136,1.2375) node[right=-2bp]{\sf Q7}; -\dpicdraw (4.102136,1.2375) - --(4.102136,0.9875) - --(2.852778,0.7625)\dpicstop -\dpicdraw (2.852778,0.7625) - --(2.852778,0.6375) - --(2.977778,0.6375)\dpicstop -\dpicdraw (3.577778,1.1625) - --(2.852778,1.1625)\dpicstop -\dpicdraw (2.852778,1.1625) - --(2.852778,1.0375) - --(4.102136,0.6625)\dpicstop -\dpicdraw (4.102136,0.6625) - --(4.102136,0.413589) - --(3.977136,0.4125)\dpicstop -\dpicdraw (3.327778,0.5625) - --(3.452778,0.5625)\dpicstop -\dpicdraw (3.452778,0.5625) - --(3.452778,0.4875) - --(3.577778,0.4875)\dpicstop -\dpicdraw (2.727778,0.3375) - --(3.577778,0.3375)\dpicstop -\dpicdraw (2.977778,0.4875) - --(2.852778,0.4875)\dpicstop -\filldraw[line width=0bp](2.827778,-0.1) - --(2.852778,-0.2) - --(2.877778,-0.1) --cycle\dpicstop -\dpicdraw (2.852778,0.4875) - --(2.852778,-0.177094)\dpicstop -\dpicdraw[fill=black](2.852778,0) circle (0.007874in)\dpicstop -\dpicdraw (2.852778,0) - --(0.5875,0)\dpicstop -\end{tikzpicture} -\begin{tikzpicture}[scale=2.54] -% dpic version 2020.06.01 option -g for TikZ and PGF 1.01 -\ifx\dpiclw\undefined\newdimen\dpiclw\fi -\global\def\dpicdraw{\draw[line width=\dpiclw]} -\global\def\dpicstop{;} -\dpiclw=0.8bp -\dpiclw=0.8bp -\draw (0,0) node[left=-2bp]{\sf C }; -\draw (0,0.825) node[left=-2bp]{\sf A0 }; -\draw (0,1.125) node[left=-2bp]{\sf A1 }; -\draw (0,1.425) node[left=-2bp]{\sf A2 }; -\dpicdraw (0,1.425) - --(0.375,1.425)\dpicstop -\dpicdraw (0.55,1.425) - --(0.375,1.325) - --(0.375,1.525) - --(0.55,1.425)\dpicstop -\dpicdraw (0.5875,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.425) - --(0.875,1.425)\dpicstop -\dpicdraw (1.125,1.425) - --(0.95,1.325) - --(0.95,1.525) - --(1.125,1.425)\dpicstop -\dpicdraw (0.9125,1.425) circle (0.014764in)\dpicstop -\dpicdraw (0,1.125) - --(0.375,1.125)\dpicstop -\dpicdraw (0.55,1.125) - --(0.375,1.025) - --(0.375,1.225) - --(0.55,1.125)\dpicstop -\dpicdraw (0.5875,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0.625,1.125) - --(0.875,1.125)\dpicstop -\dpicdraw (1.125,1.125) - --(0.95,1.025) - --(0.95,1.225) - --(1.125,1.125)\dpicstop -\dpicdraw (0.9125,1.125) circle (0.014764in)\dpicstop -\dpicdraw (0,0.825) - --(0.375,0.825)\dpicstop -\dpicdraw (0.55,0.825) - --(0.375,0.725) - --(0.375,0.925) - --(0.55,0.825)\dpicstop -\dpicdraw (0.5875,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.625,0.825) - --(0.875,0.825)\dpicstop -\dpicdraw (1.125,0.825) - --(0.95,0.725) - --(0.95,0.925) - --(1.125,0.825)\dpicstop -\dpicdraw (0.9125,0.825) circle (0.014764in)\dpicstop -\dpicdraw (0.5875,0) - --(0.4125,-0.1) - --(0.4125,0.1) - --(0.5875,0)\dpicstop -\dpicdraw (0.316667,0.675) - --(0.194444,0.675)\dpicstop -\dpicdraw (0.198957,0.677179) - ..controls (0.245009,0.581799) and (0.245392,0.470695) - ..(0.2,0.375)\dpicstop -\dpicdraw (0.194444,0.375) - --(0.316667,0.375)\dpicstop -\dpicdraw (0.316667,0.675) - ..controls (0.417105,0.675) and (0.508302,0.616374) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.316667,0.375) - ..controls (0.417105,0.375) and (0.508302,0.433626) - ..(0.55,0.525)\dpicstop -\dpicdraw (0.5875,0.525) circle (0.014764in)\dpicstop -\dpicdraw (0.944444,0.375) - --(0.822222,0.375)\dpicstop -\dpicdraw (0.826735,0.377179) - ..controls (0.872787,0.281799) and (0.87317,0.170695) - ..(0.827778,0.075)\dpicstop -\dpicdraw (0.822222,0.075) - --(0.944444,0.075)\dpicstop -\dpicdraw (0.944444,0.375) - ..controls (1.044883,0.375) and (1.136079,0.316374) - ..(1.177778,0.225)\dpicstop -\dpicdraw (0.944444,0.075) - ..controls (1.044883,0.075) and (1.136079,0.133626) - ..(1.177778,0.225)\dpicstop -\dpicdraw (1.215278,0.225) circle (0.014764in)\dpicstop -\dpicdraw (2.577778,1.1625) - --(2.377778,1.1625) - --(2.377778,1.4625) - --(2.577778,1.4625)\dpicstop -\dpicdraw (2.577778,1.4625) - ..controls (2.66062,1.4625) and (2.727778,1.395343) - ..(2.727778,1.3125) - ..controls (2.727778,1.229657) and (2.66062,1.1625) - ..(2.577778,1.1625)\dpicstop -\dpicdraw (2.577778,0.1875) - --(2.377778,0.1875) - --(2.377778,0.4875) - --(2.577778,0.4875)\dpicstop -\dpicdraw (2.577778,0.4875) - ..controls (2.66062,0.4875) and (2.727778,0.420343) - ..(2.727778,0.3375) - ..controls (2.727778,0.254657) and (2.66062,0.1875) - ..(2.577778,0.1875)\dpicstop -\dpicdraw (3.177778,0.4125) - --(2.977778,0.4125) - --(2.977778,0.7125) - --(3.177778,0.7125)\dpicstop -\dpicdraw (3.177778,0.7125) - ..controls (3.26062,0.7125) and (3.327778,0.645343) - ..(3.327778,0.5625) - ..controls (3.327778,0.479657) and (3.26062,0.4125) - ..(3.177778,0.4125)\dpicstop -\dpicdraw (3.668802,1.3875) - --(3.54658,1.3875)\dpicstop -\dpicdraw (3.551093,1.389679) - ..controls (3.597145,1.294299) and (3.597528,1.183195) - ..(3.552136,1.0875)\dpicstop -\dpicdraw (3.54658,1.0875) - --(3.668802,1.0875)\dpicstop -\dpicdraw (3.668802,1.3875) - ..controls (3.769241,1.3875) and (3.860437,1.328874) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.668802,1.0875) - ..controls (3.769241,1.0875) and (3.860437,1.146126) - ..(3.902136,1.2375)\dpicstop -\dpicdraw (3.939636,1.2375) circle (0.014764in)\dpicstop -\dpicdraw (3.668802,0.5625) - --(3.54658,0.5625)\dpicstop -\dpicdraw (3.551093,0.564679) - ..controls (3.597145,0.469299) and (3.597528,0.358195) - ..(3.552136,0.2625)\dpicstop -\dpicdraw (3.54658,0.2625) - --(3.668802,0.2625)\dpicstop -\dpicdraw (3.668802,0.5625) - ..controls (3.769241,0.5625) and (3.860437,0.503874) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.668802,0.2625) - ..controls (3.769241,0.2625) and (3.860437,0.321126) - ..(3.902136,0.4125)\dpicstop -\dpicdraw (3.939636,0.4125) circle (0.014764in)\dpicstop -\draw (2.127778,-0.241667) node[below=-2bp]{\sf {\sl To other latches}}; -\dpicdraw (0.225642,0.6) - --(0,0.6)\dpicstop -\draw (0,0.6) node[left=-2bp]{\sf D }; -\dpicdraw (0.225642,0.45) - --(0,0.45)\dpicstop -\draw (0,0.45) node[left=-2bp]{\sf E }; -\dpicdraw[fill=black](0.100642,0.45) circle (0.007874in)\dpicstop -\dpicdraw (0.100642,0.45) - --(0.100642,0.15) - --(0.85342,0.15)\dpicstop -\dpicdraw (0,0) - --(0.4125,0)\dpicstop -\dpicdraw[fill=black](0.75,1.425) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.425) - --(0.75,1.275)\dpicstop -\dpicdraw (0.75,1.275) - --(1.627778,1.275)\dpicstop -\filldraw[line width=0bp](1.602778,-0.1) - --(1.627778,-0.2) - --(1.652778,-0.1) --cycle\dpicstop -\dpicdraw (1.627778,1.275) - --(1.627778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,1.125) circle (0.007874in)\dpicstop -\dpicdraw (0.75,1.125) - --(0.75,0.975)\dpicstop -\dpicdraw (0.75,0.975) - --(1.502778,0.975)\dpicstop -\filldraw[line width=0bp](1.477778,-0.1) - --(1.502778,-0.2) - --(1.527778,-0.1) --cycle\dpicstop -\dpicdraw (1.502778,0.975) - --(1.502778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.825) - --(0.75,0.675)\dpicstop -\dpicdraw (0.75,0.675) - --(1.377778,0.675)\dpicstop -\filldraw[line width=0bp](1.352778,-0.1) - --(1.377778,-0.2) - --(1.402778,-0.1) --cycle\dpicstop -\dpicdraw (1.377778,0.675) - --(1.377778,-0.177094)\dpicstop -\dpicdraw[fill=black](0.75,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (0.75,0.526089) - --(0.75,0.3) - --(0.85342,0.3)\dpicstop -\dpicdraw (2.377778,1.425) - --(1.877778,1.425)\dpicstop -\filldraw[line width=0bp](1.852778,-0.1) - --(1.877778,-0.2) - --(1.902778,-0.1) --cycle\dpicstop -\dpicdraw (1.877778,1.425) - --(1.877778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.35) - --(2.002778,1.35)\dpicstop -\filldraw[line width=0bp](1.977778,-0.1) - --(2.002778,-0.2) - --(2.027778,-0.1) --cycle\dpicstop -\dpicdraw (2.002778,1.35) - --(2.002778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.275) - --(2.127778,1.275)\dpicstop -\filldraw[line width=0bp](2.102778,-0.1) - --(2.127778,-0.2) - --(2.152778,-0.1) --cycle\dpicstop -\dpicdraw (2.127778,1.275) - --(2.127778,-0.177094)\dpicstop -\dpicdraw (2.377778,1.2) - --(2.252778,1.2)\dpicstop -\filldraw[line width=0bp](2.227778,-0.1) - --(2.252778,-0.2) - --(2.277778,-0.1) --cycle\dpicstop -\dpicdraw (2.252778,1.2) - --(2.252778,-0.177094)\dpicstop -\dpicdraw (1.125,1.425) - --(1.877778,1.425)\dpicstop -\dpicdraw[fill=black](1.877778,1.425) circle (0.007874in)\dpicstop -\dpicdraw (1.125,1.125) - --(2.002778,1.125)\dpicstop -\dpicdraw[fill=black](2.002778,1.125) circle (0.007874in)\dpicstop -\dpicdraw (1.125,0.825) - --(2.127778,0.825)\dpicstop -\dpicdraw[fill=black](2.127778,0.825) circle (0.007874in)\dpicstop -\dpicdraw (0.625,0.525) - --(2.252778,0.526089)\dpicstop -\dpicdraw[fill=black](2.252778,0.526089) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.45) - --(1.877778,0.45)\dpicstop -\dpicdraw[fill=black](1.877778,0.45) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.375) - --(2.002778,0.375)\dpicstop -\dpicdraw[fill=black](2.002778,0.375) circle (0.007874in)\dpicstop -\dpicdraw (2.377778,0.3) - --(2.127778,0.3)\dpicstop -\dpicdraw[fill=black](2.127778,0.3) circle (0.007874in)\dpicstop -\dpicdraw (1.252778,0.225) - --(2.377778,0.225)\dpicstop -\dpicdraw[fill=black](1.752778,0.225) circle (0.007874in)\dpicstop -\filldraw[line width=0bp](1.727778,-0.1) - --(1.752778,-0.2) - --(1.777778,-0.1) --cycle\dpicstop -\dpicdraw (1.752778,0.225) - --(1.752778,-0.177094)\dpicstop -\dpicdraw (2.727778,1.3125) - --(3.577778,1.3125)\dpicstop -\dpicdraw (3.977136,1.2375) - --(4.102136,1.2375)\dpicstop -\dpicdraw[fill=black](4.102136,1.2375) circle (0.007874in)\dpicstop -\dpicdraw (4.102136,1.2375) - --(4.227136,1.2375)\dpicstop -\draw (4.227136,1.2375) node[right=-2bp]{\sf Q7}; -\dpicdraw (4.102136,1.2375) - --(4.102136,0.9875) - --(2.852778,0.7625)\dpicstop -\dpicdraw (2.852778,0.7625) - --(2.852778,0.6375) - --(2.977778,0.6375)\dpicstop -\dpicdraw (3.577778,1.1625) - --(2.852778,1.1625)\dpicstop -\dpicdraw (2.852778,1.1625) - --(2.852778,1.0375) - --(4.102136,0.6625)\dpicstop -\dpicdraw (4.102136,0.6625) - --(4.102136,0.413589) - --(3.977136,0.4125)\dpicstop -\dpicdraw (3.327778,0.5625) - --(3.452778,0.5625)\dpicstop -\dpicdraw (3.452778,0.5625) - --(3.452778,0.4875) - --(3.577778,0.4875)\dpicstop -\dpicdraw (2.727778,0.3375) - --(3.577778,0.3375)\dpicstop -\dpicdraw (2.977778,0.4875) - --(2.852778,0.4875)\dpicstop -\filldraw[line width=0bp](2.827778,-0.1) - --(2.852778,-0.2) - --(2.877778,-0.1) --cycle\dpicstop -\dpicdraw (2.852778,0.4875) - --(2.852778,-0.177094)\dpicstop -\dpicdraw[fill=black](2.852778,0) circle (0.007874in)\dpicstop -\dpicdraw (2.852778,0) - --(0.5875,0)\dpicstop -\end{tikzpicture} diff --git a/graphics/circuit_macros/examples/nsvg/dev/tikztosvg b/graphics/circuit_macros/examples/nsvg/dev/tikztosvg deleted file mode 100644 index 8e9523347c..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/tikztosvg +++ /dev/null @@ -1,181 +0,0 @@ -#!/bin/bash - -puts() -{ - echo "[$1] $2" -} - -error() -{ - puts "ERROR" "$1" r - - if [ -n "$2" ] - then - exit $2 - else - exit 1 - fi -} - -message() -{ - puts "TIKZTOSVG" "$1" g -} - -showHelp() -{ - man tikztosvg - exit 0 -} - -showVersion() -{ - echo 0.1.0 - exit 0 -} - -if [ -z "$(which xelatex)" ] -then - error "xelatex could not be found" -fi - -if [ -z "$(which pdf2svg)" ] -then - error "pdf2svg could not be found" -fi - -# Parsing the arguments -PACKAGES=() -while [ $# -gt 1 ] -do - case "$1" in - -h|--help) - showHelp - ;; - -v|--version) - showVersion - ;; - -p|--package) - if [ -z "$2" ] - then - error "Unnexpected EOF" - else - PACKAGES+=("$2") - shift - shift - fi - ;; - -o|--output) - if [ -n "$OUTPUT" ] - then - error "The output path was specified multiple times" - else if [ -z "$2" ] - then - error "Unexpected EOF" - exit 1 - else - OUTPUT="$2" - shift - shift - fi - fi - ;; - -q|--quit) - QUIET=1 - shift - ;; - *) - error "Unexpected token: \"$1\"" - ;; - esac -done - -case "$1" in - -h|--help) - showHelp - ;; - -v|--version) - showVersion - ;; - "") - error "No input path provided" - ;; - *) - INPUT="$1" -esac - -if [ -z "$OUTPUT" ] -then - OUTPUT="$(echo $(basename $INPUT) | cut -d "." -f1)" -fi - -TEMP_DIR="$(mktemp -d)" -TEX_FILE="$TEMP_DIR/tmp.tex" - -# Generate the LaTeX document -echo "\documentclass[crop,tikz,multi=false]{standalone}" > $TEX_FILE - -for PACKAGE in "${PACKAGES[@]}" -do - echo "\usepackage{$PACKAGE}" >> $TEX_FILE -done - -echo "\begin{document}" >> $TEX_FILE -echo "\huge" >> $TEX_FILE - -cat $INPUT >> $TEX_FILE - -if [ $? -ne 0 ] -then - rm $TEMP_DIR -r - error "File not found: $INPUT" -fi - -echo "\end{document}" >> $TEX_FILE - -if [ -z "$QUIET" ] -then - message "Rendering the LaTeX document. . ." - xelatex -output-directory=$TEMP_DIR $TEX_FILE -else - xelatex -halt-on-error -output-directory=$TEMP_DIR $TEX_FILE 1> /dev/null 2>&1 -fi - -S=$? -if [ $S -ne 0 ] -then - rm $TEMP_DIR -r - if [ -z "$QUIET" ] - then - error "xelatex exited with code $S" $S - else - exit $S - fi -fi - -if [ -z "$QUIET" ] -then - message "Converting the output to SVG. . ." -fi - -pdf2svg "$TEMP_DIR/tmp.pdf" $OUTPUT 1 - -S=$? -if [ $S -ne 0 ] -then - rm $TEMP_DIR -r - if [ -z "$QUIET" ] - then - error "pdf2svg exited with code $S" $S - else - exit $S - fi -fi - -if [ -z "$QUIET" ] -then - message "Done!" -fi - -rm "$TEMP_DIR" -r - diff --git a/graphics/circuit_macros/examples/nsvg/dev/tstSVG.htmx b/graphics/circuit_macros/examples/nsvg/dev/tstSVG.htmx deleted file mode 100644 index 9e1884c146..0000000000 --- a/graphics/circuit_macros/examples/nsvg/dev/tstSVG.htmx +++ /dev/null @@ -1,62 +0,0 @@ - - - - - - -SVG Examples: Circuit_macros Version XXX - - - - - -

SVG Circuit_macros examples, Version XXX

-
- -

-These diagrams are the result of applying pdf2svg to examples.pdf. -

- Click on the link to view the source of each diagram. -

-
- -define(`for_',`ifelse(eval(`$1'!=(`$2'+(`$3'))),1,`pushdef(`m4x',`$1') $4 - popdef(`m4x')for_(eval(`$1'+(`$3')),`$2',`$3',`$4')')') - -define(`cfig',` -

- - - - - - - - - -
- - - -cfig(test) -#for_(1,46,1, -#cfig(examples_```'''m4x) -#) - - - diff --git a/graphics/circuit_macros/examples/nsvg/examples.pdf b/graphics/circuit_macros/examples/nsvg/examples.pdf deleted file mode 100644 index b52e15195e..0000000000 Binary files a/graphics/circuit_macros/examples/nsvg/examples.pdf and /dev/null differ diff --git a/graphics/circuit_macros/examples/nsvg/examplesSVG.htmx b/graphics/circuit_macros/examples/nsvg/examplesSVG.htmx deleted file mode 100644 index bb2265a90f..0000000000 --- a/graphics/circuit_macros/examples/nsvg/examplesSVG.htmx +++ /dev/null @@ -1,70 +0,0 @@ - - - - - - -SVG Examples: Circuit_macros Version XXX - - - - - -

SVG Circuit_macros examples, Version XXX

-
- -

- These diagrams are in .svg format. - Pdf - and - png - versions are also available. - The PDF equivalent can be found in examples.pdf of the distribution. -

-

- Click on the link to view the source of each diagram. -

-
- -define(`for_',`ifelse(eval(`$1'!=(`$2'+(`$3'))),1,`pushdef(`m4x',`$1') $4 - popdef(`m4x')for_(eval(`$1'+(`$3')),`$2',`$3',`$4')')') - -define(`cfig',` -

- - - - - - - - - -
- - -

-These diagrams are the result of applying pdf2svg to examples.pdf. - - -for_(1,46,1, -cfig(examples_```'''m4x) -) - - - diff --git a/graphics/circuit_macros/examples/oFlow.m4 b/graphics/circuit_macros/examples/oFlow.m4 deleted file mode 100644 index f4fa766f1a..0000000000 --- a/graphics/circuit_macros/examples/oFlow.m4 +++ /dev/null @@ -1,108 +0,0 @@ -.PS -# Flow.m4 -gen_init -ifdef(`FlowchartDefs_',,`include(FlowchartDefs.m4)') - -# Could use xcolor with option dvipsnames but define color here for portability: -define(`Thistle',`rgbstring(0.85,0.75,0.85)')dnl -define(`RubineRed',`rgbstring(0.81,0,0.35)')dnl -define(`YellowGreen',`rgbstring(0.68,1,0.18)')dnl -define(`SeaGreen',`rgbstring(0.13,0.70,0.67)')dnl -define(`Goldenrod',`rgbstring(0.85,0.65,0.13)')dnl - - linethick_(1.0) - arrowwid = 0.05 - arrowht = 0.1 - fillval = 0.8 - down - -Case: Fcase(, - "Test 1",[Fbox("Task 1",, shaded Thistle); W:last [].W; N:last [].N - arrow down linewid/3 from last [].S - Fbox("Task 1.5",, shaded Thistle) with .N at Here - E:last [].E; S:last [].S], - "Test 2",Fbox("Task 2" "is bigger", wid fboxwid*1.2 ht fboxht*3/2, \ - shaded SeaGreen), - "Test 3",Fbox("Task 3",, shaded RubineRed)dnl - ) - - "\sl .N" at Case.N rjust above; "\sl .S" at Case.S rjust below - "\sl .E" at Case.E ljust; "\sl .W" at Case.W rjust - "\sl Case statement" below at Case.s+(0,-0.2) - move to Case.nw+(-12bp__,10bp__) - -Whiledo: Fwhiledo("$i < n$",,,Fbox("Task"),"T" above ljust at Test.E) \ - with .nw at Case.ne+(0.25,0) - - "\sl .N" at Whiledo.N rjust; "\sl .S" at Whiledo.S rjust below - "\sl .E" at Whiledo.E ljust; "\sl .W" at Whiledo.W rjust - "\sl While-do" below at Whiledo.s+(0,-0.2) - -Repeatuntil: Frepeatuntil("$n \geq 5$",,,Fbox("Task"), - "T" at Test.E above ljust) with .nw at Whiledo.sw + (0.25,-1) - - "\sl .N" at Repeatuntil.N rjust above; "\sl .S" at Repeatuntil.S rjust below - "\sl .E" at Repeatuntil.E ljust; "\sl .W" at Repeatuntil.W rjust - "\sl Repeat-until" below at Repeatuntil.s+(0,-0.2) - -Ifthenelse: Fifthenelse("$A /N?! : dimethylamino + -update MCF manual,example + +[ver. 4.54 / 2020-12-12] -fix bug in report output -update MCF manual,example diff --git a/graphics/mcf2graph/README b/graphics/mcf2graph/README index 2b8ac639e0..f44677ee94 100644 --- a/graphics/mcf2graph/README +++ b/graphics/mcf2graph/README @@ -1,7 +1,7 @@ ******************************************************************************** mcf2graph : Convert Molecular Coding Format to graphics with METAFONT/METAPOST Author : Akira Yamaji - version : 4.54 2020-12-12 + version : 4.55 2021-01-03 E-mail : mcf2graph@gmail.com Located at : http://www.ctan.org/pkg/mcf2graph ******************************************************************************** diff --git a/graphics/mcf2graph/mcf2graph.mf b/graphics/mcf2graph/mcf2graph.mf index 6fa0862271..49c50f0263 100644 --- a/graphics/mcf2graph/mcf2graph.mf +++ b/graphics/mcf2graph/mcf2graph.mf @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% mcf2graph ver 4.54 Copyright (c) 2013-2020 Akira Yamaji +% mcf2graph ver 4.55 Copyright (c) 2013-2021 Akira Yamaji % % Permission is hereby granted, free of charge, to any person obtaining a copy of this software % and associated documentation files (the "Software"), to deal in the Software without restriction, @@ -38,11 +38,11 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% tracingstats:=1; message "---------------------------------------------"; -message "This is mcf2graph ver 4.54 2020.12"; +message "This is mcf2graph ver 4.55 2021.01"; message "---------------------------------------------"; %------------------------------------------------------------------------------------------------- -newinternal cntA,cntB,cntM,minX,minY,sftX,sftY,com,par,nA,nB,nC,nD,nE,nF,nN,nP,nU,nP,nL,nR,nS,nW, - xpos,ypos; +newinternal cntA,cntB,cntM,minX,minY,maxX,maxY,sftX,sftY,com,par,envT,envB,lenT,lineT,angT,rotT, + crR,nA,nB,nC,nD,nE,nF,nN,nP,nU,nP,nL,nR,nS,nW,xpos,ypos,markA,markB,saveA,saveB,bondL; numeric save_num[],comD[][],parD[][],adrD[][],cntD[],tbl_atom[],tbl_group[][],f_char[], tbl_atom_wt[],tbl_atom_mi[],tbl_char_wd[],tbl_char_ht[],andA[],and_rot[],chargeA[], com_group[][],par_group[][],cnt_group[],colorA[],colorB[],sumA[],bondC[],hideH[], @@ -207,8 +207,8 @@ def parameter_list= offset_bond_gap,thickness_fframe,thickness_mframe,thickness_aframe,offset_thickness, numberA_start,numberA_end,numberB_start,numberB_end,defaultsize,defaultscale,labeloffset,mangle, fsize,fmargin,msize,mposition,defaultfont,atomfont,dottedline_gap, - Me,Et,Pr,Bu,iPr,tBu,CF3,CCl3,CBr3,CH3,NH,NH2,NO2,OH,CHO,COOH,CN,SH,OMe,OEt,SMe,SEt, - !CH3,!NH2,!NO2,!OH,!CHO,!COOH,!CN,!SH,!2CH3,!2NH2,!2NO2,!2OH,!2CHO,!2COOH,!2CN,!2SH + Me,Et,Pr,Bu,iPr,tBu,CH3,NH,NH2,NO2,OH,CHO,COOH,CN,SH, + !CH3,!NH2,!NO2,!OH,!CHO,!COOH,!CN,!SH enddef; %-------------------------------------------------------------------------------------------------- def ]]]=] ] ] enddef; @@ -338,13 +338,12 @@ def set_def_MC= tertiarydef a~b == if known b:: (_tmp_line,b),a else:: _nop,a fi enddef; tertiarydef a>b == if known b:: (_tmp_env,b),a else:: _nop,a fi enddef; def # == _connect_at enddef; def @ == _jump_at enddef; primarydef a@#b == a:@,b:# enddef; - def \ == @,0 enddef; def \\ == \~dm enddef; - def *\ == \~wf enddef; def \* == \~zf enddef; def *\* == \~wv enddef; + def \ == @,0 enddef; def \\ == \~dm enddef; def *\ == \~wf enddef; def \* == \~zf enddef; + def *\* == \~wv enddef; def | == (_com,_mark) enddef; def || == (_com,_moff) enddef; def ||| == (_com,_term) enddef; def |< == (_com,_len_s) enddef; def >| == (_com,_len_e) enddef; def |<< == (_com,_len_ss) enddef; def >>| == (_com,_len_ee) enddef; - def |=primary n == |<,(_chg_len,n) enddef; def =| == >| enddef; - def :| == (_com,_rest) enddef; + def |=primary n == |<,(_chg_len,n) enddef; def =| == >| enddef; def :| == (_com,_rest) enddef; def /secondary n == if known n:: (_group_si,n) else:: _nop fi enddef; def //secondary n == /n~dm enddef; def */secondary n == /n~wf enddef; def /*secondary n == /n~zf enddef; def */*secondary n == /n~wv enddef; @@ -412,7 +411,7 @@ enddef; %------------------------------------------------------------------------------------------------- def fuse_ring_bonds(expr a,b,c) = CP(_jp_bond,xpart(a)) CP(_rot_ang,180) CP(_com,_len_s) - if b==6:: CP(_chg_len,_ring_len) for i==1 upto c-1:: CP(_mk_bond,60) endfor + if b==6:: CP(_chg_len,1) for i==1 upto c-1:: CP(_mk_bond,60) endfor elseif b==5:: if c==2:: CP(_chg_len,1.25) CP(_mk_bond,80) elseif c==3:: CP(_chg_len,1.1) CP(_mk_bond,78) CP(_mk_bond,72) fi elseif b==4:: CP(_chg_len,1.225) CP(_mk_bond,105) fi @@ -464,9 +463,18 @@ vardef change_atom(expr a,b)= parts_int:=parts_int+1; nCP:=0; if numeric b:: - if (b>=H)and(b<=U):: CPe(a)(_chg_atom,b) - ef b==NH:: CPe(a)(_chg_atom,N) CP(_tmp_line,nl) - CP(_com,_group_s) CPx(a)(_group_si,H) CP(_com,_group_e) + if (b GT parts_emb_start)and(b<=parts_atom_end):: CPe(a)(_chg_atom,b) + ef b==NH:: CPe(a)(_chg_atom,N) CP(_tmp_line,nl) + CP(_com,_group_s) CPx(a)(_group_si,H) CP(_com,_group_e) + ef b==N!:: CPe(a)(_chg_atom,N) CP(_com,_group_s) CPx(a)(_group_si,_) CP(_com,_group_e) + ef b==N!2:: CPe(a)(_chg_atom,N) CP(_com,_group_s) CPx(a)(_group_si,!) CP(_com,_group_e) + ef b==??:: CP(_com,_group_s) CP(_tmp_rot,35) CPx(a)(_group_si,_) + CP(_tmp_rot,-35) CPx(a)(_group_si,_) CP(_com,_group_e) + ef b==SOO:: CPe(a)(_chg_atom,S) CP(_com,_group_s) + CP(_tmp_line,dm) CP(_tmp_rot,35) CPx(a)(_group_si,O) + CP(_tmp_line,dm) CP(_tmp_rot,-35) CPx(a)(_group_si,O) CP(_com,_group_e) + ef b==SO:: CPe(a)(_chg_atom,S) CP(_com,_group_s) CP(_tmp_line,dm) + CPx(a)(_group_si,O) CP(_com,_group_e) ef b==_jump_at:: CP(_jp_atom,a) ef b==_connect_at:: CP(_cyc,a) fi @@ -739,9 +747,8 @@ enddef; %------------------------------------------------------------------------------------------------- def MC(text TXT)= begingroup - save markA,markB,saveA,saveB,f_bra,envT,envB,lenT,lineT,strAT,cnt_group,bondL,temp_lenE, - temp_lenF,temp_cntB,f_end,f_term,rotT,f_at,f_lineT,f_rotT,f_lenT,f_envT,angT, - maxX,maxY,sA,sC,factor,m_wd,m_ht,crR,defaultsize,defaultscale; + save f_bra,strAT,cnt_group,temp_lenE,temp_lenF,temp_cntB,f_end,f_term,f_at,f_lineT,f_rotT, + f_lenT,f_envT,sA,sC,factor,m_wd,m_ht,defaultsize,defaultscale; %----------------------------------------------------------------------------------------------- string sA,sC; %----------------------------------------------------------------------------------------------- @@ -1251,7 +1258,7 @@ enddef; %================================================================================================= parts_int:=parts_emi_start; parts_cnt:=parts_emb_start; -%================================================================================================= +%------------------------------------------------------------------------------------------------- C:= STa("C" ,12.0107, 12.0000000); H:= STa("H" , 1.00794, 1.00782503223); Al:=STa("{Al}",26.9815, 26.98153853); As:=STa("{As}",74.9216, 74.92159457); B:= STa("B" ,10.811, 11.00930536); Br:=STa("{Br}",79.904, 78.9183376); @@ -1271,54 +1278,54 @@ U:= STa("U", 238.0289, 238.05079); Zn:=STa("{Zn}",65.409, 63.929142 tbl_atom_end:=tbl_cnt; %------------------------------------------------------------------------------------------------- CH3:=STb("C{H_3_}")(C,H,H,H); CH2:=STb("C{H_3_}")(C,H,H); CN:=STb("CN")(C,N); OH:=STb("OH")(O,H); -CF3:=STb("C{F_3_}")(C,F,F,F); COOH:=STb("COOH")(C,O,O,H); SH:= STb("SH")(S,H); -CHO:= STb("CHO")(C,H,O); NO2:=STb("N{O_2_}")(N,O,O); NH2:=STb("N{H_2_}")(N,H,H); -H2:= STb("{H_2_}")(H,H); ONa:=STb("O{Na}")(O,Na); SO3:= STb("S{O_3_}")(S,O,O,O); +COOH:=STb("COOH")(C,O,O,H); SH:= STb("SH")(S,H); CHO:=STb("CHO")(C,H,O); +NO2:=STb("N{O_2_}")(N,O,O); NH2:=STb("N{H_2_}")(N,H,H); +ONa:=STb("O{Na}")(O,Na); SO3Na:=STb("S{O_3_}{Na}")(S,O,O,O,Na); +%------------------------------------------------------------------------------------------------- +str_plus:=str_cnt; +N[1]:=STb("{N^+^}")(N); H[1]:=STb("{H^+^}")(H); Na[1]:=STb("{Na^+^}")(Na); K[1]:=STb("{K^+^}")(K); +NH3[1]:= STb("{N^+^}{H_3_}")(N,H,H,H); NH4[1]:= STb("{N^+^}{H_4_}")(N,H,H,H,H); +S[1]:= STb("{S^+^}")(S); +str_minus:=str_cnt; +O[-1]:=STb("{O^-^}")(O); COO[-1]:=STb("COO^-^")(C,O,O); SO3[-1]:=STb("S{O_3_}^-^")(S,O,O,O); +Cl[-1]:=STb("{Cl^-^}")(Cl); Br[-1]:=STb("{Br^-^}")(Br); I[-1]:=STb("{I^-^}")(I); %------------------------------------------------------------------------------------------------- -Br[-1]:=STb("{Br^-^}")(Br); Cl[-1]:=STb("{Cl^-^}")(Cl); -N[1]:= STb("{N^+^}")(N); N[-1]:= STb("{N^-^}")(N); -O[1]:= STb("{O^p^}")(O); O[-1]:= STb("{O^-^}")(O); -S[1]:= STb("{S^p^}")(S); S[-1]:= STb("{S^m^}")(S); +str_minus_end:=str_cnt; tbl_group_end:=tbl_cnt; +parts_atom_end:=parts_cnt; %================================================================================================= -lr:='(60 for i==1 upto 10:: ,-60,60 endfor); rl:='(-60,lr); for i==3 upto 20: ?[i]:='(|<<,(_get_len,_ring_len),<((-180 DIV i)-90) for j==2 upto i:: ,(360 DIV i) endfor,(_cyc_sB,1-i),>>|); endfor Ph:=Ph1:='(?6,-2=dl,-4=dl,-6=dl); Ph2:='(?6,-1=dl,-3=dl,-5=dl); !:=!1:='((_mk_bond,_arg_ang)); !!:='(!~db); !!!:='(!~tm); for i==2 upto 20: ![i]:='(|<<,(_get_len,_tmp_len),! for j==2 upto i::,! endfor ,>>|); endfor -Me:='(); Et:='(!); Pr:='(!,!); Bu:='(!,!,!); -for i=4,5,6: for j=2 upto i-2: ?[i][j]:='((_fuse,i),(j,0)); endfor endfor -for i=5,6,7,8: for j=11 upto 15: ?[i][j]:='((_fuse,i),(j,0)); endfor endfor +Me:='(); Et:='(!); Pr:='(!,!); Bu:='(!,!,!); iPr:=?!:='(/_,!); tBu:=??!:='(/_,/_^60,60); %------------------------------------------------------------------------------------------------- -NH:='(N,/H~nl); NMe:=N!:='(N,/_); iPr:=Me!:='(/_,60); tBu:='(/_,/_^60,60); -SO:='(S,//O); SOO:='(S,//O^-35,//O^35); -OMe:=O!:='(O,!); OEt:=O!2:='(O,!,!); OPr:=O!3:='(O,!,!,!); OiPr:=OMe!:='(O,!,iPr); -SMe:=S!:='(S,!); SEt:=S!2:='(S,!,!); SPr:=S!3:='(S,!,!,!); SiPr:=SMe!:='(S,!,iPr); +NH:='(N,/H~nl); N!:='(N,/_); N!2:='(N,/!); SO:='(S,//O); SOO:='(S,//O^-35,//O^35); +O!:='(O,!); O!2:='(O,!,!); O!3:='(O,!,!,!); O!?!:='(O,!,?!); O!??!:='(O,!,??!); +S!:='(S,!); S!2:='(S,!,!); S!3:='(S,!,!,!); S!?!:='(S,!,?!); S!??!:='(S,!,??!); %------------------------------------------------------------------------------------------------- -COO:='(//O,!,O); COOMe:=COO!:='(COO,!); COOEt:=COO!2:='(COO,!,!); COOiPr:=COOMe!:='(COO,!,iPr); -COOPr:=COO!3:='(COO,!,!,!); COOtBu:='(COO,!,tBu); -COMe:=CO!:='(//O,!); COEt:=CO!2:='(//O,!,!); COPr:=CO!3:='(//O,!,!,!); -OCOMe:=OCO!:='(O,!,//O,!); NMeMe:=NMe!:=N!_:='(N!,!); NMeEt:=NMe!2:=N!2_:='(N!,!,!); -NHMe:=NH!:='(NH,!); NHEt:=NH!2:='(NH,!,!); NHPr:=NH!3:='(NH,!,!,!); +COO:='(//O,!,O); COO!:='(COO,!); COO!2:='(COO,!,!); COO!??:='(COO,!,?!); COO!3:='(COO,!,!,!); +CO!:='(//O,!); CO!2:='(//O,!,!); CO!3:='(//O,!,!,!); OCO!:='(O,!,//O,!); +N?!:='(N!,!); N?!2:='(N!,!,!); NH!:='(NH,!); NH!2:='(NH,!,!); NH!3:='(NH,!,!,!); +NH!?!:='(NH,!,?!); NHCO!:='(NH,!,//O,!); CONH2:='(//O,!,NH2); ??:='(/_^35,/_^-35); %------------------------------------------------------------------------------------------------- -!OH:='(!,OH); !SH:='(!,SH); !NH2:='(!,NH2); -!COMe:=!CO!:='(!,//O,!); !COEt:=!CO!2:='(!,CO!2); !COPr:=!CO!3:='(!,CO!3); -!OMe:=!O!:='(!,O!); !OEt:=!O!2:='(!,O!2); !OPr:=!O!3:='(!,O!3); !OiPr:=!OMe!:='(!,OMe!); -!SMe:=!S!:='(!,S!); !SEt:=!S!2:='(!,S!2); !SPr:=!S!3:='(!,S!3); !SiPr:=!SMe!:='(!,SMe!); -!NHMe:=!NH!:='(!,NH!); !NHEt:=!NH!2:='(!,NH!2); !NHPr:=!NH!3:='(!,NH!3); -!COOH:='(!,COOH); !COOMe:=!COO!:='(!,COO!); !COOEt:=!COO!2:='(!,COO!2); -!CH3:='(!,CH3); !CN:='(!,CN); !iPr:=!Me!:='(!,iPr); !tBu:='(!,tBu); +!OH:='(!,OH); !SH:='(!,SH); !NH2:='(!,NH2); !CO!:='(!,//O,!); !CO!2:='(!,CO!2); !CO!3:='(!,CO!3); +!O!:='(!,O!); !O!2:='(!,O!2); !O!3:='(!,O!3); +!S!:='(!,S!); !S!2:='(!,S!2); !S!3:='(!,S!3); +!NH!:='(!,NH!); !NH!2:='(!,NH!2); !NH!3:='(!,NH!3); +!COOH:='(!,COOH); !COO!:='(!,COO!); !COO!2:='(!,COO!2); +!CH3:='(!,CH3); !CN:='(!,CN); !?!:='(!,?!); !??!:='(!,??!); !CHO:='(!,CHO); !NO2:='(!,NO2); !Cl:='(!,Cl); !Br:='(!,Br); !F:='(!,F); !?3:='(!,?3); !?4:='(!,?4); !?5:='(!,?5); !?6:='(!,?6); !?7:='(!,?7); !?8:='(!,?8); !Ph:='(!,Ph); %------------------------------------------------------------------------------------------------- -!2OH:='(!,!,OH); !2COOH:='(!,!,COOH); !2NH2:='(!,!,NH2); !2CN:='(!,!,CN); !2NO2:='(!,!,NO2); -!2CH3:='(!,!,CH3); !2CHO:='(!,!,CHO); !2SH:='(!,!SH); !2tBu:='(!,!,tBu); !2Cl:='(!,!,Cl); -!2?5:='(!,!,?5); !2?6:='(!,!,?6); !2Ph:='(!,!,Ph); -%------------------------------------------------------------------------------------------------- CF2:='(/F,60,F); CCl2:='(/Cl,60,Cl); CBr2:='(/Br,60,Br); CF3:='(/F,/F^60,60,F); CCl3:='(/Cl,/Cl^60,60,Cl); CBr3:='(/Br,/Br^60,60,Br); %------------------------------------------------------------------------------------------------- +lr:='(60 for i==1 upto 10:: ,-60,60 endfor); rl:='(-60,lr); +for i=4,5,6: for j=2 upto i-2: ?[i][j]:='((_fuse,i),(j,0)); endfor endfor +for i=5,6,7,8: for j=11 upto 15: ?[i][j]:='((_fuse,i),(j,0)); endfor endfor +%------------------------------------------------------------------------------------------------- R:='("R"); R1:='("{R^1^}"); R2:='("{R^2^}"); R3:='("{R^3^}"); R4:='("R^4^"); R5:='("{R^5^}"); R6:='("R6"); R7:='("{R^7^}"); R8:='("{R^8^}"); R9:='("{R^9^}"); R10:='("R^10^"); R11:='("{R^11^}"); %------------------------------------------------------------------------------------------------- @@ -1327,14 +1334,13 @@ xCHO:='(//O,!,H); xCOOH:='(//O,!,O,!,H); xCN:='(!~tm,N); xSH:='(S,!,H); %================================================================================================= init_par(parameter_list); %------------------------------------------------------------------------------------------------- -%%message "parts_emb =" & decimal(parts_emb_start) &" => " & decimal(parts_cnt); -%%message "parts_emi =" & decimal(parts_emi_start) &" => " & decimal(parts_int); +%%%%message "parts_emb =" & decimal(parts_emb_start) &" => " & decimal(parts_cnt); +%%%%message "parts_emi =" & decimal(parts_emi_start) &" => " & decimal(parts_int); %------------------------------------------------------------------------------------------------- def expand_set= CH3:=xCH3; NH:=xNH; NH2:=xNH2; NO2:=xNO2; OH:=xOH; CHO:=xCHO; COOH:=xCOOH; CN:=xCN; SH:=xSH; !CH3:='(!,CH3); !OH:='(!,OH); !NH2:='(!,NH2); !CHO:='(!,CHO); !COOH:='(!,COOH); !CN:='(!,CN); - !SH:='(!,SH); !NO2:='(!,NO2); !2CH3:='(!,!CH3); !2OH:='(!,!OH); !2NH2:='(!,!NH2); - !2CHO:='(!,!CHO); !2COOH:='(!,!COOH); !2CN:='(!,!CN); !2SH:='(!,!SH); !2NO2:='(!,!NO2); + !SH:='(!,SH); !NO2:='(!,NO2); enddef; %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% def char_size_set(expr WD)(expr HT)(expr STR)= @@ -1503,7 +1509,9 @@ vardef fdl(expr n)(expr s)=fixed_l(n)(decimal(s)) enddef; def warning(expr s)= message "% "&decimal(char_num)&fdr(3)(incr warning_cnt)&")"&s; enddef; %------------------------------------------------------------------------------------------------- def warning_bond(expr a)= - warning("A"&decimal(a)&" ( "&fixed_l(8)(strD[numS[a]])&") has"&fdr(2)(bond_cnt)&" bonds"); + if andA[a]=0: + warning("A"&decimal(a)&" ( "&fixed_l(8)(strD[numS[a]])&") has"&fdr(2)(bond_cnt)&" bonds"); + fi enddef; %------------------------------------------------------------------------------------------------- vardef cut_paren(expr ATOM)= @@ -1515,24 +1523,28 @@ enddef; %================================================================================================= def proc_calc= begingroup - save warning_cnt,MWp,knownA,bondC,tmp_wtp,bond_cnt,cnt_hide_H; - cnt_hide_H:=warning_cnt:=num_MW:=num_MI:=MWp:=tbl_atom_max:=0; + save warning_cnt,MWp,knownA,bondC,tmp_wtp,bond_cnt,hideH_cnt; + hideH_cnt:=warning_cnt:=num_MW:=num_MI:=MWp:=tbl_atom_max:=0; nE:=parts_emb_start; for i=1 upto tbl_atom_end: sumA[i]:=0; endfor for i=1 upto cntA: + if (numS[i]>str_plus)and(numS[i]<=str_minus): chargeA[i]:=1; + elseif (numS[i]>str_minus)and(numS[i]<=str_minus_end): chargeA[i]:=-1; + fi knownA:=bond_cnt:=0; nS:=numS[i]; for j=1 upto cntB: if (lineB[j]>=dl)and(lineB[j]<=dm): bondC[j]:=2; ef lineB[j]=tm: bondC[j]:=3; ef (lineB[j]=vf)or(lineB[j]=vb): bondC[j]:=0; + ef lineB[j]=0: bondC[j]:=0; else: bondC[j]:=1; fi if (sB[j]=i)or(eB[j]=i): bond_cnt:=bond_cnt+bondC[j]; fi endfor Bcnt[i]:=bond_cnt; if ((nS=0)or(nS=(C-nE)))and(bond_cnt<4): - hideH[i]:=4-bond_cnt; cnt_hide_H:=cnt_hide_H+hideH[i]; else: hideH[i]:=0; + hideH[i]:=4-bond_cnt; hideH_cnt:=hideH_cnt+hideH[i]; else: hideH[i]:=0; fi if nS=0: if bond_cnt>4: warning_bond(i) fi ef nS=(O-nE): if bond_cnt<>2: warning_bond(i) fi @@ -1565,7 +1577,8 @@ def proc_calc= if knownA=0: warning(" Unknown Str("&strD[numS[i]]&") is used "&decimal(i)); fi endfor %------------------------------------------------------------------------------------- - sumA[2]:=sumA[2]+cnt_hide_H; + sumA[2]:=sumA[2]+hideH_cnt; + if (tbl_atom_max=1)and(sumA[2]>0): tbl_atom_max:=2; fi for i=1 upto tbl_atom_max: if sumA[i]>=1: nA:=tbl_atom_wt[i]/100*sumA[i]; @@ -1640,15 +1653,15 @@ def proc_report_out= printf " Shift width * height = "& fdr(10)(minX)&" * "&fdr(10)(minY); printf " Bond length = "&fdr(3)(blen)&" Atom size = "&fdr(3)(atom_wd); printf " Atom count="&fdr(3)(cntA)&" Bond count="&fdr(3)(cntB)& - " Ring count="&fdr(3)(cntB-cntA+1)&" Hide H count="&fdr(3)(cnt_hide_H); + " Ring count="&fdr(3)(cntB-cntA+1)&" Hide H count="&fdr(3)(hideH_cnt); printf "------------------------------------------------------------------"; - printf "< NO. >( x axis , y axis )< atom >< bond >< hideH >< chg >"; + printf "< NO. >( x axis , y axis )< atom(s) >"; for i=1 upto cntA: printf " A"&fdl(4)(i)&" ("&fdr(10)(round_auto(xpart(posA[i])/blen))&" , "& - fdr(10)(round_auto(ypart(posA[i])/blen))&" ) "&fixed_l(8)(strD[numS[i]])& - " "&fdr(3)(Bcnt[i]) - &iif(hideH[i]>0,fdr(8)(hideH[i])," ") - if chargeA[i]<>0: &fdr(8)(chargeA[i]) fi; + fdr(10)(round_auto(ypart(posA[i])/blen))&" ) "& + fixed_l(12)(strD[numS[i]])&" "&fdr(3)(Bcnt[i]) + &iif(hideH[i]>0,fdr(6)(hideH[i])," ") + if chargeA[i]<>0: &fdr(4)(chargeA[i]) fi; endfor printf "------------------------------------------------------------------"; printf "< NO. >< bond (sdt)>"; diff --git a/graphics/mcf2graph/mcf_exa_soc.mf b/graphics/mcf2graph/mcf_exa_soc.mf index cc0dba4b77..f91483eb72 100644 --- a/graphics/mcf2graph/mcf_exa_soc.mf +++ b/graphics/mcf2graph/mcf_exa_soc.mf @@ -1,15 +1,15 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2020.12.12 +% Molecular Coding Format for mcf_example.tex by Akira Yamaji 2021.01.03 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -input mcf2graph.mf; %%% it must be version 4.54 or later -message "mcf_exa_soc 2020.12.12"; +input mcf2graph.mf; %%% it must be version 4.55 or later +message "mcf_exa_soc 2021.01.03"; message ""; %------------------------------------------------------------------------- -fsize:=(33mm,24mm); +fsize:=(35mm,24mm); max_blength:=4.5mm; %------------------------------------------------------------------------- %%%%sw_aux_out:=1; -%%%%sw_fframe:=4; +%%%%sw_fframe:=1; %%%%sw_aframe:=1; %%%%sw_mframe:=1; %%%%sw_expand:=1; @@ -28,14 +28,326 @@ tag1:="F"; tag2:="C"; tag3:="fm"; tag4:="mw"; tag5:="EN"; tag6:="MW"; %%%% draw(0,0)--(w,0)--(w,h)--(0,h)--cycle; %%%% for i=nA step nA until w: draw(i,0)--(i,h); endfor %%%% for i=nA step nA until h: draw(0,i)--(w,i); endfor ); +%--------------------------------------------------------------------------- +%%%%sw_calc:=1; +%%%%ext(defaultfont:="uhvr8r"; defaultscale:=.3; +%%%% label.lrt(decimal(char_num)&":"&inf_EN&" MW="&cal_MW +%%%% if inf_MW<>"-": &"("& decimal(num_MW-scantokens(inf_MW))&")" +%%%% else: &"(-)" fi ,(-2bp,1.5bp));) +%*********************************************************************** +beginfont("EN:Adenine","MW:135.13") + MC(<30,?6,3=?5,{1,3,5,9}=dl,{2,6,9}:N,5:/NH2,7:NH) +endfont +%*********************************************************************** +beginfont("EN:Guanine","MW:151.13") + MC(<30,?6,3=?5,{1,3,9}=dl,{2,9}:N,{6,7}:NH,5://O,1:/NH2) +endfont +%*********************************************************************** +beginfont("EN:Cytosine","MW:111.10") + MC(<30,?6,{4,6}=dl,4:N,3://O,2:NH,5:/NH2) +endfont +%*********************************************************************** +beginfont("EN:Thymine","MW:126.11") + MC(<30,?6,3=dl,{2,6}:NH,{1,5}://O,4:/_) +endfont +%*************************************************************************** +beginfont("EN:Uracil","MW:112.09") + MC(<30,?6,6=dl,{3,5}://O,{2,4}:NH) +endfont +%*************************************************************************** +beginfont("EN:Geraniol","MW:154.25") + MC(<30,!8,OH,{2,6}=dr,{2,6}:/_) +endfont +%*************************************************************************** +beginfont("EN:Limonene","MW:136.24") + MC(<30,?6,2=dl,2:/_,5:*\,/_,!!) +endfont +%*************************************************************************** +beginfont("EN:l-Menthol","MW:156.27") + MC(<30,?6,2:/*?!,5:*/_,3:*/OH) +endfont +%*************************************************************************** +beginfont("EN:Vanillin","MW:152.15") + MC(<30,Ph,2:/OH,3:/O!,5:/CHO) +endfont +%*************************************************************************** +beginfont("EN:Allicin","MW:162.28") + MC(<-30,!!,!2,SO,!,S,!2,!!) +endfont +%*************************************************************************** +beginfont("EN:Stearic acid","MW:284.48") + MC(<30,!17,COOH) +endfont +%*************************************************************************** +beginfont("EN:Linoleic acid","MW:280.45") + MC(<30,!5,-30,-30,!,-30,-30,!7,COOH,{6,9}=dr) +endfont +%*************************************************************************** +beginfont("EN:Sphingosine","MW:299.50") + MC(<30,!18,OH,14=dr,-3:*/OH,-2:/*NH2) +endfont +%************************************************************************** +beginfont("EN:Tocopherol","MW:430.717") + MC(<30,Ph,3=?6,7:O,{1,2,5}:/_,8:/*_^60,6:/OH,8:\,|,!12,{4,8}:/*_,12:/_) +endfont +%*************************************************************************** +beginfont("EN:Carotene","MW:536.8726") + MC(<30,?6,4=dl,3:??,5:/_, + 4:\,|,!18,{1,3,5,7,9,11,13,15,17}=dr,{3,7,12,16}:/_, + ?6,-6=dl,-5:/_,-1:??) +endfont +%*************************************************************************** +beginfont("EN:Adrenalin","MW:183.21") + MC(<30,Ph,{1,6}:/OH,4:\,*/OH,!2,NH,!) +endfont +%*************************************************************************** +beginfont("EN:Caffeine","MW:194.194") + MC(<30,?6,3=dl,{1,5}://O,-4=?5,-3=dl,7:N,{2,6,9}:N!) +endfont +%*************************************************************************** +beginfont("EN:Nicotine","MW:162.23"); + MC(<30,Ph,2:N,4:\,?5,8:N!) +endfont; +%************************************************************************** +beginfont("EN:Capsaicin","MW:305.418") + MC(<30,Ph,1:/OH,6:/O!,4:\,!,NH,!,//O,!7,?!,-3=d) +endfont +%*************************************************************************** +beginfont("EN:Thiamine","MW:300.81") + MC(<30,Ph,4:/NH2,3:\`1,!,<-12,?5,{-1,-4}=dl,{1,5,8}:N,11:S,{6,9}:/_, + -3:\,!2,OH,8:&"+"^72,11:@,-48~0`2.4,Cl[-1]) +endfont +%************************************************************************** +beginfont("EN:Gibberellin A3","MW:346.379"); + MC(<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://_,13:*/OH,8:/*OH,14:*/_,{1,4}:*/H^60) +endfont; +%************************************************************************** +beginfont("EN:Cholesterol","MW:386.664") + MC(<30,?6,{-4,-2}=?6,-4=?5,7=dl, + 1:*/OH,{4,12}:*/_^60, + 10:/*H^180,{11,-1}:/*H^-60,9:*/H^60,-1:@,17,/*_,!4,?!) +endfont +%*************************************************************************** +beginfont("EN:Riboflavin","MW:376.37") + MC(<30,Ph,3=?6,9=?6,{8,16}=dl,{7,10,14}:N,12:NH,{11,13}://O,{1,6}:/_, + 10:\`1.2,!,*/OH,!,/*OH,!,*/OH,!2,OH) +endfont +%*************************************************************************** +beginfont("EN:Resveratrol","MW:228.24") + MC(<30,Ph,4:\,!!,!,Ph,{2,6,-3}:/OH) +endfont +%*************************************************************************** +beginfont("EN:Glutathione","MW:307.33") + MC(<-30,COOH,!,/*NH2,!3,//O,!,NH,!,*/!SH,!,//O,!,NH,!2,COOH) +endfont +%*************************************************************************** +beginfont("EN:Hexaphenylbenzene","MW:534.6876") + MC(<30,Ph,{1,2,3,4,5,6}:/Ph) +endfont +%*************************************************************************** +beginfont("EN:Kekulene","MW:600.7") + MC(<30,?6,{2,-3,-2,-3,-2,-3,-2,-3,-2,-3}=?6,|=1,4:\,-1:#,-3:\,5:#,=|, + {2,15,55}=dr, + {6,8,10,13,18,20,23,27,29,31,33,37,39,41,43,47,49,51,53,57,60}=dl) +endfont +%*************************************************************************** +beginfont("EN:18-Crown-6","MW:264.32") + MC(<-180,O,60,60,60,O,-60,60,60,O,-60,60,60, + O,-60,60,60,O,-60,60,60,O,-60,60,1:#) +endfont +%*************************************************************************** +beginfont("EN:Melamine","MW:126.12") + MC(<30,Ph,{2,4,6}:N,{1,3,5}:/NH2) +endfont +%*************************************************************************** +beginfont("EN:Sudan red 1","MW:248.28") + MC(<30,Ph,1=Ph,4:/OH,3:\,N,!!,N,!,Ph) +endfont +%*************************************************************************** +beginfont("EN:Basic blue 1","MW:319.86") + MC(<30,Ph,3=Ph,6=Ph,2:S,5:N,{8,13}:/N?!,2:&"+",9:@,0~0`1,Cl[-1]) +endfont +%*************************************************************************** +beginfont("EN:Disperse violet 1","MW:238.25") + MC(<30,Ph,3=?6,-3=dr,9=Ph,{7,10}://O,{-1,-4}:/NH2) +endfont +%*************************************************************************** +beginfont("EN:Vat blue 1","MW:262.27") + MC(<30,Ph,3=?5,8:\\,?5,-3=dr,-3=Ph,{7,14}:NH,{9,11}://O) +endfont +%*************************************************************************** +beginfont("EN:Mordant red 11","MW:240.22") + MC(<30,Ph,3=?6,-3=dr,9=Ph,{7,10}://O,{-1,-2}:/OH) +endfont +%*************************************************************************** +beginfont("EN:Atrazine","MW:215.7") + MC(<30,Ph,{2,4,6}:N,5:/Cl,1:/NH!2,3:/NH!?!) +endfont +%*************************************************************************** +beginfont("EN:BHC","MW:290.83") + MC(<30,?6`1.2,{1,3,4,6}:*/Cl,{2,5}:/*Cl) +endfont +%*************************************************************************** +beginfont("EN:pp-DDT","MW:354.49") + MC(<30,Ph,6:/Cl,3:\,/CCl3,!,Ph,-3:/Cl) +endfont +%*************************************************************************** +beginfont("EN:Endrin","MW:380.91") +MC(<30,?6`1.3,3=?6,6=dl,9=?3,-1:O, + 2:@,210~wf`1.5,5:#~wb,7:@,210~zf`1.5,10:#~zb, + {1,2,5,6,12^-210,12^-150}:/Cl) +endfont +%*************************************************************************** +beginfont("EN:Bromacil","MW:261.119") +MC(<30,?6,6=dl,3:N,1:/Br,{2,4}://O,5:NH,6:/_,3:\,/_,!2) +endfont +%*************************************************************************** +beginfont("EN:Acrinathrin","MW:541.45") +MC(<-30,?3,2^-35:*/_,2^35:/*Me, + 1:\,!~dl,!,//O,!,O,!,/CF3,!,CF3,3:\,//O,!,O,!,/CN,!,Ph,-4:\,O,-60,Ph) +endfont +%*************************************************************************** +beginfont("EN:Cafenstrole","MW:350.4") +MC(<30,Ph,{2,4,6}:/_,3:\,SOO,!,|,?5,{2,5}=dl,{2,4,5}:N,-2:\,//O,!,N,/!,!2) +endfont +%*************************************************************************** +beginfont("EN:Carfentrazone-ethyl","MW:412.19") + MC(<30,Ph,4:/F,6:/Cl,1:\,!,/Cl,!,//O,!,O,!2, + 3:\,|,?5,4=dl,{1,3,5}:N,-4://O,-3:/CF2,-2:/_) +endfont +%*************************************************************************** +beginfont("EN:Carboxin","MW:235.301") +MC(<30,?6,3=dl,2:S,5:O,4:/_,3:\,//O,!,NH,!,Ph) +endfont +%*************************************************************************** +beginfont("EN:Clomazone","MW:239.7") + MC(<30,Ph,2:/Cl,3:\,!,|,?5,1:N,2:O,-2^-35:/_,-2^35:/_,-1://O) +endfont +%*************************************************************************** +beginfont("EN:Ethofenprox","MW:376.5") +MC(<30,Ph,5:\,O,!,Ph,10:\,O,!3,??,!,Ph,-3:/O!2) +endfont +%*************************************************************************** +beginfont("EN:Halfenprox","MW:477.4") + MC(<30,Ph,6:\,O,!,/F^35,/F^-35,!,Br,3:\,!,??,!,O,!,!,Ph,-2:\,O,60,Ph) +endfont +%*************************************************************************** +beginfont("EN:Paraquat","MW:257.16") + MC(Ph,4:\,Ph,{1,10}:N!,1:&"+"^-90,10:&"+"^90, + 10:@,0`1.5~0,Cl[-1],90~0`.6,Cl[-1]) +endfont +%*************************************************************************** +beginfont("EN:Picolinafen","MW:376.331") + MC(<30,Ph,5:/CF3,3:\,O,!,|,Ph,2:N,3:\,//O,!,NH,!,|,Ph,4:/F) +endfont +%*********************************************************************** +beginfont("EN:Quinoxyfen","MW:308.13") + MC(<30,Ph,4=Ph,10:N,{2,6}:/Cl,7:\,O,!,|,Ph,4:/F) +endfont +%*********************************************************************** +beginfont("EN:Quitozene","MW:295.3") + MC(<30,Ph,{1,2,3,4,6}:/Cl,5:/NO2) +endfont +%*************************************************************************** +beginfont("EN:Bitertanol","MW:337.4") + MC(<30,Ph,3:\,Ph,-3:\,O,!2,/OH,!,??!,14:\,|,?5,{2,4}=dl,{1,2,4}:N) +endfont +%*************************************************************************** +beginfont("EN:Bifenox","MW:342.14") + MC(<30,Ph,{4,6}:/Cl,3:\,O,!,Ph,-4:/COO!,-3:/NO2) +endfont +%*************************************************************************** +beginfont("EN:Simeconazole","MW:293.417") + MC(<36,?5,{1,3,5}:N,{1,4}=dl, + 3:@,30,!,/OH^30,!2,Si,/_,/_^60,!,7:@,-30,Ph,-3:/F) +endfont +%*************************************************************************** +beginfont("EN:Fenamidone","MW:311.403") + MC(<18,?5,4=dl,{3,5}:N,2://O,3:\,NH,!,Ph,4:/S!,1^52:*/_,1^-48~zf:/Ph) +endfont +%*************************************************************************** +beginfont("EN:Fenpyroximate","MW:421.49") + MC(<-6,?5,{3,5}=db,{1,2}:N,{2,5}:/Me,3:\^-15,O,!,Ph, + 4:\,!~dr,N,!,O,!2,|,Ph,4:\,//O,-60,O,!4) +endfont +%*************************************************************************** +beginfont("EN:Chlorsulron","MW:380.648") + MC(<30,Ph,6:/NH2,1:\,SOO,!,NH2,3:\,SOO,!,NH2,4:\,/Cl,60~dl,/Cl,!,Cl) +endfont +%*************************************************************************** +beginfont("EN:Enrofloxacin","MW:359.401") + MC(<30,Ph,-4=?6,9=dl,7:N,6:/F,7:/?3,9:/COOH,10://O,1:\,|,?6,1:N,4:N,4:/!) +endfont +%*************************************************************************** +beginfont("EN:Fenitrothion","MW:277.23") + MC(<-30,!,O,!,P,//S,/O!^160,!,O,!,|,Ph,3:/_,2:/NO2) +endfont +%*************************************************************************** +beginfont("EN:Fipronil","MW:437.2") +MC(<30, Ph,{2,4}:/Cl,6:/CF3,3:\,|,?5,{2,4}=dl,{1,2}:N,3:/CN,5:/NH2, + -2:\,S,//O,!,CF3) +endfont +%*************************************************************************** +beginfont("EN:Flumequine","MW:261.225") + MC(<30,Ph,3=?6,(2,7)=?6[4],9=dl,7:N,6:/F,9:/COOH,10://O,13:/_) +endfont +%*************************************************************************** +beginfont("EN:Imazalil","MW:297.2") + MC(<-30,!2,O,!2,!~dr,1:@,60,|,?5,{2,4}=dl,{1,3}:N,$2:\,|,Ph,{4,6}:/Cl) +endfont %*************************************************************************** beginfont("EN:Imidacloprid","MW:255.662") MC(<30,Ph,1:N,6:/Cl,3:\,!,|,?5,2=dl,1:N,3:N,2:/'(NH,!,NO2)) endfont +%*********************************************************************** +beginfont("EN:Kresoxim-Methyl","MW:313.348") + MC(<30,Ph,3:\,/COO!,!~dr,N,!,O,!,4:\,!,O,!,Ph,-1:/_) +endfont +%*************************************************************************** +beginfont("EN:Nalidixic acid","MW:232.239") + MC(<30,Ph,3=?6,9=dl,5:N,6:/_,7://O,8:/COOH,10:N!2) +endfont +%*********************************************************************** +beginfont("EN:Oryzalin","MW:346.4") + MC(<30,Ph,{1,3}:/NO2,5:\,SOO,!,NH2,2:\,/!2,N,!3) +endfont +%*********************************************************************** +beginfont("EN:Oxadiazon","MW:345.2") +MC(<30,Ph,{4,6}:/Cl,1:/O!?!,3:\,|,?5,2=dl,{1,2}:N,4:O,5://O,3:/??!) +endfont +%*********************************************************************** +beginfont("EN:Oxadixyl","MW:278.3") + MC(<30,Ph,{2,4}:/_,3:\,N,!1,//O,!2,O,!,7:\,|,?5,1:N,2:O,5://O) +endfont +%*********************************************************************** +beginfont("EN:Oxyfluorfen","MW:361.701") +MC(<30,Ph,6:/CF3,4:/Cl,3:\,O,!,Ph,-3:/NO2,-4:\,O,!2) +endfont +%*************************************************************************** +beginfont("EN:Sulfadimidine","MW:278.33") + MC(<30,Ph,1:/NH2,4:\,SOO,!,NH,!,|,Ph,{2,4}:N,{3,5}:/_) +endfont +%*************************************************************************** +beginfont("EN:Sulfamerazine","MW:264.303") + MC(<30,Ph,1:/NH2,4:\,SOO,!,NH,!,|,Ph,{2,6}:N,3:/_) +endfont +%*************************************************************************** +beginfont("EN:Sulfadoxine","MW:310.328") + MC(<30,Ph,1:/NH2,4:\,SOO,!,NH,!,|,Ph,{4,6}:N,{2,3}:/O!) +endfont +%*************************************************************************** +beginfont("EN:Sulfamethoxazole","MW:253.276") + MC(<30,Ph,1:/NH2,4:\,SOO,!,NH,!,|,?5,{2,5}=dl,4:O,5:N,3:/_) +endfont %*************************************************************************** beginfont("EN:Thiamethoxam","MW:291.71") - MC(<30,?6,{4,6}:N,2:O,6:/_,5://'(N,!,NO2), - 4:\,!,|,?5,{1,3}=dl,3:N,5:S,4:/Cl) + MC(<30,?6,4:N,2:O,6:N!,5://'(N,!,NO2),4:\,!,|,?5,{1,3}=dl,3:N,5:S,4:/Cl) +endfont +%*************************************************************************** +beginfont("EN:Thiamphenicol","MW:355") + MC(<30,Ph,1:\,SOO,!,4:\,/OH,!,/!OH,!`1.1,NH,!`1.1,//O,!,/Cl,!,Cl) endfont %*************************************************************************** beginfont("EN:Pyridaphenthion","MW:340.334") @@ -48,12 +360,11 @@ beginfont("EN:Permethrin","MW:391.288") endfont %*************************************************************************** beginfont("EN:Isoprothiolane","MW:290.392") - MC(<-30,!,/_,!,O,!,//O,!,//'(?5,2:S,5:S),!,//O,!,O,!,/_,!) + MC(<-30,!,?!,O,!,//O,!,//'(?5,2:S,5:S),!,//O,!,O,!,?!) endfont %*************************************************************************** beginfont("EN:Oxine-Copper","MW:351.852") - MC(Ph,4:N,5=Ph,-4:\,O,-60,<90,Cu,-90,O,60, - |,Ph,5=Ph,10:N,||, + MC(Ph,4:N,5=Ph,-4:\,O,-60,<90,Cu,-90,O,60,|,Ph,5=Ph,10:N,||, 4:@,12~vf:#,23:@,12~vf:#) endfont %*************************************************************************** @@ -63,65 +374,98 @@ beginfont("EN:Tetraconazole","MW:372.145") endfont %*************************************************************************** beginfont("EN:Endosulfan","MW:406.904"); - MC(<26,?7,7=?6[13],11:@,208~wf`1.45,8~wb:#,10=d,{3,5}:O,4:S,4://O, + MC(<26,?7,7=?6[13],11:@,208~wf`1.45,8~wb:#,10=dl,{3,5}:O,4:S,4://O, {8,9,10,11,12^-210,12^-150}:/Cl) endfont; +%*********************************************************************** +beginfont("EN:Uniconazole-P","MW:291.779") + MC(<30,Ph,6:/Cl,3:\,!~dl,!,/OH,!,??!,8:\,|,?5,{2,4}=dl,{1,2,4}:N) +endfont %*************************************************************************** beginfont("EN:Oxadiargyl","MW:341.19") - MC(<30,Ph,{1,3}:/Cl,6:/'(O,!2,!!!),4:\,|,?5,2=d,{1,2}:N,4:O,5://O,-3:/tBu) + MC(<30,Ph,{1,3}:/Cl,6:/'(O,!2,!!!),4:\,|,?5,2=dl,{1,2}:N,4:O,5://O,-3:/??!) endfont %*************************************************************************** beginfont("EN:Oxaziclomefone","MW:376.277") - MC(<30,?6,6=dl,4:N,2:O,1:/_,5://O,6:/Ph,4:\,/_^35,/_^-35,!,|,Ph,{3,5}:/Cl) + MC(<30,?6,6=dl,4:N,2:O,1:/_,5://O,6:/Ph,4:\,??,!,|,Ph,{3,5}:/Cl) +endfont +%*************************************************************************** +beginfont("EN:Trimetoprim","MW:290.323") + MC(<30,Ph,{1,5}:N,{2,6}:/NH2,3:\,!,|,Ph,{3,4,5}:/O!) +endfont +%*************************************************************************** +beginfont("EN:Ciprofloxacin","MW:331.347") + MC(<30,Ph,-4=?6,9=dl,7:N, + 6:/F,7:/?3,9:/COOH,10://O,1:\,|,?6,1:N,4:NH) +endfont +%*************************************************************************** +beginfont("EN:Danofloxacin","MW:357.385") + MC(<30,Ph,-4=?6,9=dl,7:N, + 6:/F,7:/?3,9:/COOH,10://O, + 1:\,|,?6,2:@,-200`1.1,5:#,{1,4}:N,4:*/_) +endfont +%*************************************************************************** +beginfont("EN:Marbofloxacin","MW:362.361") + MC(<30,Ph,3=?6,9=dl,(2,7)=?6[4],6:/F,7:N,11:O,9:/COOH,10://O,13:N!, + 1:\,|,?6,1:N,4:N!) +endfont +%*************************************************************************** +beginfont("EN:Ofloxacin","MW:361.373") + MC(<30,Ph,3=?6,(2,7)=?6[4],9=dl,7:N,11:O,6:/F,9:/COOH,10://O,13:/_, + 1:\,|,?6,{1,4}:N,4:/_) +endfont +%*************************************************************************** +beginfont("EN:Ormetoprim","MW:274.324") + MC(<30,Ph,{1,5}:N,{2,6}:/NH2,3:\,!,|,Ph,2:/_,{4,5}:/O!) endfont %*************************************************************************** beginfont("EN:Amoxicillin","MW:365.4042") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,*/NH2,!,Ph,-3:/OH) endfont %*************************************************************************** beginfont("EN:Ampicillin","MW:349.405") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,/*NH2,!,Ph) endfont %*************************************************************************** beginfont("EN:Benzyl-Penicillin","MW:334.4") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,!,Ph) endfont %*************************************************************************** beginfont("EN:Mecillinam","MW:325.4264") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,N,!!,!,?7,-7:N) endfont %*************************************************************************** beginfont("EN:Nafcillin","MW:414.4748") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,Ph,-2=Ph,-9:/O!2) endfont %*************************************************************************** beginfont("EN:Oxacillin","MW:401.4363") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,<-24,?5,{-2,-5}=dl,-2:N,-3:O,-4:/_, -1:\^-24,Ph) endfont %*************************************************************************** beginfont("EN:Cloxacillin","MW:435.8813") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,<-24,?5,{-2,-5}=dl,-2:N,-3:O,-4:/_, -1:\^-24,Ph,-5:/Cl) endfont %*************************************************************************** beginfont("EN:Dicloxacillin","MW:470.3264") MC(<45,?4,-3=?5,2:N,7:S, - 3^45:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + 3^45:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^15,NH,!,//O,!,<-24,?5,{-2,-5}=dl,-2:N,-3:O,-4:/_, -1:\^-24,Ph,{-1,-5}:/Cl) endfont @@ -132,11 +476,11 @@ beginfont("EN:Cefalexin","MW:347.3889") 4:*\^15,NH,!,//O,!,*/NH2,!,Ph) endfont %*************************************************************************** -beginfont("EN:Cefalonium","MW:459.5107") +beginfont("EN:Cefalonium","MW:458.5107") MC(<45,?4,-3=?6,-4=dl,2:N,8:S, - 3^45:/*H,1://O^15,5:/*COOH, + 3^45:/*H,1://O^15,5:/*COO[-1], 4:*\^15,NH,!,//O,!2,?5,{-1,-3}=dl,-4:S, - 6:\,!,|,Ph,1:N,4:\,//O,!,NH2) + 6:\,!,|,Ph,1:N,1:&"+"^180,4:\,//O,!,NH2) endfont %*************************************************************************** beginfont("EN:Cefazorin","MW:454.51") @@ -146,11 +490,11 @@ beginfont("EN:Cefazorin","MW:454.51") 6:\,!,S,!,?5,{-3,-5}=dl,-1:S,-2:/_,{-3,-4}:N) endfont %*************************************************************************** -beginfont("EN:Cefquinome","MW:529.6") +beginfont("EN:Cefquinome","MW:528.6") MC(<45,?4,-3=?6,-4=dl,2:N,8:S, - 3^45:/*H,1://O^15,5:/*COOH, + 3^45:/*H,1://O^15,5:/*COO[-1], 4:*\^15,NH,!,//O,!,//'(N,!,O,!),!,?5,{-2,-5}=dl,-3:S,-1:N,-2:/NH2, - 6:\,!,Ph,-2=?6,-10:N) + 6:\,!,Ph,-2=?6,-10:N,-10:&"+"^180) endfont %*************************************************************************** beginfont("EN:Ceftiofur","MW:523.5626") @@ -205,14 +549,6 @@ beginfont("EN:Fradiomycin","MW:614.644") -2:\*^-24,O,-60~zb,?6,-5:O,-1:/*NH2,-2:*/OH,-3:/*OH,-4:/*!NH2>60) endfont %*************************************************************************** -beginfont("EN:Neospiramycin","MW:698.9") - MC(<-90,|=1,60,60,-60,60,60,-60,60,60,-60,60,60,60,-60,60,-60,1:#,=|, - {12,14}=dl,2:O,1:/*_,5:/*OH,3://O,10:/*_,6:/*O!>vt, - -6:\*,O,!~wb,?6`.7,-5:O,-3:/*N!_,-4:*/_, - 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N!_,-1:/*OH,-4:*/_,-3:/*OH, - 8:\*,!,!!,O) -endfont -%*************************************************************************** beginfont("EN:Streptmycin","MW:581.574") MC(<54,?5,3:O,4:/*_,5:/OH^35, 1:\*,O,-24~wb,?6,-5:O, @@ -222,20 +558,54 @@ beginfont("EN:Streptmycin","MW:581.574") 19:*\,NH,!,//NH,!,NH2) endfont %*************************************************************************** +beginfont("EN:Neospiramycin","MW:698.9") + MC(<-90,|=1,60,60,-60,60,60,-60,60,60,-60,60,60,60,-60,60,-60,1:#,=|, + {12,14}=dl,2:O,1:/*_,5:/*OH,3://O,10:/*_,6:/*O!>vt, + -6:\*,O,!~wb,?6`.7,-5:O,-3:/*N?!,-4:*/_, + 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N?!,-1:/*OH,-4:*/_,-3:/*OH, + 8:\*,!,!!,O) +endfont +%*************************************************************************** +beginfont("EN:Emamectine","MW:886.133") + MC(<24,?6,6=?5,3=dl,9:O,2:*/OH,3:/_,6:/*OH^-60, + 5:@,|=1.04,6,//O,-60,O,60~wb,60,-60,60~wf,60,-60,60,60,60,-60,60,=|,7:#, + {-1,-3,-7}=dl,(-11,-10)=?6[4],-2:@,?6,-6=wf,-1=zb,-5=dl, + {-1,-6}:O,-3:*/_,-2:\,*/_,!2, + 17:/_,19:/*_,18:\,O,!,?6`.8,-1:O,-2:*/_,-4:*/O!, + -3:\,O,60,?6`.8,-5:O,-4:*/_,-3:/*NH!,-2:*/O!) +endfont +%*************************************************************************** +beginfont("EN:Spinosad","MW:731.968") + MC(<30,|=1,<-120,60,60,-60,60,60,60,-60,60,60,60,-60,1:#,=|, + 5=?5,-1=dl,{-2^60,-3^-35}:/*H,-3=?6,-4=dl,{-1^35}:*/H,{-2^-60}:/*H,-2=?5, + 2:O,{3^25,7^-25}://O,1:/!, + -2:\~zf,O,66,?6`.8,-1:O,-2:/_,{-3,-4,-5}:/O!, + 8~wf:/Me,5^-65~wf:/H, + 9:\~zf,O,!,|,?6`.8,2:O,3:/_,-3:/N?!) +endfont +%*************************************************************************** beginfont("EN:Spiramycin","MW:843.1") MC(<-90,|=1,60,60,-60,60,60,-60,60,60,-60,60,60,60,-60,60,-60,1:#,=|, {12,14}=dl,2:O,{1,10^-30}:/*_,5:/*OH,3://O,6:/*O!>vt, - -6:\*^-30,O,!~wb,?6`.7,-5:O,-3:/*N!_,-4:*/_, - 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N!_,-1:/*OH,-4:*/_, + -6:\*^-30,O,!~wb,?6`.7,-5:O,-3:/*N?!,-4:*/_, + 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N?!,-1:/*OH,-4:*/_, -3:\*`1,O,60~wb`1.5,?6`.7,-5:O,{-2^35,-3}:*/OH,{-2^-35,-4}:/*_, 8:\*,!,!!,O) endfont %*************************************************************************** +beginfont("EN:Natamycin","MW:665.733") + MC(<-90,|=1,60,60,-60,60,-60,60,-60,60,-60,60,60,60,O,-60, + 60,60,-60,60,-60,60,-60,60,60,-60,1:#,(12,13)=?6[4],=|, + {2,4,6,8,20}=dl,11=zb,23:O,-2:/*OH,-3:*/COOH, + 18=?3,-1=wb,-2=wf,-1:O,22://O,24:*/_,{14^60,16}:*/OH, + 10:*\,O,90,?6`.8,-3:*/OH,-5:/*OH,-4:/*NH2,-1:O,-2:/*_) +endfont +%*************************************************************************** beginfont("EN:Tylocin","MW:916.10") MC(<-90,|=1,60,60,-60,60,60,-60,60,60,-60,60,60,60,-60,60,-60,1:#,=|, {12,14}=dl,2:O,1:/*!,5:/*OH,3://O,10:/*_,6:/*_,-6://O,-3:/_, -1:*\,-60,O,0~wb,?6`.7,-5:O,-3:/*OH,-4:*/_,{-1,-2}:/*O!, - 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N!_,-1:/*OH,-4:*/_, + 7:\*,O,0~wb,?6`.7,-5:O,-2:*/N?!,-1:/*OH,-4:*/_, -3:\*`1,O,60~wb`1.5,?6`.7,-5:O,{-2^35,-3}:*/OH,{-2^-35,-4}:/*_, 8:\*,!,!!,O) endfont @@ -244,38 +614,35 @@ beginfont("EN:Tilmicosin","MW:869.133") MC(<-90,|=1,60,60,-60,60,60,-60,60,60,-60,60,60,60,-60,60,-60,1:#,=|, {12,14}=dl,2:O,1:/*!,5:/*OH,{3,11}://O,{6,10}:/*_,14:/_, -1:*\,-60,O,0~zb,?6`.7,-5:O,{-1,-2}:*/O!,-3:*/OH,-4:/*_, - 7:\*,O,0,?6`.7,-5:O,-2:*/N!_,{-1,-3}:/*OH,-4:*/_, + 7:\*,O,0,?6`.7,-5:O,-2:*/N?!,{-1,-3}:/*OH,-4:*/_, 8:\*,!2,?6`.7,-6:N,{-2,-4}:*/_) endfont %*************************************************************************** -beginfont("EN:Chlortracyclin","MW:478.88") +beginfont("EN:Chlortetracyclin","MW:478.88") MC(<30,Ph,{-4,-3,-3}=?6,{16,19}=dl,{10,18}://O,7:*/_^-35,2:/Cl, - {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N!_,17:\,//O,!,NH2 + {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N?!,17:/CONH2 ) endfont %*************************************************************************** beginfont("EN:Oxytetracyclin","MW:460.434") MC(<30,Ph,{-4,-3,-3}=?6,{16,19}=dl,{10,18}://O,7:*/_^-35,11:*/OH, - {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N!_,17:\,//O,!,NH2 - ) + {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N?!,17:/CONH2) endfont %*************************************************************************** beginfont("EN:Tetracyclin","MW:444.435") MC(<30,Ph,{-4,-3,-3}=?6,{16,19}=dl,{10,18}://O,7:*/_^-35, - {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N!_,17:\,//O,!,NH2 - ) + {5,7~zf^35,13~wf^60,14,16}:/OH,15:*/N?!,17:/CONH2) endfont %*************************************************************************** beginfont("EN:Doxycyclin","MW:444.43") MC(<30,Ph,{-4,-3,-3}=?6,{16,19}=dl,{10,18}://O,7:*/_, - {5,13~wf^60,11~wf,14,16}:/OH,15:*/N!_,17:\,//O,!,NH2 - ) + {5,13~wf^60,11~wf,14,16}:/OH,15:*/N?!,17:\,//O,!,NH2) endfont %*************************************************************************** beginfont("EN:Tiamulin","MW:493.74") MC(<-45.5,?8,-3=?5,8:@,|=.8,-210~zf,/_^60,45,56,=|,6:#~zb, - {3^-45,5,8}:*/_,3:\*^30,!~dl,4:/*OH,11://O,7:*/H^60,||, - 1:\^15,O,!,//O,!2,S,60,60,-60,N,/!,60,-60) + {3^-45,5,8}:*/_,3:\*^30,!~dl,4:/*OH,11://O,7:*/H^60, + 1:\^15,O,!,//O,!2,S,60,60,-60,N!2,60,-60) endfont %*************************************************************************** beginfont("EN:Rifampicin","MW:822.94") @@ -284,7 +651,12 @@ beginfont("EN:Rifampicin","MW:822.94") |=1,-2:\,NH,60,//O,-60,/_,60~dl,60,60~dl,-60, */_,60,/*OH,-60,/*_,60,/*OH,60,*/_^30,-60, 60,/*_^30,-53,66,-53~dl,66`1.2,O,=|,$8:#, - -4:/*O!,-6:@,-30,O,!,//O,!,$11:\,!!,N,!,|,?6,{1,4}:N,4:/_) + -4:/*O!,-6:@,-30,O,!,//O,!,$11:\,!!,N,!,|,?6,1:N,4:N!) +endfont +%*************************************************************************** +beginfont("EN:Trenbolone","MW:270.37") + MC(<30,?6,{3,10}=?6,13=?5,{2,11,15}=dl, + 1://O,12:*/_^60,-1:/*OH,9:*/H^60,11:/*H^-60) endfont %*************************************************************************** beginfont("EN:Luciferin","MW:280.33") @@ -293,46 +665,11 @@ endfont %*************************************************************************** beginfont("EN:Chlorophyll a","MW:893.509") MC(<54,|=1,?5,{2,5}=dl,4:N,3:\,54~dl,|,?5,{2,4}=dl,5:N, - -2:\,54~dl,|,?5,2=d,5:N,-2:\~dl,54,|,?5,5=d,5:N,-2:\~dl,$5:#, + -2:\,54~dl,|,?5,2=dl,5:N,-2:\~dl,54,|,?5,5=dl,5:N,-2:\~dl,$5:#, -1:@,24,/*COO!^15,72,//O,$1:#,=|,||, {2,9,15,20~zf}:/_,8:/!,14:\,!!, 4:\`1.45,Mg,17:#,-1:@,11~vb:#,-1:@,23~vb:#, - 21:@,-6~wf,!2,//O,!,O,!2,!!,|,!13,{1,5,9,13}:/_ - ) -endfont -%************************************************************************** -beginfont("EN:Gibberellin A3","MW:346.379"); - MC(<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://_,13:*/OH,8:/*OH,14:*/_,{1,4}:*/H^60) -endfont; -%************************************************************************** -beginfont("EN:Cholesterol","MW:386.664") - MC(<30,?6,{-4,-2}=?6,-4=?5,7=dl, - 1:*/OH,{4,12}:*/_^60, - 10:/*H^180,{11,-1}:/*H^-60,9:*/H^60,-1:@,17,/*_,!4,/_,!) -endfont -%*************************************************************************** -beginfont("EN:Lycorine","MW:287.315") - MC(<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:Tetrodotoxine","MW:319.27") - MC(|=1,<60,-90,60,-30`1.15,150,60,$1:#,$3:@,-135,60,-30`1.15,150,$4:#, - $10:\,O,60`1.33,60,$3~si_:#,$8:@,-15~si_,O,$12:#,=|, - $9:@,45,-60,OH,1^120://NH, - {5~zf^-15,7,9^-75,12,13~zf}:/OH,{2,6^180}:NH) -endfont -%*************************************************************************** -beginfont("EN:beta-Carotene","MW:536.888") - MC(<30,?6,3=dl,{3,5^35,5^-35}:/_, - 4:\,|,!18,{1,3,5,7,9,11,13,15,17}=dr,{3,7,12,16}:/_, - |,?6,6=dl,{6,2^35,2^-35}:/_) -endfont -%************************************************************************** -beginfont("EN:alfa-Tocopherol","MW:430.717") - MC(<30,Ph,3=?6,7:O,{1,2,5}:/_,8:/*_^60,6:/OH,8:\,|,!12,{4,8}:/*_,12:/_) + 21:@,-6~wf,!2,//O,!,O,!2,!!,|,!13,{1,5,9,13}:/_) endfont %************************************************************************** beginfont("EN:Quercetin","MW:302.24") @@ -342,7 +679,7 @@ endfont beginfont("EN:Limonin","MW:470.518") MC(<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}:/_,{1^60,5^180,16^60}:/*H, + {4~wf^60,8~zf^60}:/_,18:??,{1^60,5^180,16^60}:/*H, 14:\*,|,?5,{1,4}=dl,3:O) endfont %************************************************************************** @@ -352,27 +689,12 @@ beginfont("EN:Cromolyn","MW:468.37") endfont %************************************************************************** beginfont("EN:Emetine","MW:480.649") - MC(<30,Ph,{-4,-4}=?6, - 8:N,{1,6}:/O!,-2:/*!,{7^-60,12^-60}:/*H, - -3:\,!~zb,<-60,|,?6,5=d,2:NH,-6^-60:*/H,|,-2=?6,{2,4}=dl,{-2,-3}:/O!) -endfont -%*************************************************************************** -beginfont("EN:Colchicine","MW:399.443") - MC(<30,Ph,{1,2,6}:/O!,-4=?7,-5=?7,{-1,-4,-6}=dl,-2://O,-3:/O!, - 9:\,NH,!,//O,!) -endfont -%*************************************************************************** -beginfont("EN:Caffeine","MW:194.194") - MC(<30,?6,3=d,{2,6}:N,{2,6}:/_,{1,5}://O,|,-4=?5,2=dl,{1,3}:N,3:/_) + MC(<30,Ph,{-4,-4}=?6,8:N,{1,6}:/O!,-2:/*!,{7^-60,12^-60}:/*H, + -3:\,!~zb,<-60,|,?6,5=dl,2:NH,-6^-60:*/H,|,-2=?6,{2,4}=dl,{-2,-3}:/O!) endfont %************************************************************************** beginfont("EN:Acronycine","MW:321.376") - MC(<30,Ph,|,-4=?6,1:N,4://O,,1:/_,-3=Ph2,-1:/O!, - |,-4=?6,2=d,4:O,-2^-35:/_,-2^35:/_) -endfont -%*************************************************************************** -beginfont("EN:Ibotenic acid","MW:158.113") - MC(<18,?5,4=d,3:O,2:NH,1://O,4:@,-24,/NH2,!,COOH) + MC(<30,Ph,|,-4=?6,1:N!,4://O,-3=Ph2,-1:/O!,|,-4=?6,2=dl,4:O,3:??) endfont %************************************************************************** beginfont("EN:Piperine","MW:285.343") @@ -380,18 +702,18 @@ beginfont("EN:Piperine","MW:285.343") endfont %*************************************************************************** beginfont("EN:Febrifugine","MW:301.346") - MC(<30,Ph,|,-4=?6,2=d,{1,3}:N,4://O,$9:\,!,//O,!,!~zf,|,?6,2:NH,-1:*/OH) + MC(<30,Ph,|,-4=?6,2=dl,{1,3}:N,4://O,$9:\,!,//O,!,!~zf,|,?6,2:NH,-1:*/OH) endfont %*************************************************************************** beginfont("EN:Mitomycine C","MW:334.332") - MC(<30,?6,{3,6}=dl,{2,5}://O,1:/_,|,-4=?5,1:N, - $6:/NH2,|,-3=?5,|,-2=?3,-1=wb,-2=wf,-1:NH, - $8:/*O!^35,$9:@,17.9`1,!,O,!,//O,!,NH2) + MC(<30,?6,{3,6}=dl,{2,5}://O,1:/_,-4=?5,-3:N, + 6:/NH2,,-3=?5,-2=?3,-1=wb,-2=wf,-1:NH, + 8:/*O!^35,$9:\,!,O,60,//O,!,NH2) endfont %*************************************************************************** beginfont("EN:Podophyllotoxin","MW:414.41"); MC(<0,?5,{2,5}:O,-3=Ph2,-3=?6,-3=?5,-2:O,-1=wb,-3://O, - 10:\*,Ph,{-2,-3,-4}:/O!,$13:/*OH,{$11~wf^-60,$12~zf^60}:/H) + 10:\*,Ph,{-2,-3,-4}:/O!,13:/*OH,{11~wf^-60,12~zf^60}:/H) endfont; %*************************************************************************** beginfont("EN:Warfarin","MW:308.333"); @@ -409,12 +731,7 @@ endfont; beginfont("EN:Reserpine","MW:608.688"); MC(<54,Ph,-4=?5,-2=?6,-4=?6,-3=?6,9=dl,11:N,7:NH,10:*/H^-60, {15^-60,16^60}:/*H, - $20:*\,O,!,//O,!,|,Ph,{-2,-3,-4}:/O!,{$1,$19~zf>rl}:/O!, - $18:*\,//O,!,O,!) -endfont; -%*************************************************************************** -beginfont("EN:Nicotine","MW:162.23"); - MC(<30,Ph,2:N,4:\,|,?5,2:N,2:/_) + 20:*\,O,!,//O,!,Ph,{-2,-3,-4}:/O!,{1,19~zf>rl}:/O!,18:*/COO!>lr) endfont; %*************************************************************************** beginfont("EN:Rotenone","MW:394.423"); @@ -423,28 +740,24 @@ beginfont("EN:Rotenone","MW:394.423"); endfont; %*************************************************************************** beginfont("EN:Pyrethrin I","MW:328.452"); - MC(<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:Erythromycin","MW:733.937"); -MC(<30,|=1,<-120,60,60,60,-60,60,60,-60,60,60,60,-60,60,60,=|,1:#, - 14:O,13:/*!,{1,9}://O,{2,10}:*/_,{4,6^-35,8,12^35}:/*_, - {6^35,11,12^-35}:*/OH, - $3:\*,O,30,|,?6`.7,2:O,{3,5^35}:/_,4:/OH,5^-35:/O!, - $5:\*^30`1.7,O,!,|,?6`.7,6:O,5:/_,2:/OH,3:/N!_) + MC(<30,?3,{3^35~wf,3^-35~zf}:/_,1:*\,!!,?!, + 2:\*,//O,!,O,-36~zb,|,?5,-2=dl,-1:/_,-3://O,-2:\,!4,{-1,-3}=dl) endfont; +%*********************************************************************** +beginfont("EN:Oseltamivir","MW:312.40") + MC(<30,?6,3=dl,6:*/NH2,1:\*,NH,!,//O,!,2:*\,!,/!,!2,4:\,//O,!,O,!2) +endfont %************************************************************************** beginfont("EN:Paclitaxel","MW:853.918") - MC(?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}:/_,{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) + MC(?6,5=dl,3:@,|=1,36,45,45,45,45,=|,5:#,-4=?6,-4=?4,-1=wb,-3=wf,-1:O, + 4:??,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:*/OCO!>rl,12:/*OCO!^-15>lr) endfont %************************************************************************** beginfont("EN:Mevastatin","MW:390.52") - MC(<30,?6,2=d,4:*/H^60,|,-4=?6,2=d,$9:*/_, - $10:*\,!,60~wb,|,?6,6:O,-2://O,-4:/*OH,$5:\*,O,60,//O,!,*/_,!2) + MC(<30,?6,2=dl,4:*/H^60,-4=?6,-4=dl,9:*/_, + 10:*\,!,60~wb,?6,6:O,-2://O,-4:/*OH,5:\*,O,60,//O,!,*/_,!2) endfont %*************************************************************************** beginfont("EN:Sesamine","MW:354.35") @@ -453,12 +766,8 @@ endfont %************************************************************************** beginfont("EN:Morphine","MW:285.343") MC(<30,Ph,2=?6,-4=?6,(1,12)=?5[2],-1:O,-1=zb, - 7:@,60~wf`0.75,70~si_`1.3,45,N,/_,9~wb:#, - 15=d,6:/OH,8^180:*/H,12:/*OH) -endfont -%************************************************************************** -beginfont("EN:Capsaicin","MW:305.418") - MC(<30,Ph,1:/OH,6:/O!,4:\,!,NH,!,//O,|,!8,-3=d,-1:/_) + 7:@,60~wf`0.75,70~si_`1.3,45,N!,9~wb:#, + 15=dl,6:/OH,8^180:*/H,12:/*OH) endfont %*************************************************************************** beginfont("EN:Quinine","MW:324.424") @@ -468,7 +777,46 @@ endfont %*************************************************************************** beginfont("EN:Atoropin","MW:289.375") MC(<30,O,!,//O,!,!,Ph, - $1:\~zb^-60,|,?7`1.1,6:*\^190`1.25,N,/_,3~wb:#,$3:/!OH~wv) + $1:\~zb^-60,|,?7`1.1,6:*\^190`1.25,N!,3~wb:#,$3:/!OH~wv) +endfont +%*************************************************************************** +beginfont("EN:Colchicine","MW:399.443") + MC(<30,Ph,{1,2,6}:/O!,-4=?7,-5=?7,{-1,-4,-6}=dl,-2://O,-3:/O!,9:/NHCO!) +endfont +%*************************************************************************** +beginfont("EN:Lycorine","MW:287.315") + MC(<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:Ibotenic acid","MW:158.113") + MC(<18,?5,4=dl,3:O,2:NH,1://O,4:@,-24,/NH2,!,COOH) +endfont +%*************************************************************************** +beginfont("EN:illudin S","MW:264.3") + MC(<30,?6,3=?5,6:**?3,{4,7}=dl,2://O,5:/_, + {1^35,8^35}:*/_,1:/*OH^-35,9:*/OH,8:/*!OH^-35) +endfont +%*************************************************************************** +beginfont("EN:Muscarine","MW:174.26") + MC(<18,?5,2:O,1:*/_,5:/*OH,3:*\,48,N,??,!,-1:&"+"^180) +endfont +%*************************************************************************** +beginfont("EN:Psilocybin","MW:284.248") + MC(<30,Ph,3=?5,8=dl,9:NH,2:\,O,-60,P,|||,-1://O^-90,-1:/OH,-1:/OH^90, + 7:\,!,-60,N?!) +endfont +%*************************************************************************** +beginfont("EN:Tetrodotoxine","MW:319.27") + MC(|=1,<60,-90,60,-30`1.15,150,60,1:#,3:@,-135,60,-30`1.15,150,4:#, + 10:\,O,60`1.33,60,$3~si_:#,8:@,-15~si_,O,12:#,=|, + 9:@,45,-60,OH,1^120://NH, + {5~zf^-15,7,9^-75,12,13~zf}:/OH,{2,6^180}:NH) +endfont +%*************************************************************************** +beginfont("EN:Aflatoxin B1","MW:312.27") + MC(<30,Ph,6=?6,-2=?5,4=?5,-2=?5,{-2,10}=dl,{7,14,17}:O, + 2:/O!,{8,11}://O,{15^-54,16^54}:*/H) endfont %*************************************************************************** bye diff --git a/graphics/mcf2graph/mcf_example.pdf b/graphics/mcf2graph/mcf_example.pdf index 80a8a5343d..b0dbe23357 100644 Binary files a/graphics/mcf2graph/mcf_example.pdf and b/graphics/mcf2graph/mcf_example.pdf differ diff --git a/graphics/mcf2graph/mcf_example.tex b/graphics/mcf2graph/mcf_example.tex index fcda26a9b8..c09fbd17f2 100644 --- a/graphics/mcf2graph/mcf_example.tex +++ b/graphics/mcf2graph/mcf_example.tex @@ -75,10 +75,3 @@ %------------------------------------------------------------------------ \end{document} %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -tnum=5 \\ \tnum=0 \fi% -\fi% -\ifCONT@ \repeat% -\closein\@auxf% -%------------------------------------------------------------------------ -\end{document} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% diff --git a/graphics/mcf2graph/mcf_man_soc.mf b/graphics/mcf2graph/mcf_man_soc.mf index 3379b25222..aca042c93d 100644 --- a/graphics/mcf2graph/mcf_man_soc.mf +++ b/graphics/mcf2graph/mcf_man_soc.mf @@ -1,8 +1,8 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2020.12.12 +% Molecular Coding Format file for mcf_manual.tex by Akira.Yamaji 2021.01.03 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -input mcf2graph.mf; %% it must be version 4.54 or later -message "mcf_man_soc 2020.12.12"; message ""; +input mcf2graph.mf; %% it must be version 4.55 or later +message "mcf_man_soc 2021.01.03"; message ""; %------------------------------------------------------------------------ sw_mframe:=0; sw_expand:=0; @@ -22,11 +22,11 @@ beginfont("EN:L-Alanine") endfont %*********************************************************************** beginfont("EN:L-Valine") - MC(<30,NH2,!~wb,/iPr,!,COOH) + MC(<30,NH2,!~wb,/!?!,!,COOH) endfont %*********************************************************************** beginfont("EN:L-Leucine") - MC(<30,NH2,!~wb,/!iPr,!,COOH) + MC(<30,NH2,!~wb,/!?!,!,COOH) endfont %*********************************************************************** beginfont("EN:L-Isoleucine") @@ -46,7 +46,7 @@ beginfont("EN:L-Cysteine") endfont %*********************************************************************** beginfont("EN:L-Methionine") - MC(<30,NH2,!~wb,/'(!2,SMe),!,COOH) + MC(<30,NH2,!~wb,/'(!2,S,!),!,COOH) endfont %*********************************************************************** beginfont("EN:L-Phenylalanine") @@ -487,7 +487,7 @@ beginfont("EN:group 5") endfont %*********************************************************************** beginfont("EN:chain strech direction mode 1") - fsize:=(60mm,45mm); + fsize:=(50mm,35mm); sw_trimming:=1; ratio_chain_ring:=1; MC( @@ -507,41 +507,45 @@ beginfont("EN:chain strech direction mode 2") endfont %*********************************************************************** beginfont("EN:chain strech direction mode 3") - fsize:=(40mm,25mm); + fsize:=(40mm,20mm); sw_trimming:=1; - ratio_chain_ring:=1; - MC(<30,!6,6>45:/!3) + MC(<30,!4,2:/!6>30,4:/!4>-45) endfont %*********************************************************************** beginfont("EN:chain strech direction mode 4") - fsize:=(60mm,25mm); + fsize:=(60mm,22mm); sw_trimming:=1; - ratio_chain_ring:=1; MC(<30,!6,6>'(90,-90,90,-90,90):/!5) endfont %*********************************************************************** beginfont("EN:change atom and group") + fsize:=(60mm,12mm); + sw_trimming:=1; + MC(<-30,!2,NH,!2,N!,!2,N!2,!2,SO,!2,SOO,!) +endfont +%*********************************************************************** +beginfont("EN:methyl*2,isopropyl,tert-butyl") fsize:=(60mm,15mm); sw_trimming:=1; - MC(<-30,!2,NH,!2,SO,!2,SOO,!) + MC(<30,!9`1,?!,!,??,!,2:??,4:/?!,6:/??!,8:/N?!) endfont %*********************************************************************** beginfont("EN:Make brock") - fsize:=(60mm,15mm); + fsize:=(60mm,10mm); % sw_trimming:=1; sw_numberB:=1; MC(<-30,!2,|=1.2,!4,=|,!2) endfont %*********************************************************************** beginfont("EN:User definition") - fsize:=(60mm,20mm); + fsize:=(60mm,15mm); sw_trimming:=1; iBuOH:='(!,/_,!,OH); MC(<30,?6,{4,6}:/iBuOH) endfont %*********************************************************************** beginfont("EN:Inline definition") - fsize:=(60mm,20mm); + fsize:=(60mm,15mm); fmargin:=(2mm,1mm); sw_trimming:=1; MC(<30,!8,{2,6}:/'(!,/_,!,OH)) @@ -1118,7 +1122,7 @@ beginfont("EN:Paclitaxel","MW:853.91") MC( ?6,5=dl,3:@,|=1,36,45,45,45,45,=|, $5:#,-4=?6,-4=?4,-1=wb,-3=wf,-1:O,||, - {4^35,4^-35,6}:/_,{3^-60,15}:*/OH,8:/*H^-60, + 4:??,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, @@ -1151,15 +1155,15 @@ beginfont("EN:Quinine","MW:324.42") MC( <30,Ph,3=Ph,7:N,6:/O!, 10:\,*/OH,/H~zf^-60,!, - |,?6,2:N,1:*/H^60,4:*\,!!, + |,?6,2:N,1:*/H^60,4:*/!!, 2:@,165~zf,60,5~zb:# ) endfont -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%*************************************************************************** beginfont("EN:Ampicillin","MW:349.405") fsize:=(60mm,15mm); MC(<45,?4,-3=?5,2:N,7:S, - {3^45,4^-45}:/*H,1://O^15,5:/*COOH^-18,{6^35,6^-35}:/_, + {3^45,4^-45}:/*H,1://O^15,5:/*COOH^-18,6:??, 4:*\^75,NH,!,//O,!,/*NH2,!,Ph) endfont %*************************************************************************** @@ -1169,7 +1173,7 @@ beginfont("EN:Cholesterol","CAS:57-88-5","FM:C27H46O","MW:386.65") <30,?6,{-4,-2}=?6,-4=?5,7=dl, 1:*/OH,{4,12}:*/_^60,9:*/H^60, 10:/*H^180,11:/*H^-60,17:/*H^-54, - -1:@,18,/*_,-60,!3,/_,! + -1:@,18,/*_,-60,!3,?! ) endfont %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% diff --git a/graphics/mcf2graph/mcf_manual.pdf b/graphics/mcf2graph/mcf_manual.pdf index 297af90c25..848ca9fe42 100644 Binary files a/graphics/mcf2graph/mcf_manual.pdf and b/graphics/mcf2graph/mcf_manual.pdf differ diff --git a/graphics/mcf2graph/mcf_manual.tex b/graphics/mcf2graph/mcf_manual.tex index f879fd6ab7..2573d33c6d 100644 --- a/graphics/mcf2graph/mcf_manual.tex +++ b/graphics/mcf2graph/mcf_manual.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Molecular Coding Format manual by Akira Yamaji 2020.12.12 +% Molecular Coding Format manual by Akira Yamaji 2021.01.03 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass[a4paper]{article} %%%%\documentclass[a4paper,twoside]{article} @@ -485,12 +485,12 @@ exact mass, molecular formula. \subsubsection{Insert group} \begin{verbatim} / : single - <-30,!,/Me,!,/Et,!3,/Pr,!,/iPr, - !3,/tBu,!,/Ph^-30,! + <-30,!,/_,!,/!,!3,/!2,!,/?!, + !3,/??!,!,/Ph^-30,! - ** Me:methyl(/_) Et:ethyl(/!) - Pr:propyl(/!2) iPr:isopropyl - tBu:tertial buthyl Ph:phenyl + ** /_ : methyl /! : ethyl + /!2 : propyl /?! : isopropyl + /??! : tert-butyl /Ph : phenyl \end{verbatim} \MCFgraph %----------------------------------------------------------------------------- @@ -533,7 +533,7 @@ exact mass, molecular formula. \subsubsection{Add group} \begin{verbatim} <30,!17,2:/_,4:/!,6:/!2, - 10:/iPr,14:/tBu,16:/Ph^-60 + 10:/?!,14:/??!,16:/Ph^-60 \end{verbatim} \MCFgraph %----------------------------------------------------------------------------- @@ -585,9 +585,12 @@ exact mass, molecular formula. \subsubsection{Fixed rotate angle} \index{\textgreater}% \begin{verbatim} - >45 : rotate 45 + >n : rotate n + + <30,!4, + 2:/!6>30, % 2:\,30,30,30,30,30,30 + 4:/!4>-45 % 4:\,-45,-45,-45,-45 - <30,!6,6>45:/!3 \end{verbatim} \MCFgraph %----------------------------------------------------------------------------- @@ -601,28 +604,38 @@ exact mass, molecular formula. %----------------------------------------------------------------------------- \subsection{Miscellaneous} %----------------------------------------------------------------------------- -\subsubsection{} +\subsubsection{Abbreviated parts} +\index{N!}% +\begin{verbatim} + NH : N,/H~nl + N! : N,/_ + N!2 : N,/! + SO : S,//O + SOO : S,//O^35,//^-35 + + <-30,!2,NH,!2,N!,!2,N!2,SO,!2,SOO,! +\end{verbatim} +\MCFgraph +\index{?!}% +\index{??}% \begin{verbatim} - NH,SO,SOO : - insert hetero atom and group - simultaneously + ?! : /_,! + ?? : /_^35,/_-35 + /?! : isopropyl + /??! : tert-butyl + /N?! : dimethylamino - <-30,!2,NH,!,SO,!,SOO,! - <-30,!4,3:NH,5:SO,7:SOO + <30,!9`1,?!,!,??,!, + 2:??,4:/??,6:/??!,8:/N?! \end{verbatim} \MCFgraph %----------------------------------------------------------------------------- \subsubsection{Make block} -\index{\textbar\textless \textgreater\textbar}% |< \index{\textbar= =\textbar}% |= \begin{verbatim} - |< : start brock - >| : end brock - |= : start brock / bond length=n =| : end brock - <-30,!2,|<,``1.2,!4,>|,!2 <-30,!2,|=1.2,!4,=|,!2 \end{verbatim} \MCFgraph @@ -641,8 +654,7 @@ exact mass, molecular formula. <30,!, /'(!,/_,!,OH), !4,/'(!,/_,!,OH),!3 - <30,!8, - {2,6}:/'(!,/_,!,OH) + <30,!8,{2,6}:/'(!,/_,!,OH) \end{verbatim} \MCFgraph %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% @@ -1366,8 +1378,7 @@ beginfont("EN:Paclitaxel","MW:853.91") 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 + 11:*/OCO!>rl,12:/*OCO!^-15>lr ) endfont \end{verbatim} @@ -1408,13 +1419,13 @@ beginfont("EN:Quinine","MW:324.42") MC( <30,Ph,3=Ph,7:N,6:/O!, 10:\,*/OH,/H~zf^-60,!, - |,?6,2:N,1:*/H^60,4:*\,!!, + |,?6,2:N,1:*/H^60,4:*/!!, 2:@,165~zf,60,5~zb:# ) endfont \end{verbatim} \MCFgraph -%----------------------------------------------------------------------------- +%------------------------------------------------------------------------ \onecolumn \section{Example to use mcf2graph} \subsection{Molecular definition file} @@ -1436,8 +1447,7 @@ outputtemplate:="%j-%3c.png"; > %------------------------------------------------------------------------- beginfont("N:1","EN:Ampicillin") > begin font(information) MC(<45,?4,2:N,2=?5,-1:S, > begin MCF (1) - {3^45,4^-45}:/*H,1://O^15,5:/*COOH^-18, > - {6^35,6^-35}:/_, > + {3^45,4^-45}:/*H,1://O^15,5:/*COOH^-18,6:??, > 4:@,75,NH,!,//O,!,/*NH,!,Ph) > end MCF endfont > end font %------------------------------------------------------------------------ @@ -1445,7 +1455,7 @@ beginfont("N:2","EN:Cholesterol") > begin font(information) MC(<30,?6,{-4,-2}=?6,-4=?5,7=dl, > begin MCF (2) 1:*/OH,{4,12}:*/_^60,9:*/H^60, > 10:/*H^180,{11,-1}:/*H^-60, > - -1:@,17,/*_,!4,/_,!) > end MCF + -1:@,17,/*_,!4,?!) > end MCF endfont > end font %------------------------------------------------------------------------ beginfont("N:3","EN:Limonin") > begin font(information) @@ -1461,7 +1471,7 @@ beginfont("N:4","EN:beta-carotene) > begin font(information) MC(<30,?6,3=dl,{3,5^35,5^-35}:/_, > begin MCF (4) 4:\,|,!18,{1,3,5,7,9,11,13,15,17}=dr, > {3,7,12,16}:/_, > - |,?6,6=dl,{6,2^35,2^-35}:/_) > end MCF + |,?6,6=dl,2:??,6:/_) > end MCF endfont > end font %------------------------------------------------------------------------ bye @@ -1735,15 +1745,15 @@ endfont; %-------------------------------------------------------------------- \begin{document} \unitlength=1mm% -\INFO{F:mcf_man_soc,C:139,NO:1,mw:349.40462,fm:C16H19N3O4S,EN:Ampicillin}% -\INFO{F:mcf_man_soc,C:140,NO:2,mw:386.6532,fm:C27H46O,EN:Cholesterol}% +\INFO{F:mcf_man_soc,C:140,NO:1,mw:349.40462,fm:C16H19N3O4S,EN:Ampicillin}% +\INFO{F:mcf_man_soc,C:141,NO:2,mw:386.6532,fm:C27H46O,EN:Cholesterol}% \end{document} %-------------------------------------------------------------------- \end{verbatim}% %############################################################################ %------------------------------------------------------------------------ -\INFO{F:mcf_man_soc,C:139,NO:1,mw:349.40462,fm:C16H19N3O4S,EN:Ampicillin}% -\INFO{F:mcf_man_soc,C:140,NO:2,mw:386.6532,fm:C27H46O,EN:Cholesterol}% +\INFO{F:mcf_man_soc,C:140,NO:1,mw:349.40462,fm:C16H19N3O4S,EN:Ampicillin}% +\INFO{F:mcf_man_soc,C:141,NO:2,mw:386.6532,fm:C27H46O,EN:Cholesterol}% %------------------------------------------------------------------------ \printindex %------------------------------------------------------------------------ diff --git a/graphics/mcf2graph/mcf_mplib_exa.pdf b/graphics/mcf2graph/mcf_mplib_exa.pdf index ff808a4ace..c901af300b 100644 Binary files a/graphics/mcf2graph/mcf_mplib_exa.pdf and b/graphics/mcf2graph/mcf_mplib_exa.pdf differ diff --git a/graphics/mcf2graph/mcf_mplib_exa.tex b/graphics/mcf2graph/mcf_mplib_exa.tex index 1dd167811e..520379ffe1 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 2020.12.12 +% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2021.01.03 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%% mcf2graph.mf it must be version 4.54 or later +%%% mcf2graph.mf it must be version 4.55 or later \documentclass{article} %------------------------------------------------------------------------------ \usepackage{luamplib}% @@ -174,7 +174,7 @@ beginfont("NO:5","EN:Erythromycin","MW:733.93"); 14:O,13:/*Et,{1,9}://O,{2,10}:*/_,{4,6^-35,8,12^35}:/*_, {6^35,11,12^-35}:*/OH, $3:\*,O,30,|,?6`.7,2:O,{3,5^35}:/_,4:/OH,5^-35:/O!, - $5:\*^30`1.7,O,!,|,?6`.7,6:O,5:/_,2:/OH,3:/N!_ + $5:\*^30`1.7,O,!,|,?6`.7,6:O,5:/_,2:/OH,3:/N?! ) endfont; \end{verbatim} @@ -187,7 +187,7 @@ beginfont("NO:5","EN:Erythromycin","MW:733.93"); 14:O,13:/*Et,{1,9}://O,{2,10}:*/_,{4,6^-35,8,12^35}:/*_, {6^35,11,12^-35}:*/OH, $3:\*,O,30,|,?6`.7,2:O,{3,5^35}:/_,4:/OH,5^-35:/O!, - $5:\*^30`1.7,O,!,|,?6`.7,6:O,5:/_,2:/OH,3:/N!_ + $5:\*^30`1.7,O,!,|,?6`.7,6:O,5:/_,2:/OH,3:/N?! ) ext( defaultscale:=0.8; @@ -204,10 +204,10 @@ endfont; beginfont("EN:Paclitaxel","MW:853.918") fsize:=(120mm,35mm); MC( - ?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}:/_,{3^-60,15}:*/OH,8:/*H^-60,9:*/_^60,10://O, + ?6,5=d,3:@,|=1,36,45,45,45,45,=|,5:#,-4=?6,-4=?4,-1=wb,-3=wf,-1:O, + 4:??,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 + 7:\*,O,-45,//O,60,Ph,11:*/OCO!>rl,12:/*OCO!^-15>lr ) endfont \end{verbatim} @@ -216,10 +216,10 @@ endfont beginfont("EN:Paclitaxel","MW:853.918") fsize:=(120mm,35mm); MC( - ?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}:/_,{3^-60,15}:*/OH,8:/*H^-60,9:*/_^60,10://O, + ?6,5=d,3:@,|=1,36,45,45,45,45,=|,5:#,-4=?6,-4=?4,-1=wb,-3=wf,-1:O, + 4:??,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 + 7:\*,O,-45,//O,60,Ph,11:*/OCO!>rl,12:/*OCO!^-15>lr ) ext( defaultscale:=0.8; @@ -239,11 +239,11 @@ endfont beginfont("NO:6","EN:Vancomycin","MW:1449.25"); fsize:=(150mm,50mm); MC(<-30,|=1,!12,{1,3,12}=zf,7=wf,/H^-60,60,*/OH,60, - Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,$1:#, - $7:@,$26:#,$1:@,60,//O,60,NH,60,/*H,*/COOH^180,-60, - Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,$4:#,=|, - {3^40,6,9,12}://O,{2,5,8,11}:NH,{1,4^180}:*/H,{7^-60,10^60,14^60}:/*H,||, - 10:*\^-60,60,//O,!,NH2,13:*\,NH,!,//O,!,/!iPr^-35>60,*/H^60,!~zf,NH,!, + Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,1:#, + 7:@,26:#,$1:@,60,//O,60,NH,60,/*H,*/COOH^180,-60, + Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,4:#,=|, + {3^40,6,9,12}://O,{2,5,8,11}:NH,{1,4^180}:*/H,{7^-60,10^60,14^60}:/*H, + 10:*\^-60,60,//O,!,NH2,13:*\,NH,!,//O,!,/??!,*/H^60,!~zf,NH,!, 23:\,O,!,|,?6`.7,2:O,3^10:/!OH,{4,5}:/OH, -1:\,O,!,|,?6`.7,6:O,{3^35,5}:/_,3^-35:/NH2,4:/OH) endfont; @@ -253,11 +253,11 @@ endfont; beginfont("NO:6","EN:Vancomycin","MW:1449.25"); fsize:=(150mm,45mm); MC(<-30,|=1,!12,{1,3,12}=zf,7=wf,/H^-60,60,*/OH,60, - Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,$1:#, - $7:@,$26:#,$1:@,60,//O,60,NH,60,/*H,*/COOH^180,-60, - Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,$4:#,=|, - {3^40,6,9,12}://O,{2,5,8,11}:NH,{1,4^180}:*/H,{7^-60,10^60,14^60}:/*H,||, - 10:*\^-60,60,//O,!,NH2,13:*\,NH,!,//O,!,/!iPr^-35>60,*/H^60,!~zf,NH,!, + Ph,-4:/Cl,-3:\,O,!,Ph,-4:\,O,!,Ph,-1^15:/Cl,-3:\,/*OH,*/H^-60,1:#, + 7:@,26:#,$1:@,60,//O,60,NH,60,/*H,*/COOH^180,-60, + Ph,{-2,-4}:/OH,-1:\,Ph,-5:/OH,-2:@,4:#,=|, + {3^40,6,9,12}://O,{2,5,8,11}:NH,{1,4^180}:*/H,{7^-60,10^60,14^60}:/*H, + 10:*\^-60,60,//O,!,NH2,13:*\,NH,!,//O,!,/??!,*/H^60,!~zf,NH,!, 23:\,O,!,|,?6`.7,2:O,3^10:/!OH,{4,5}:/OH, -1:\,O,!,|,?6`.7,6:O,{3^35,5}:/_,3^-35:/NH2,4:/OH) ext( -- cgit v1.2.3