From 0c16ddd29d43c785b867739f9b8fad8885ee548b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 19 Nov 2013 00:56:32 +0000 Subject: xymtex (now lppl, minus manuals without sources) git-svn-id: svn://tug.org/texlive/trunk@32182 c570f23f-e606-0410-a88d-b1316a301751 --- .../source/latex/xymtex/base/lowcycle.dtx | 892 +++++++++++++++++++++ 1 file changed, 892 insertions(+) create mode 100644 Master/texmf-dist/source/latex/xymtex/base/lowcycle.dtx (limited to 'Master/texmf-dist/source/latex/xymtex/base/lowcycle.dtx') diff --git a/Master/texmf-dist/source/latex/xymtex/base/lowcycle.dtx b/Master/texmf-dist/source/latex/xymtex/base/lowcycle.dtx new file mode 100644 index 00000000000..3aac86549ea --- /dev/null +++ b/Master/texmf-dist/source/latex/xymtex/base/lowcycle.dtx @@ -0,0 +1,892 @@ +% \iffalse meta-comment +%% File: lowcycle.dtx +% +% Copyright 1993,1996,1998,2001,2002,2004,2010 by Shinsaku Fujita +% +% This file is part of XyMTeX system. +% ------------------------------------- +% +% This file is a successor to: +% +% lowcycle.sty +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \typeout{XyMTeX for Drawing Chemical Structural Formulas. Version 1.00} +% \typeout{ -- Released December 1, 1993 by Shinsaku Fujita} +% Copyright (C) 1993 by Shinsaku Fujita, all rights reserved. +% +% This file is a part of the macro package ``XyMTeX'' which has been +% designed for typesetting chemical structural formulas. +% +% This file is to be contained in the ``xymtex'' directory which is +% an input directory for TeX. It is a LaTeX optional style file and +% should be used only within LaTeX, because several macros of the file +% are based on LaTeX commands. +% +% For the review of XyMTeX, see +% (1) Shinsaku Fujita, ``Typesetting structural formulas with the text +% formatter TeX/LaTeX'', Computers and Chemistry, in press. +% The following book deals with an application of TeX/LaTeX to +% preparation of manuscripts of chemical fields: +% (2) Shinsaku Fujita, ``LaTeX for Chemists and Biochemists'' +% Tokyo Kagaku Dozin, Tokyo (1993) [in Japanese]. +% +% This work may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either version 1.3 +% of this license or (at your option) any later version. +% The latest version of this license is in +% http://www.latex-project.org/lppl.txt +% and version 1.3 or later is part of all distributions of LaTeX +% version 2005/12/01 or later. +% +% This work has the LPPL maintenance status `maintained'. +% The Current Maintainer of this work is Shinsaku Fujita. +% +% This work consists of the files lowcycle.dtx and lowcycle.ins +% and the derived file lowcycle.sty. +% +% Please report any bugs, comments, suggestions, etc. to: +% Shinsaku Fujita, +% Shonan Institute of Chemoinformatics and Mathematical Chemistry +% Kaneko 479-7 Ooimachi, Ashigara-Kami-Gun, Kanagawa 250-0019 Japan +% (old address) +% Ashigara Research Laboratories, Fuji Photo Film Co., Ltd., +% Minami-Ashigara, Kanagawa-ken, 250-01, Japan. +% (old address) +% Department of Chemistry and Materials Technology, +% Kyoto Institute of Technology, \\ +% Matsugasaki, Sakyoku, Kyoto, 606 Japan +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{December 01, 1993} +% \def\versi@nno{ver1.00} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{August 16, 1996} +% \def\versi@nno{ver1.01} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{October 31, 1998} +% \def\versi@nno{ver1.02} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{December 25, 1998} +% \def\versi@nno{ver2.00} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{June 20, 2001} +% \def\versi@nno{ver2.01} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{April 30, 2002} +% \def\versi@nno{ver3.00} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{May 30, 2002} +% \def\versi@nno{ver4.00} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \def\j@urnalname{lowcycle} +% \def\versi@ndate{August 30, 2004} +% \def\versi@nno{ver4.01} +% \def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% \fi +% +% \CheckSum{175} +%% \CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +% +% \setcounter{StandardModuleDepth}{1} +% +% \StopEventually{} +% \MakeShortVerb{\|} +% +% \iffalse +% \changes{v1.01}{1996/06/26}{first edition for LaTeX2e} +% \changes{v1.02}{1998/10/31}{revised edition for LaTeX2e} +% \changes{v2.00}{1998/12/25}{enhanced edition for LaTeX2e} +% \changes{v2.01}{2001/6/20}{Size reduction and Clip information} +% \changes{v3.00}{2002/4/30}{sfpicture environment, etc.} +% \changes{v4.00}{2002/05/30}{PostScript output and ShiftPicEnv} +% \changes{v4.01}{2004/08/30}{Minor additions} +% \changes{v5.00}{2010/10/01}{the LaTeX Project Public License} +% \fi +% +% \iffalse +%<*driver> +\NeedsTeXFormat{pLaTeX2e} +% \fi +\ProvidesFile{lowcycle.dtx}[2010/10/01 v5.00 XyMTeX{} package file] +% \iffalse +\documentclass{ltxdoc} +\GetFileInfo{lowcycle.dtx} +% +% %%XyMTeX Logo: Definition 2%%% +\def\UPSILON{\char'7} +\def\XyM{X\kern-.30em\smash{% +\raise.50ex\hbox{\UPSILON}}\kern-.30em{M}} +\def\XyMTeX{\XyM\kern-.1em\TeX} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\title{Lower carbocyclic compounds by {\sffamily lowcycle.sty} +(\fileversion) of \XyMTeX{}} +\author{Shinsaku Fujita \\ +Shonan Institute of Chemoinformatics and Mathematical Chemistry, \\ +Kaneko 479-7 Ooimachi, Ashigara-Kami-Gun, Kanagawa 250-0019 Japan +% % (old address) +% %Department of Chemistry and Materials Technology, \\ +% %Kyoto Institute of Technology, \\ +% %Matsugasaki, Sakyoku, Kyoto, 606-8585 Japan +% %% (old address) +% %% Ashigara Research Laboratories, +% %% Fuji Photo Film Co., Ltd., \\ +% %% Minami-Ashigara, Kanagawa, 250-01 Japan +} +\date{\filedate} +% +\begin{document} + \maketitle + \DocInput{lowcycle.dtx} +\end{document} +% +% \fi +% +% \section{Introduction}\label{lowcycle:intro} +% +% \subsection{Options for {\sffamily docstrip}} +% +% \DeleteShortVerb{\|} +% \begin{center} +% \begin{tabular}{|l|l|} +% \hline +% \emph{option} & \emph{function}\\ \hline +% lowcycle & lowcycle.sty \\ +% driver & driver for this dtx file \\ +% \hline +% \end{tabular} +% \end{center} +% \MakeShortVerb{\|} +% +% \subsection{Version Information} +% +% \begin{macrocode} +%<*lowcycle> +\typeout{XyMTeX for Drawing Chemical Structural Formulas. Version 5.00} +\typeout{ -- Released October 01, 2010 by Shinsaku Fujita} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\def\j@urnalname{lowcycle} +\def\versi@ndate{October 01, 2010} +\def\versi@nno{ver5.00} +\def\copyrighth@lder{SF} % Shinsaku Fujita +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\typeout{XyMTeX Macro File `\j@urnalname' (\versi@nno) <\versi@ndate>% +\space[\copyrighth@lder]} +% \end{macrocode} +% +% \section{List of commands for lowcycle.sty} +% +% \begin{verbatim} +% ********************************** +% * lowcycle.sty: list of commands * +% ********************************** +% +% \cyclopentanev \@cyclopentanev +% \cyclopentanevi \@cyclopentanevi +% \cyclopentaneh \@cyclopentaneh +% \cyclopentanehi \@cyclopentanehi +% +% \cyclobutane \@cyclobutane +% +% \cyclopropane \@cyclopropane +% \cyclopropanei \@cyclopropanei +% \cyclopropaneh \@cyclopropaneh +% \cyclopropanehi \@cyclopropanehi +% +% \indanev \@indanev +% \indanevi \@indanevi +% \indaneh \@indaneh +% \indanehi \@indanehi +% \end{verbatim} +% +% \section{Input of basic macros} +% +% To assure the compatibility to \LaTeX{}2.09 (the native mode), +% the commands added by \LaTeXe{} have not been used in the resulting sty +% files ({\sf lowcycle.sty} for the present case). Hence, the combination +% of |\input| and |\@ifundefined| is used to crossload sty +% files ({\sf chemstr.sty} etc. for the present case) in place of the +% |\RequirePackage| command of \LaTeXe{}. +% +% \begin{macrocode} +% ************************* +% * input of basic macros * +% ************************* +\@ifundefined{setsixringv}{\input chemstr.sty\relax}{} +\@ifundefined{threehetero}{\input hetarom.sty\relax}{} +\@ifundefined{sixheteroh}{\input hetaromh.sty\relax}{} +\unitlength=0.1pt +% \end{macrocode} +% +% \section{Cyclopentane derivatives} +% \subsection{Vertical type} +% +% The macros |\cyclopentanev| and |\cyclopentanevi| have an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% The macro |\cyclopentanev| draws a five-membered ring with a +% flat top bond, while the macro |\cyclopentanevi| draws an +% inverse ring with a flat bottom bond. +% \begin{verbatim} +% ****************************** +% * cyclopentane derivatives * +% * (vertical type & inverse) * +% ****************************** +% +% \cyclopentanev[BONDLIST]{SUBSLIST} +% \cyclopentanevi[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to e, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. The +% option `$n+$' ($n=1$--$5$) is used for designating a plus charge on +% the $n$-carbon. +% The option `$0+$'is used for designating a plus charge at the center +% of the five-membered ring. +% \begin{verbatim} +% BONDLIST: list of inner double bonds +% +% none : mother nucleus (fully saturated form) +% a : 1,2-double bond +% b : 2,3-double bond +% c : 4,3-double bond +% d : 4,5-double bond +% e : 5,1-double bond +% {n+} : plus at the n-carbon atom (n = 1 to 5) +% {0+} : plus at the center +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents +% +% for n = 1 to 5 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% e.g. +% +% \cyclopentanev{1==H;2==F} +% \cyclopentanev[]{1==H;2==F} +% \cyclopentanev[H]{1==H;2==F} +% \end{verbatim} +% +% \begin{macro}{\cyclopentanev} +% \begin{macro}{\cyclopentanevi} +% \begin{macrocode} +\def\cyclopentanev{\@ifnextchar[{\@cyclopentanev[@}{\@cyclopentanev[]}} +\def\@cyclopentanev[#1]#2{% +\iforigpt \typeout{command `cyclopentanev' % + is based on `fiveheterov'.}\fi% +\fiveheterov[#1]{}{#2}} +% \end{macrocode} +% +% \begin{macrocode} +\def\cyclopentanevi{\@ifnextchar[{\@cyclopentanevi[@}{\@cyclopentanevi[]}} +\def\@cyclopentanevi[#1]#2{% +\iforigpt \typeout{command `cyclopentanevi' % + is based on `fiveheterovi'.}\fi% +\fiveheterovi[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \subsection{Horizontal type} +% +% The macros |\cyclopentaneh| and |\cyclopentanehi| have an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% The macro |\cyclopentaneh| draws a five-membered ring with a +% vertical left bond, while the macro |\cyclopentanehi| draws an +% inverse ring with a vertical right bond. +% \begin{verbatim} +% ******************************** +% * cyclopentane derivatives * +% * (horizontal type & inverse) * +% ******************************** +% +% \cyclopentaneh[BONDLIST]{SUBSLIST} +% \cyclopentanehi[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to e, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. The +% option `$n+$' ($n=1$--$5$) is used for designating a plus charge on +% the $n$-carbon. +% The option `$0+$'is used for designating a plus charge at the center +% of the five-membered ring. +% \begin{verbatim} +% +% BONDLIST: list of inner double bonds +% +% none : mother nucleus (fully saturated form) +% a : 1,2-double bond +% b : 2,3-double bond +% c : 4,3-double bond +% d : 4,5-double bond +% e : 5,1-double bond +% {n+} : plus at the n-carbon atom (n = 1 to 5) +% {0+} : plus at the center +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents +% +% for n = 1 to 5 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% +% e.g. +% +% \cyclopentaneh{1==H;2==F} +% \cyclopentanehi[]{1==H;2==F} +% \cyclopentanehi[H]{1==H;2==F} +% +% \end{verbatim} +% +% \begin{macro}{\cyclopentaneh} +% \begin{macro}{\cyclopentanehi} +% \begin{macrocode} +\def\cyclopentaneh{\@ifnextchar[{\@cyclopentaneh[@}{\@cyclopentaneh[]}} +\def\@cyclopentaneh[#1]#2{% +\iforigpt \typeout{command `cyclophentaneh' % + is based on `fiveheteroh'.}\fi% +\fiveheteroh[#1]{}{#2}} +% \end{macrocode} +% +% \begin{macrocode} +\def\cyclopentanehi{% + \@ifnextchar[{\@cyclopentanehi[@}{\@cyclopentanehi[]}} +\def\@cyclopentanehi[#1]#2{% +\iforigpt \typeout{command `cyclopentanehi' % + is based on `fiveheterohi'.}\fi% +\fiveheterohi[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \section{Indan derivatives} +% \subsection{Vertical type} +% +% The macros |\indanev| and |\indanevi| have an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% The macro |\indanev| draws a five-membered ring with a +% flat top bond, while the macro |\indanevi| draws an +% inverse ring with a flat bottom bond. +% \begin{verbatim} +% *********************************************************** +% * indane derivatives (fused six- and five-membered rings) * +% * (vertical type & inverse) * +% *********************************************************** +% +% \indanev[BONDLIST]{SUBSLIST} +% \indanevi[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to j, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. +% The option `A' typesets a six-membered ring with an aromatic circle. +% The option `$n+$' ($n=1$--$7$) is used for designating a plus charge on +% the $n$-carbon. +% \begin{verbatim} +% +% BONDLIST: list of bonds +% +% none or r : aromatic six-membered ring +% H or [] : fully saturated form +% a : 1,2-double bond b : 2,3-double bond +% c : 3,3a-double bond d : 4,3a-double bond +% e : 4,5-double bond f : 5,6-double bond +% g : 6,7-double bond h : 7,7a-double bond +% i : 1,7a-double bond j : 3a,4a-double bond +% A : aromatic circle +% {n+} : plus at the n-nitrogen atom (n = 1 to 7) +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents (max 7 substitution positions) +% +% for n = 1 to 8 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% +% for 8 (3a position) and 9 (7a position) +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% +% e.g. +% +% \indanev{1==Cl;2==F} +% \indanev[c]{1==Cl;4==F;2==CH$_{3}$} +% \indanev[eb]{1D==O;4SA==MeO;4SB==OMe;5==Cl;6==Cl} +% +% \end{verbatim} +% +% \begin{macro}{\indanev} +% \begin{macro}{\indanevi} +% \begin{macrocode} +\def\indanev{\@ifnextchar[{\@indanev[@}{\@indanev[rb]}} +\def\@indanev[#1]#2{% +\iforigpt \typeout{command `indanev' % + is based on `nonaheterov'.}\fi% +\nonaheterov[#1]{}{#2}} +% \end{macrocode} +% +% \begin{macrocode} +\def\indanevi{\@ifnextchar[{\@indanevi[@}{\@indanevi[rb]}} +\def\@indanevi[#1]#2{% +\iforigpt \typeout{command `indanevi' % + is based on `nonaheterovi'.}\fi% +\nonaheterovi[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \subsection{Horizontal type} +% +% The macros |\indaneh| and |\indanehi| have an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% The macro |\indaneh| draws a five-membered ring with a +% vertical left bond, while the macro |\indanehi| draws an +% inverse ring with a vertical right bond. +% \begin{verbatim} +% *********************************************************** +% * indane derivatives (fused six- and five-membered rings) * +% * (horizontal type & inverse) * +% *********************************************************** +% +% \indaneh[BONDLIST]{SUBSLIST} +% \indanehi[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to j, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. +% The option `A' typesets a six-membered ring with an aromatic circle. +% The option `$n+$' ($n=1$--$7$) is used for designating a plus charge on +% the $n$-carbon. +% \begin{verbatim} +% +% BONDLIST: list of bonds +% +% none or r : aromatic six-membered ring +% H or [] : fully saturated form +% a : 1,2-double bond b : 2,3-double bond +% c : 3,3a-double bond d : 4,3a-double bond +% e : 4,5-double bond f : 5,6-double bond +% g : 6,7-double bond h : 7,7a-double bond +% i : 1,7a-double bond j : 3a,4a-double bond +% A : aromatic circle +% {n+} : plus at the n-nitrogen atom (n = 1 to 7) +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents +% +% for n = 1 to 8 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% +% for 8 (3a position) and 9 (7a position) +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% e.g. +% +% \indaneh{1==Cl;2==F} +% \indaneh[c]{1==Cl;4==F;2==CH$_{3}$} +% \indaneh[eb]{1D==O;4SA==MeO;4SB==OMe;5==Cl;6==Cl} +% \end{verbatim} +% +% \begin{macro}{\indaneh} +% \begin{macro}{\indanehi} +% \begin{macrocode} +\def\indaneh{\@ifnextchar[{\@indaneh[@}{\@indaneh[rb]}} +\def\@indaneh[#1]#2{% +\iforigpt \typeout{command `indaneh' % + is based on `nonaheteroh'.}\fi% +\nonaheteroh[#1]{}{#2}} +\def\indanehi{\@ifnextchar[{\@indanehi[@}{\@indanehi[rb]}} +\def\@indanehi[#1]#2{% +\iforigpt \typeout{command `indanehi' % + is based on `nonaheterohi'.}\fi% +\nonaheterohi[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% +% \section{Cyclobutane derivatives} +% +% The macros |\cyclobutane| has an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% This macro is based on the \verb/\fourhetero/ command for drawing +% four-membered heterocycles. +% \begin{verbatim} +% *************************** +% * cyclobutane derivatives * +% *************************** +% The following numbering is adopted in this macro. +% +% c +% 4 _____ 3 +% d | | b +% | | +% 1 ----- 2<===== the original point +% a +% +% \cyclobutane[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to e, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. +% The option `$n+$' ($n=1$--$4$) is used for designating a plus charge on +% the $n$-carbon. +% \begin{verbatim} +% +% BONDLIST: list of inner double bonds +% +% a : 1,2-double bond +% b : 2,3-double bond +% c : 4,3-double bond +% e : 4,1-double bond +% +% {n+} : plus at the n-nitrogen atom (n = 1 to 4) +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents (max 5 substitution positions) +% +% for n = 1 to 4 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% e.g. +% +% \cyclobutane{1==H;2==F} +% \cyclobutane[c]{1==Cl;4==F;2==CH$_{3}$} +% \cyclobutane[eb]{1D==O;4SA==MeO;4SB==OMe} +% \end{verbatim} +% +% \begin{macro}{\cyclobutane} +% \begin{macrocode} +\def\cyclobutane{\@ifnextchar[{\@cyclobutane[@}{\@cyclobutane[]}} +\def\@cyclobutane[#1]#2{% +\iforigpt \typeout{command `cyclobutane' % + is based on `fourhetero'.}\fi% +\fourhetero[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% +% \section{Cyclopropane derivatives} +% +% The macros |\cyclopropane| has an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% This macro is based on the \verb/\threehetero/ command for drawing +% three-membered heterocycles. +% \begin{verbatim} +% **************************** +% * cyclopropane derivatives * +% * (vertical type) * +% **************************** +% The following numbering is adopted in this macro. +% +% b +% 3--------2 +% c ` / a +% `1/ <===== the original point +% +% +% \cyclopropane[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to c, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. +% The option `A' is used for designating an aromatic character with a +% circle. +% The option `$n+$' ($n=1$--$3$) is used for designating a plus charge on +% the $n$-carbon, while +% the case $n=4$--$6$) indicates a plus charge outside the ring. +% The option `0+' draws a plus symbol at the center of the ring. +% \begin{verbatim} +% +% BONDLIST = +% +% none : saturated +% a : 1,2-double bond +% b : 2,3-double bond +% c : 3,1-double bond +% A : aromatic circle +% {n+} : plus at the n-hetero atom (n = 1 to 3) +% : n=4 -- outer plus at 1 position +% : n=5 -- outer plus at 2 position +% : n=6 -- outer plus at 3 position +% {0+} : plus at the center of a cyclopropane ring +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents (max 3 substitution positions) +% +% for n = 1 to 3 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% +% e.g. +% +% \cyclopropane{1==N}{1==Cl;2==F} +% +% \end{verbatim} +% +% \begin{macro}{\cyclopropane} +% \begin{macro}{\cyclopropanev} +% \begin{macrocode} +\def\cyclopropane{\@ifnextchar[{\@cyclopropane[@}{\@cyclopropane[]}} +\def\@cyclopropane[#1]#2{% +\iforigpt \typeout{command `cyclopropane' % + is based on `threehetero'.}\fi% +\threehetero[#1]{}{#2}} +\let\cyclopropanev=\cyclopropane +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% The macros |\cyclopropanei| has an +% argument |SUBSLIST| as well as an optional argument |BONDLIST|. +% This macro is based on the \verb/\threehetero/ command for drawing +% three-membered heterocycles. +% \begin{verbatim} +% **************************** +% * cyclopropane derivatives * +% * (inverse vertical type) * +% **************************** +% The following numbering is adopted in this macro. +% +% /1` <===== the original point +% c / ` a +% 3--------2 +% b +% +% \cyclopropanei[BONDLIST]{SUBSLIST} +% \end{verbatim} +% +% The |BONDLIST| argument contains one or more +% characters selected from a to c, each of which indicates the presence of +% an inner (endcyclic) double bond on the corresponding position. +% The option `A' is used for designating an aromatic character with a +% circle. +% The option `$n+$' ($n=1$--$3$) is used for designating a plus charge on +% the $n$-carbon, while +% the case $n=4$--$6$) indicates a plus charge outside the ring. +% The option `0+' draws a plus symbol at the center of the ring. +% \begin{verbatim} +% +% BONDLIST = +% +% none : saturated +% a : 1,2-double bond +% b : 2,3-double bond +% c : 3,1-double bond +% A : aromatic circle +% {n+} : plus at the n-hetero atom (n = 1 to 3) +% : n=4 -- outer plus at 1 position +% : n=5 -- outer plus at 2 position +% : n=6 -- outer plus at 3 position +% {0+} : plus at the center of a cyclopropane ring +% \end{verbatim} +% +% The |SUBSLIST| argument contains one or more substitution descriptors +% which are separated from each other by a semicolon. Each substitution +% descriptor has a locant number with a bond modifier and a substituent, +% where these are separated with a double equality symbol. +% \begin{verbatim} +% +% SUBSLIST: list of substituents (max 3 substitution positions) +% +% for n = 1 to 3 +% +% nD : exocyclic double bond at n-atom +% n or nS : exocyclic single bond at n-atom +% nA : alpha single bond at n-atom +% nB : beta single bond at n-atom +% nSA : alpha single bond at n-atom (boldface) +% nSB : beta single bond at n-atom (dotted line) +% nSa : alpha (not specified) single bond at n-atom +% nSb : beta (not specified) single bond at n-atom +% \end{verbatim} +% +% Several examples are shown as follows. +% \begin{verbatim} +% +% e.g. +% +% \cyclopropanei{1==N}{1==Cl;2==F} +% +% \end{verbatim} +% \changes{v1.02}{1998/10/20}{Newly added command} +% +% \begin{macro}{\cyclopropanei} +% \begin{macro}{\cyclopropenevi} +% \begin{macrocode} +\def\cyclopropanei{\@ifnextchar[{\@cyclopropanei[@}{\@cyclopropanei[]}} +\def\@cyclopropanei[#1]#2{% +\iforigpt \typeout{command `cyclopropanei' % + is based on `threeheteroi'.}\fi% +\threeheteroi[#1]{}{#2}} +\let\cyclopropanevi=\cyclopropanei +% \end{macrocode} +% \end{macro} +% \end{macro} +% +% \begin{macro}{\cyclopropaneh} +% \begin{macrocode} +\def\cyclopropaneh{\@ifnextchar[{\@cyclopropaneh[@}{\@cyclopropaneh[]}} +\def\@cyclopropaneh[#1]#2{% +\iforigpt \typeout{command `cyclopropaneh' % + is based on `threeheteroh'.}\fi% +\threeheteroh[#1]{}{#2}} +% \end{macrocode} +% \end{macro} +% +% \begin{macro}{\cyclopropanehi} +% \begin{macrocode} +\def\cyclopropanehi{\@ifnextchar[{\@cyclopropanehi[@}{\@cyclopropanehi[]}} +\def\@cyclopropanehi[#1]#2{% +\iforigpt \typeout{command `cyclopropanehi' % + is based on `threeheterohi'.}\fi% +\threeheterohi[#1]{}{#2}} +% +% \end{macrocode} +% \end{macro} +% +% \Finale +% +\endinput -- cgit v1.2.3