%%
%% This is file `ccycle.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% ccycle.dtx  (with options: `ccycle')
%% 
%% This is a generated file.
%% 
%% Copyright 1996,1998 by Shinsaku Fujita
%% 
%% This file is part of the XyMTeX system.
%% =======================================
%% 
%% Version 1.01 Released on August 16, 1996
%% Version 1.02 Released on October 31, 1996
%% Version 2.00 Released on December 25, 1998
%% 
%% Copyright (C) 1996,1998 by Shinsaku Fujita, all rights reserved.
%% This style file is created for drawing chemical structural formulas
%% This style file is to be contained in the ``xymtex'' directory which
%% is an input directory for TeX.
%% 
%% Copying of this file is authorized only if either
%% 
%%  (1) you make absolutely no changes to your copy, including name and
%%      directory name
%%  (2) if you do make changes,
%%      (a) you name it something other than the names included in the
%%          ``xymtex'' directory and
%%      (b) you acknowledge the original name.
%%  This restriction ensures that all standard styles are identical.
%% 
%% =======================================
%% 
%% This file contains several codes modified from latex.tex (LaTeX2.09)
%% and from latex.ltx (a LaTeX2e), the reused parts of which are subject to
%% Copyright 1994 the LaTeX3 project and the individual authors (For further
%% copyright information see the file legal.txt of the LaTeX2e standard
%% distribution, and any other copyright indicated in this file.)
%% 
%% File: ccycle.dtx
%% \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         \~}
\typeout{XyMTeX for Drawing Chemical Structural Formulas. Version 2.00}
\typeout{       -- Released December 25, 1998 by Shinsaku Fujita}
\def\j@urnalname{ccycle}
\def\versi@ndate{December 25, 1998}
\def\versi@nno{ver2.00}
\def\copyrighth@lder{SF} % Shinsaku Fujita
\typeout{XyMTeX Macro File `\j@urnalname' (\versi@nno) <\versi@ndate>%
\space[\copyrighth@lder]}
\@ifundefined{setsixringv}{\input chemstr.sty\relax}{}
\unitlength=0.1pt
\def\@chaira{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=10
           \put(0,0){\line(-1,1){120}}% single bond at 1
           \putlatom{-130}{110}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=-12
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{180}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=16
     \yl@ydiff=44
           \put(0,0){\line(-5,-3){144}}% single bond at 1 equatorial
           \putlatom{-160}{-130}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=10
           \put(-10,-10){\line(-1,1){120}}% double bond at 1
           \put(10,10){\line(-1,1){120}}% double bond at 1
           \putlatom{-130}{110}{\@memberb}% left type
          \else%
     \yl@xdiff=10
     \yl@ydiff=10
           \put(0,0){\line(-1,1){120}}% single bond at 1
           \putlatom{-130}{110}{\@memberb}% left type
   \fi\fi}%
\def\@chairb{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=70
           \put(170,-226){\line(-1,-1){120}}% single bond at 2
           \putlatom{40}{-416}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=92
           \put(170,-226){\line(0,-1){168}}% single bond at 2 axial
           \putlratom{138}{-486}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=16
     \yl@ydiff=34
           \put(170,-226){\line(-5,3){144}}% single bond at 2 equatorial
           \putlatom{10}{-174}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=70
           \put(160,-216){\line(-1,-1){120}}% double bond at 2
           \put(180,-236){\line(-1,-1){120}}% double bond at 2
           \putlatom{40}{-416}{\@memberb}% left type
          \else%
     \yl@xdiff=10
     \yl@ydiff=70
           \put(170,-226){\line(-1,-1){120}}% single bond at 2
           \putlatom{40}{-416}{\@memberb}% left type
   \fi\fi}%
\def\@chairc{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=24
           \put(573,-91){\line(5,4){170}}% single bond at 3
           \putratom{753}{21}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=-24
           \put(573,-91){\line(0,1){168}}% single bond at 3 axial
           \putlratom{533}{101}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-36
     \yl@ydiff=83
           \put(573,-91){\line(5,-3){144}}% single bond at 3 equatorial
           \putlatom{753}{-260}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=0
           \put(563,-83){\line(5,4){170}}% double bond at 3
           \put(583,-99){\line(5,4){170}}% double bond at 3
           \putratom{733}{41}{\@memberb}% right type
          \else%
     \yl@xdiff=-10
     \yl@ydiff=24
           \put(573,-91){\line(5,4){170}}% single bond at 3
           \putratom{753}{21}{\@memberb}% right type
   \fi\fi}%
\def\@chaird{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=70
           \put(843,-181){\line(1,-1){120}}% single bond at 4
           \putratom{953}{-371}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=91
           \put(843,-181){\line(0,-1){168}}% single bond at 4 axial
           \putlratom{801}{-440}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-16
     \yl@ydiff=16
           \put(843,-181){\line(5,3){144}}% single bond at 4 equatorial
           \putratom{1003}{-111}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=70
           \put(833,-191){\line(1,-1){120}}% double bond at 4
           \put(853,-171){\line(1,-1){120}}% double bond at 4
           \putratom{953}{-371}{\@memberb}% right type
          \else%
     \yl@xdiff=10
     \yl@ydiff=70
           \put(843,-181){\line(1,-1){120}}% single bond at 4
           \putratom{953}{-371}{\@memberb}% right type
   \fi\fi}%
\def\@chaire{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=10
           \put(673,46){\line(1,1){120}}% single bond at 5
           \putratom{803}{158}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=-24
           \put(673,46){\line(0,1){168}}% single bond at 5 axial
           \putlratom{633}{238}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-6
     \yl@ydiff=63
           \put(673,46){\line(5,-3){144}}% single bond at 5 equatorial
           \putratom{823}{-103}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-10
     \yl@ydiff=10
           \put(663,53){\line(1,1){120}}% double bond at 5
           \put(683,38){\line(1,1){120}}% double bond at 5
           \putratom{803}{158}{\@memberb}%  right type
          \else%
     \yl@xdiff=-10
     \yl@ydiff=24
           \put(673,46){\line(5,4){170}}% single bond at 5
           \putratom{853}{158}{\@memberb}% right type
   \fi\fi}%
\def\@chairf{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=0
     \yl@ydiff=54
           \put(270,-90){\line(-5,-4){170}}% single bond at 2
           \putlatom{100}{-280}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=92
           \put(270,-90){\line(0,-1){168}}% single bond at 2 axial
           \putlratom{238}{-350}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=26
     \yl@ydiff=-14
           \put(270,-90){\line(-5,3){144}}% single bond at 2 equatorial
           \putratom{100}{18}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=54
           \put(260,-80){\line(-5,-4){170}}% double bond at 2
           \put(280,-100){\line(-5,-4){170}}% double bond at 2
           \putlatom{100}{-280}{\@memberb}% left or right type
          \else%
     \yl@xdiff=0
     \yl@ydiff=54
           \put(270,-90){\line(-5,-4){170}}% single bond at 2
           \putlatom{100}{-280}{\@memberb}% left type
   \fi\fi}%
\def\chair{\@ifnextchar[{\@chair}{\@chair[r]}}
\def\@chair[#1]#2{%
\@reset@ylsw%
\ylchairposition{#2}%
\def\@@ylii{0}\def\@@yli{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\@@ylii
 \advance\yl@shifti\@@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(1600,800)(-400,-500)
  \iforigpt \put(-400,-500){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `chair' origin: (0,0) ---> (400,500)}
  \fi%
\fi
   \thicklines%
      \put(0,0){\line(3,-4){170}}%          % bond 1 to 2
      \put(170,-226){\line(3,1){403}}%      %      2 to 3
      \put(573,-91){\line(3,-1){270}}%      %      3 to 4
   \thinlines%
      \put(843,-181){\line(-3,4){170}}%     %      4 to 5
      \put(673,46){\line(-3,-1){403}}%      %      5 to 6
      \put(0,0){\line(3,-1){270}}%          %      1 to 6
\@tfor\member:=#1\do{%
\if\member r%no endcyclic bonds
\else \if\member a%
      \put(76,-42){\line(3,-4){110}}%       % double bond 1 to 2
\else \if\member b%
      \put(200,-186){\line(3,1){343}}%      %             2 to 3
\else \if\member c%
      \put(603,-70){\line(3,-1){190}}%      %             3 to 4
\else \if\member d%
      \put(780,-141){\line(-3,4){110}}%     %             4 to 5
\else \if\member e%
      \put(661,6){\line(-3,-1){343}}%       %             5 to 6
\else \if\member f%
      \put(75,-50){\line(3,-1){170}}%       %             1 to 6
\fi\fi\fi\fi\fi\fi\fi}%
\@forsemicol\member:=#2\do{%
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax%
\expandafter\threech@r\@membera{}{}%
\ifx\@memberb\@yl\else
\ifcase\@tmpa%0 omit
 \or\@chaira% subst. on 1
 \or\@chairb% subst. on 2
 \or\@chairc% subst. on 3
 \or\@chaird% subst. on 4
 \or\@chaire% subst. on 5
 \or\@chairf% subst. on 6
\fi%end of ifcase
\fi\fi%
}\end{picture}}%               %end of \chair macro
\def\ylchairposition#1{%
\@@ylswfalse%%%\@reset@ylsw
\@forsemicol\member:=#1\do{%
\if@@ylsw\else
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax
\expandafter\threech@r\@membera{}{}\relax
\ifx\@memberb\@yl\relax\@@ylswtrue\else\@@ylswfalse\fi
\if@@ylsw
\ifcase\@tmpa%0 omit
 \or\gdef\@ylii{0}\gdef\@yli{0}\global\@ylswtrue% subst. on 1
 \or\gdef\@ylii{-170}\gdef\@yli{226}\global\@ylswtrue% subst. on 2
 \or\gdef\@ylii{-573}\gdef\@yli{91}\global\@ylswtrue% subst. on 3
 \or\gdef\@ylii{-843}\gdef\@yli{181}\global\@ylswtrue% subst. on 4
 \or\gdef\@ylii{-673}\gdef\@yli{-46}\global\@ylswtrue% subst. on 5
 \or\gdef\@ylii{-270}\gdef\@yli{90}\global\@ylswtrue% subst. on 6
\fi%end of ifcase
\fi\fi\fi}}%
\def\@chairia{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=90
           \put(0,0){\line(-1,-1){120}}% single bond at 1
           \putlatom{-130}{-210}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=92
           \put(0,0){\line(0,-1){168}}% single bond at 1 axial
           \putlratom{-42}{-260}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=90
           \put(-10,10){\line(-1,-1){120}}% double bond at 1
           \put(10,-10){\line(-1,-1){120}}% double bond at 1
           \putlatom{-130}{-210}{\@memberb}% left type
          \else%
     \yl@xdiff=10
     \yl@ydiff=90
           \put(0,0){\line(-1,-1){120}}% single bond at 1
           \putlatom{-130}{-210}{\@memberb}% left type
   \fi\fi}%
\def\@chairif{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(170,226){\line(-1,1){120}}% single bond at 6
           \putratom{40}{316}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=-12
           \put(170,226){\line(0,1){168}}% single bond at 6 axial
           \putlratom{138}{406}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=16
     \yl@ydiff=46
           \put(170,226){\line(-5,-3){144}}% single bond at 6 equatorial
           \putlatom{10}{94}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=30
           \put(160,216){\line(-1,1){120}}% double bond at 6
           \put(180,236){\line(-1,1){120}}% double bond at 6
           \putlatom{40}{316}{\@memberb}% left type
          \else%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(170,226){\line(-1,1){120}}% single bond at 6
           \putlatom{40}{316}{\@memberb}% left type
   \fi\fi}%
\def\@chairie{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=76
           \put(573,91){\line(5,-4){170}}% single bond at 5
           \putratom{753}{-101}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=104
           \put(573,91){\line(0,-1){168}}% single bond at 5 axial
           \putlratom{533}{-181}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-36
     \yl@ydiff=3
           \put(573,91){\line(5,3){144}}% single bond at 5 equatorial
           \putlatom{753}{180}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-10
     \yl@ydiff=96
           \put(563,83){\line(5,-4){170}}% double bond at 5
           \put(583,99){\line(5,-4){170}}% double bond at 5
           \putratom{733}{-141}{\@memberb}% right type
          \else%
     \yl@xdiff=-10
     \yl@ydiff=76
           \put(573,91){\line(5,-4){170}}% single bond at 5
           \putratom{753}{-121}{\@memberb}% right type
   \fi\fi}%
\def\@chairid{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(843,181){\line(1,1){120}}% single bond at 4
           \putratom{953}{271}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=-11
           \put(843,181){\line(0,1){168}}% single bond at 4 axial
           \putlratom{801}{360}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-16
     \yl@ydiff=64
           \put(843,181){\line(5,-3){144}}% single bond at 4 equatorial
           \putratom{1003}{31}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=30
           \put(833,191){\line(1,1){120}}% double bond at 4
           \put(853,171){\line(1,1){120}}% double bond at 4
           \putratom{953}{271}{\@memberb}% right type
          \else%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(843,181){\line(1,1){120}}% single bond at 4
           \putratom{953}{271}{\@memberb}% right type
   \fi\fi}%
\def\@chairic{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=92
           \put(673,-46){\line(1,-1){120}}% single bond at 3
           \putratom{803}{-258}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=110
           \put(673,-46){\line(0,-1){168}}% single bond at 3 axial
           \putlratom{633}{-318}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-6
     \yl@ydiff=17
           \put(673,-46){\line(5,3){144}}% single bond at 3 equatorial
           \putratom{823}{23}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-5
     \yl@ydiff=96
           \put(663,-53){\line(1,-1){120}}% double bond at 3
           \put(683,-38){\line(1,-1){120}}% double bond at 3
           \putratom{803}{-258}{\@memberb}%  right type
          \else%
     \yl@xdiff=-10
     \yl@ydiff=76
           \put(673,-46){\line(5,-4){170}}% single bond at 3
           \putratom{853}{-258}{\@memberb}% right type
   \fi\fi}%
\def\@chairib{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=0
     \yl@ydiff=46
           \put(270,90){\line(-5,4){170}}% single bond at 2
           \putlatom{100}{180}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=-12
           \put(270,90){\line(0,1){168}}% single bond at 2 axial
           \putlratom{238}{270}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=26
     \yl@ydiff=94
           \put(270,90){\line(-5,-3){144}}% single bond at 2 equatorial
           \putratom{100}{-98}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=26
           \put(260,80){\line(-5,4){170}}% double bond at 2
           \put(280,100){\line(-5,4){170}}% double bond at 2
           \putlatom{100}{200}{\@memberb}% left or right type
          \else%
     \yl@xdiff=0
     \yl@ydiff=26
           \put(270,90){\line(-5,4){170}}% single bond at 2
           \putlatom{100}{200}{\@memberb}% left type
   \fi\fi}%
\def\chairi{\@ifnextchar[{\@chairi}{\@chairi[r]}}
\def\@chairi[#1]#2{%
\@reset@ylsw%
\ylchairiposition{#2}%
\def\@@ylii{0}\def\@@yli{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\@@ylii
 \advance\yl@shifti\@@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(1600,800)(-400,-319)
  \iforigpt \put(-400,-319){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `chairi' origin: (0,0) ---> (400,319)}
  \fi%
\fi
   \thinlines%
      \put(0,0){\line(3,4){170}}%         % bond 1 to 6
      \put(170,226){\line(3,-1){403}}%    %      6 to 5
      \put(573,91){\line(3,1){270}}%      %      5 to 4
   \thicklines%
      \put(843,181){\line(-3,-4){170}}%    %      4 to 3
      \put(673,-46){\line(-3,1){403}}%     %      3 to 2
      \put(0,0){\line(3,1){270}}%          %      1 to 2
   \thinlines%
\@tfor\member:=#1\do{%
\if\member r%no endcyclic bonds
\else \if\member c%%%a%
       \put(767,139){\line(-3,-4){110}}%   % double bond 3 to 4
\else \if\member b%%%d%%%b%
      \put(640,-5){\line(-3,1){343}}%      %             4 to 5
\else \if\member a%%%e%%%%c%
       \put(240,111){\line(-3,-1){190}}%   %             5 to 6
\else \if\member f%%%d%
      \put(63,40){\line(3,4){110}}%        %             6 to 7
\else \if\member e%%%l%
      \put(182,187){\line(3,-1){343}}%     %             7 to 10
\else \if\member d%%%k%%%f%
      \put(768,131){\line(-3,-1){170}}%    %             10 to 3
\fi\fi\fi\fi\fi\fi\fi}%
\@forsemicol\member:=#2\do{%
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax%
\expandafter\threech@r\@membera{}{}%
\ifx\@memberb\@yl\else
\ifcase\@tmpa%0 omit
 \or \@chairia% subst. on 1
 \or \@chairib% subst. on 2
 \or \@chairic% subst. on 3
 \or \@chairid% subst. on 4
 \or \@chairie% subst. on 5
 \or \@chairif% subst. on 6
\fi %end of ifcase
\fi\fi%
}\end{picture}}%               %end of \chairi macro
\def\ylchairiposition#1{%
\@@ylswfalse%%%\@reset@ylsw
\@forsemicol\member:=#1\do{%
\if@@ylsw\else
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax
\expandafter\threech@r\@membera{}{}\relax
\ifx\@memberb\@yl\relax\@@ylswtrue\else\@@ylswfalse\fi
\if@@ylsw
\ifcase\@tmpa%0 omit
 \or\gdef\@ylii{0}\gdef\@yli{0}\global\@ylswtrue% subst. on 1
 \or\gdef\@ylii{-270}\gdef\@yli{-90}\global\@ylswtrue% subst. on 2
 \or\gdef\@ylii{-673}\gdef\@yli{46}\global\@ylswtrue% subst. on 3
 \or\gdef\@ylii{-843}\gdef\@yli{-181}\global\@ylswtrue% subst. on 4
 \or\gdef\@ylii{-573}\gdef\@yli{-91}\global\@ylswtrue% subst. on 5
 \or\gdef\@ylii{-170}\gdef\@yli{-226}\global\@ylswtrue% subst. on 6
\fi%end of ifcase
\fi\fi\fi}}%
\def\bicychepv{\@ifnextchar[{\@bicychepv}{\@bicychepv[r]}}
\def\@bicychepv[#1]#2{%
\@reset@ylsw%
\ylposition{#2}{0}{0}{7}{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(800,880)(-400,-240)
  \iforigpt \put(-400,-240){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `bicychepv' origin: (0,0) ---> (400,240)}
\fi
  \fi%
  \put(0,406){\line(-5,-3){171}}%       %bond 1-6
  \put(0,406){\line(5,-3){171}}%        %bond 1-2
  \put(0,0){\line(-5,3){171}}%          %bond 4-5
  \put(0,0){\line(5,3){171}}%           %bond 4-3
  \put(171,103){\line(0,1){200}}%       %bond 3-2
  \put(-171,103){\line(0,1){200}}%      %bond 5-6
{\thicklines%
  \put(0,0){\line(1,4){51}}%            %bond 4-7
  \put(0,406){\line(1,-4){51}}}%         %bond 1-7
\@tfor\member:=#1\do{%
\if\member r%no endcyclic double bonds
\else \if\member a%
  \put(6,364){\line(5,-3){126}}%        %double bond 1-2
\else \if\member b%
  \put(138,129){\line(0,1){148}}%       %double bond 3-2
\else \if\member c%
  \put(6,42){\line(5,3){126}}%          %double bond 4-3
\else \if\member d%
  \put(-6,42){\line(-5,3){126}}%        %double bond 4-5
\else \if\member e%
  \put(-138,129){\line(0,1){148}}%      %double bond 5-6
\else \if\member f%
  \put(-6,364){\line(-5,-3){126}}%      %double bond 1-6
\else \if\member 7%
 {\thicklines%
  \put(51,204){\line(-1,0){70}}%        %7,7-dimethyl
  \put(51,204){\line(1,0){70}}}%
\else \if\member A%aromatic circle
  \put(0,203){\circle{240}}%            %circle
\fi\fi\fi\fi\fi\fi\fi\fi\fi}%
\setsixringv{#2}{0}{0}{7}{0}
\end{picture}}               %end of \bicychepv macro
\def\bicycheph{\@ifnextchar[{\@bicycheph}{\@bicycheph[r]}}
\def\@bicycheph[#1]#2{%
\@reset@ylsw%
\ylpositionh{#2}{0}{0}{7}{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(880,800)(-240,-400)
  \iforigpt \put(-240,-400){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `bicycheph' origin: (0,0) ---> (240,400)}
  \fi%
\fi
  \put(0,0){\line(3,5){103}}           %bond 1-2
  \put(0,0){\line(3,-5){103}}          %bond 1-6
  \put(406,0){\line(-3,5){103}}        %bond 4-3
  \put(406,0){\line(-3,-5){103}}       %bond 4-3
  \put(103,171){\line(1,0){200}}       %bond 2-3
  \put(103,-171){\line(1,0){200}}      %bond 6-5
{\thicklines%
  \put(0,0){\line(4,1){203}}%            %bond 4-7
  \put(406,0){\line(-4,1){203}}}%         %bond 1-7
\@tfor\member:=#1\do{%
\if\member r%no endcyclic double bonds
\else \if\member a%
  \put(42,6){\line(3,5){78}}           %double bond 1-2
\else \if\member b%
  \put(129,138){\line(1,0){148}}       %double bond 2-3
\else \if\member c%
  \put(364,6){\line(-3,5){78}}         %double bond 4-3
\else \if\member d%
  \put(364,-6){\line(-3,-5){78}}       %double bond 4-5
\else \if\member e%
  \put(129,-138){\line(1,0){148}}      %double bond 6-5
\else \if\member f%
  \put(42,-6){\line(3,-5){78}}         %double bond 1-6
\else \if\member 7%
 {\thicklines%
  \put(204,51){\line(0,-1){70}}%        %7,7-dimethyl
  \put(204,51){\line(0,1){70}}}%
\else \if\member A%aromatic circle
  \put(203,0){\circle{240}}            %circle
\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\setsixringh{#2}{0}{0}{7}{0}
\end{picture}}               %end of \bicycheph macro
\def\@borna{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=8
     \yl@ydiff=3
          \put(318,247){\line(2,5){40}}%      % single bond 1
           \putratom{350}{350}{\@memberb}%    % right type
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=8
     \yl@ydiff=3
          \put(318,247){\line(2,5){40}}%      % single bond 1
           \putratom{350}{350}{\@memberb}%    % right type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=8
     \yl@ydiff=3
          \put(318,247){\line(2,5){40}}%      % single bond 1
          \putratom{350}{350}{\@memberb}%     % right type
    \fi\fi\fi%
   \else%
     \yl@xdiff=8
     \yl@ydiff=3
          \put(318,247){\line(2,5){40}}%      % single bond 1
           \putratom{350}{350}{\@memberb}     % right type
   \fi}%
\def\@bornb{%
 \begin{picture}(200,200)(0,0)
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=20
           \put(0,0){\line(5,2){160}}%
           \putratom{170}{44}{\@memberb}%      % left type
    \else\if\@tmpc A%(A) alpha
     \yl@xdiff=0
     \yl@ydiff=-5
           \putratom{140}{115}{\@memberb}%     % right type
           {%
           \thicklines%
           \put(0,0){\line(4,3){140}}%         % endo (a)
           }%
    \else\if\@tmpc B%(B) beta
     \yl@xdiff=10
     \yl@ydiff=30
           \putratom{150}{-86}{\@memberb}%     % right type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(5,-2){140}}%        % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(140,-56)}}%
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=10
     \yl@ydiff=30
           \put(0,0){\line(5,-2){140}}%        % endo (a)
           \putratom{150}{-86}{\@memberb}%     % right type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=0
     \yl@ydiff=-10
           \put(0,0){\line(4,3){140}}%         % exo (b)
           \putratom{140}{115}{\@memberb}%     % right type
    \fi\fi\fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-10
     \yl@ydiff=20
           \put(-10,-15){\line(5,2){160}}%
           \put(-5,15){\line(5,2){160}}%
           \putratom{170}{44}{\@memberb}%      % right type
   \else \if\@tmpb A%alpha single bond
     \yl@xdiff=-10
     \yl@ydiff=20
           \putratom{170}{44}{\@memberb}%      % right type
           {%
           \thicklines%
           \put(0,0){\line(5,2){160}}%
           }%
   \else \if\@tmpb B%beta single bond
     \yl@xdiff=-10
     \yl@ydiff=20
           \putratom{170}{44}{\@memberb}%      % right type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(5,2){160}}%
           }{{\thicklines%
              \dottedline{20}(0,0)(160,64)}}%
   \else%
     \yl@xdiff=-10
     \yl@ydiff=20
           \put(0,0){\line(5,2){160}}%
           \putratom{170}{44}{\@memberb}%      % right type
   \fi\fi\fi\fi\end{picture}}%
\def\@bornc{%
 \begin{picture}(200,200)(0,0)
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=30
           \put(0,0){\line(5,-2){140}}%
           \putratom{150}{-86}{\@memberb}%    % right type
    \else\if\@tmpc A%(A) alpha
     \yl@xdiff=-10
     \yl@ydiff=30
           \putratom{150}{26}{\@memberb}%     % right type
           {%
           \thicklines%
           \put(0,0){\line(5,2){140}}%        % endo (a)
           }%
    \else\if\@tmpc B%(B) beta
     \yl@xdiff=0
     \yl@ydiff=40
           \putratom{140}{-145}{\@memberb}%   % right type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(4,-3){140}}%       % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(140,-105)}}%
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=0
     \yl@ydiff=40
           \put(0,0){\line(4,-3){140}}%       % endo (a)
           \putratom{140}{-145}{\@memberb}%   % right type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=-10
     \yl@ydiff=30
           \put(0,0){\line(5,2){140}}%        % exo (b)
           \putratom{150}{26}{\@memberb}%     % right type
    \fi\fi\fi\fi\fi
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=50
           \put(10,15){\line(5,-2){160}}%
           \put(5,-15){\line(5,-2){160}}%
           \putratom{170}{-124}{\@memberb}%   % right type
   \else \if\@tmpb A%alpha single bond
     \yl@xdiff=-10
     \yl@ydiff=30
           \putratom{150}{-86}{\@memberb}%    % right type
           {%
           \thicklines%
           \put(0,0){\line(5,-2){140}}%       % endo (a)
           }%
   \else \if\@tmpb B%beta single bond
     \yl@xdiff=-10
     \yl@ydiff=30
           \putratom{150}{-86}{\@memberb}%    % right type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(5,-2){140}}%       % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(140,-56)}}%
   \else%
     \yl@xdiff=-10
     \yl@ydiff=20
           \put(0,0){\line(5,2){160}}%
           \putratom{170}{44}{\@memberb}%     % right type
   \fi\fi\fi\fi%
\end{picture}}%
\def\@bornd{%
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=30
     \yl@ydiff=87
          \put(237,47){\line(-2,-5){40}}%      % single bond 4
          \putlratom{167}{-140}{\@memberb}%    % left & right type
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=30
     \yl@ydiff=87
          \put(237,47){\line(-2,-5){40}}%      % single bond 4
          \putlratom{167}{-140}{\@memberb}%    % left & right type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=30
     \yl@ydiff=87
          \put(237,47){\line(-2,-5){40}}%      % single bond 4
          \putlratom{167}{-140}{\@memberb}%    % left & right type
    \fi\fi\fi%
   \else%
     \yl@xdiff=30
     \yl@ydiff=87
          \put(237,47){\line(-2,-5){40}}%      % single bond 4
          \putlratom{167}{-140}{\@memberb}%    % left & right type
   \fi}%
\def\@borne{%
 \begin{picture}(200,200)(0,0)
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(0,0){\line(-5,-2){140}}%
           \putlatom{-150}{-86}{\@memberb}%    % left type
    \else\if\@tmpc A%(A) alpha
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{-150}{26}{\@memberb}%     % left type
           {%
           \thicklines%
           \put(0,0){\line(-5,2){140}}%        % endo (a)
           }%
    \else\if\@tmpc B%(B) beta
     \yl@xdiff=0
     \yl@ydiff=40
           \putlatom{-140}{-145}{\@memberb}%   % left type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(-4,-3){140}}%       % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(-140,-105)}}%
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=0
     \yl@ydiff=30
           \put(0,0){\line(-4,-3){140}}%       % endo (a)
           \putlatom{-140}{-145}{\@memberb}%   % left type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=10
     \yl@ydiff=30
           \put(0,0){\line(-5,2){140}}%        % exo (b)
           \putlatom{-150}{26}{\@memberb}%     % left type
    \fi\fi\fi\fi\fi
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=64
           \put(-10,15){\line(-5,-2){160}}%
           \put(-5,-15){\line(-5,-2){160}}%
           \putlatom{-170}{-124}{\@memberb}%   % left type
   \else \if\@tmpb A%alpha single bond
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{-150}{-86}{\@memberb}%    % left type
           {%
           \thicklines%
           \put(0,0){\line(-5,-2){140}}%       % endo (a)
           }%
   \else \if\@tmpb B%beta single bond
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{-150}{-86}{\@memberb}%    % left type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(-5,-2){140}}%       % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(-140,-56)}}%
   \else%
     \yl@xdiff=10
     \yl@ydiff=20
           \put(0,0){\line(-5,2){160}}%
           \putlatom{-170}{44}{\@memberb}%     % left type
   \fi\fi\fi\fi%
\end{picture}}%
\def\@bornf{%
 \begin{picture}(200,200)(0,0)
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(0,0){\line(-5,2){160}}%
           \putlatom{-170}{44}{\@memberb}%      % left type
    \else\if\@tmpc A%(A) alpha
     \yl@xdiff=10
     \yl@ydiff=-10
           \putlatom{-140}{115}{\@memberb}%     % left type
           {%
           \thicklines%
           \put(0,0){\line(-4,3){140}}%         % endo (a)
           }%
    \else\if\@tmpc B%(B) beta
     \yl@xdiff=0
     \yl@ydiff=30
           \putlatom{-150}{-86}{\@memberb}%     % left type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(-5,-2){140}}%        % exo (b)
           }{{\thicklines%
              \dottedline{20}(0,0)(-140,-56)}}%
    \else\if\@tmpc a%(a) alpha
     \yl@xdiff=10
     \yl@ydiff=30
           \put(0,0){\line(-5,-2){140}}%        % endo (a)
           \putlatom{-150}{-86}{\@memberb}%     % left type
    \else\if\@tmpc b%(b) beta
     \yl@xdiff=0
     \yl@ydiff=-10
           \put(0,0){\line(-4,3){140}}%         % exo (b)
           \putlatom{-140}{115}{\@memberb}%     % left type
    \fi\fi\fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=20
           \put(10,-15){\line(-5,2){160}}%
           \put(5,15){\line(-5,2){160}}%
           \putlatom{-170}{44}{\@memberb}%      % left type
   \else \if\@tmpb A%alpha single bond
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{-170}{44}{\@memberb}%      % left type
           {%
           \thicklines%
           \put(0,0){\line(-5,2){160}}%
           }%
   \else \if\@tmpb B%beta single bond
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{-170}{44}{\@memberb}%      % left type
       \@ifundefined{dottedline}{%
           \put(0,0){\line(-5,2){160}}%
           }{{\thicklines%
              \dottedline{20}(0,0)(-160,64)}}%
   \else%
     \yl@xdiff=10
     \yl@ydiff=20
           \put(0,0){\line(-5,2){160}}%
           \putlatom{-170}{44}{\@memberb}%      % left type
   \fi\fi\fi\fi\end{picture}}%
\def\@borng{%
 \begin{picture}(200,200)(0,0)
   \if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=40
     \yl@ydiff=-20
           \put(0,0){\line(0,1){160}}%
           \putlratom{-40}{180}{\@memberb}%      % left & right type
    \else\if\@tmpc a%(a) left
     \yl@xdiff=0
     \yl@ydiff=-10
           \put(0,0){\line(-4,3){140}}%          % left (a)
           \putlatom{-140}{115}{\@memberb}%      % left type
    \else\if\@tmpc b%(b) right
     \yl@xdiff=0
     \yl@ydiff=-10
           \put(0,0){\line(4,3){140}}%           % right (b)
           \putratom{140}{115}{\@memberb}%       % right type
    \fi\fi\fi%\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=40
     \yl@ydiff=-20
           \put(-10,0){\line(0,1){160}}%
           \put(10,0){\line(0,1){160}}%
           \putlratom{-40}{180}{\@memberb}%      % left & right type
   \else%
     \yl@xdiff=40
     \yl@ydiff=-20
           \put(0,0){\line(0,1){160}}%
           \putlratom{-40}{180}{\@memberb}%      % left & right type
   \fi\fi\end{picture}}%

\def\bornane{\@ifnextchar[{\@bornane}{\@bornane[r]}}
\def\@bornane[#1]#2{%
\@reset@ylsw%
\ylbornaneposition{#2}%
\def\@@ylii{0}\def\@@yli{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\@@ylii
 \advance\yl@shifti\@@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(1000,1000)(-200,-240)%changed by SF 1998/09/26
  \iforigpt \put(-200,-240){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `bornane' origin: (0,0) ---> (200,240)}
  \fi%
\fi
 \thicklines%
  \put(0,0){\line(5,1){237}}%            % bond 5 to 4 (d)
  \put(237,47){\line(5,-2){225}}%        % bond 4 to 3 (c)
  \put(237,47){\line(0,1){400}}%         % front part of bridge (h)
 \thinlines%
  \put(462,-43){\line(2,5){80}}%         % bond 3 to 2 (b)
  \put(543,157){\line(-5,2){225}}%       % bond 2 to 1 (a)
  \put(318,247){\line(-5,-1){237}}%      % bond 1 to 6 (f)
  \put(80,200){\line(-2,-5){80}}%        % bond 6 to 5 (e)
  \put(318,247){\line(-2,5){80}}%        % back part of bridge (g)
\@tfor\member:=#1\do{%
\if\member r%no endcyclic bonds
\else \if\member a%%%%
   \put(513,127){\line(-5,2){180}}%       % bond 2 to 1
\else \if\member b%%%%
   \put(446,-3){\line(2,5){60}}%          % bond 3 to 2
\else \if\member c%%%%
   \put(267,77){\line(5,-2){180}}%        % bond 4 to 3
\else \if\member d%%%%
   \put(40,42){\line(5,1){180}}%          % double bond 5 to 4
\else \if\member e%%%
   \put(100,180){\line(-2,-5){60}}%       % bond 6 to 5
\else \if\member f%
   \put(288,207){\line(-5,-1){180}}%      % bond 1 to 6
\else \if\member g%
  \put(288,260){\line(-2,5){40}}%         % back part of bridge (g)
\else \if\member h%
  \put(257,77){\line(0,1){290}}%          % front part of bridge (h)
\fi\fi\fi\fi\fi\fi\fi\fi\fi}%
\@forsemicol\member:=#2\do{%
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax%
\expandafter\threech@r\@membera{}{}%
\ifx\@memberb\@yl\else
\ifcase\@tmpa%0 omit
 \or \@borna% subst. on 1
 \or \put(543,157){\@bornb}% subst. on 2
 \or \put(462,-43){\@bornc}% subst. on 3
 \or \@bornd% subst. on 4
 \or \put(0,0){\@borne}% subst. on 5
 \or \put(80,200){\@bornf}% subst. on 6
 \or \put(237,440){\@borng}% subst. on 7
\fi%end of ifcase
\fi\fi%
}\end{picture}\iniatom\iniflag}     %end of \bornane macro
\def\ylbornaneposition#1{%
\@@ylswfalse%%%\@reset@ylsw
\@forsemicol\member:=#1\do{%
\if@@ylsw\else
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax
\expandafter\threech@r\@membera{}{}\relax
\ifx\@memberb\@yl\relax\@@ylswtrue\else\@@ylswfalse\fi
\if@@ylsw
\ifcase\@tmpa%0 omit
 \or\gdef\@ylii{-318}\gdef\@yli{-247}\global\@ylswtrue% subst. on 1
 \or\gdef\@ylii{-543}\gdef\@yli{-157}\global\@ylswtrue% subst. on 2
 \or\gdef\@ylii{-462}\gdef\@yli{43}\global\@ylswtrue% subst. on 3
 \or\gdef\@ylii{-237}\gdef\@yli{-47}\global\@ylswtrue% subst. on 4
 \or\gdef\@ylii{0}\gdef\@yli{0}\global\@ylswtrue% subst. on 5
 \or\gdef\@ylii{-80}\gdef\@yli{-200}\global\@ylswtrue% subst. on 6
 \or\gdef\@ylii{-237}\gdef\@yli{-440}\global\@ylswtrue% subst. on 7
\fi%end of ifcase
\fi\fi\fi}}%
\def\@adamanea{%
     \yl@xdiff=12
     \yl@ydiff=21
   \put(-360,720){\hbox to0pt{\hss \@memberb}}%     %atom 1
 \if\@tmpb a%
   \put(-240,660){\line(-4,3){108}}%                %bond 1
  \else \ifx\@tmpb\empty%
   \put(-240,660){\line(-4,3){108}}%                %bond 1
 \fi\fi}%
\def\@adamaneb{%
  \if\@tmpb a%
     \yl@xdiff=6
     \yl@ydiff=-16
   \put(0,780){\line(1,4){26}}%                     %bond 2-ax
   \put(20,900){\hbox to0pt{\@memberb \hss}}%       %atom 2-ax
  \else \if\@tmpb b%
     \yl@xdiff=-6
     \yl@ydiff=-16
   \put(0,780){\line(-1,4){26}}%                    %bond 2-eq
   \put(-20,900){\hbox to0pt{\hss \@memberb}}%      %atom 2-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=42
     \yl@ydiff=-22
   \put(-42,910){\hbox to0pt{\hss \@memberb}}%      %atom 2
   \put(0,780){\line(0,1){108}}%                    %bond 2
  \else \if\@tmpb D%
     \yl@xdiff=42
     \yl@ydiff=-22
   \putlratom{-42}{910}{\@memberb}%                 %atom 2
   \put(-12,780){\line(0,1){108}}%                  %double bond 2
   \put(12,780){\line(0,1){108}}%                   %double bond 2
 \fi\fi\fi\fi}
\def\@adamanec{%
     \yl@xdiff=-12
     \yl@ydiff=21
   \put(360,720){\hbox to0pt{\@memberb \hss}}%      %atom 3
  \if\@tmpb a%1998/10/24 by SF
   \put(240,660){\line(4,3){108}}%                  %bond 3
  \else \ifx\@tmpb\empty%
   \put(240,660){\line(4,3){108}}%                  %bond 3
 \fi\fi}
\def\@adamaned{%
  \if\@tmpb a%
     \yl@xdiff=-17
     \yl@ydiff=33
   \put(300,420){\line(4,-3){103}}%                 %bond 4-ax
   \put(420,310){\hbox to0pt{\@memberb \hss}}%      %atom 4-ax
  \else \if\@tmpb b%
     \yl@xdiff=26
     \yl@ydiff=-26
   \put(300,420){\line(1,4){26}}%                   %bond 4-eq
   \put(300,540){\hbox to0pt{\@memberb \hss}}%      %atom 4-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=-17
     \yl@ydiff=33
   \put(300,420){\line(4,-3){103}}%                 %bond 4
   \put(420,310){\hbox to0pt{\@memberb \hss}}%      %atom 4
  \else \if\@tmpb D%
     \yl@xdiff=-17
     \yl@ydiff=33
   \put(296,432){\line(5,-3){103}}%                 %double bond 4
   \put(292,408){\line(5,-3){103}}%                 %double bond 4
   \put(420,310){\hbox to0pt{\@memberb \hss}}%      %atom 4
  \fi\fi\fi\fi}
\def\@adamanee{%
     \yl@xdiff=20
     \yl@ydiff=110
  \if\@tmpb a%1998/10/24 by SF
   \put(60,240){\line(1,-5){30}}%                   %bond 5
   \put(70,-20){\hbox to0pt{\@memberb  \hss}}%      %atom 5
  \else \ifx\@tmpb\empty%
   \put(60,240){\line(1,-5){30}}%                   %bond 5
   \put(70,-20){\hbox to0pt{\@memberb  \hss}}%      %atom 5
  \fi\fi}
\def\@adamanef{%
  \if\@tmpb a%
     \yl@xdiff=33
     \yl@ydiff=103
   \put(0,0){\line(4,-3){103}}%                     %bond 6-ax
   \put(70,-180){\hbox to0pt{\@memberb \hss}}%      %atom 6-ax
  \else \if\@tmpb b%
     \yl@xdiff=-33
     \yl@ydiff=103
   \put(0,0){\line(-4,-3){103}}%                    %bond 6-eq
   \put(-70,-180){\hbox to0pt{\hss \@memberb}}%     %atom 6-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=22
     \yl@ydiff=94
   \put(0,0){\line(0,-1){108}}%                     %bond 6
   \put(-22,-202){\hbox to0pt{\hss \@memberb}}%     %atom 6
  \else \if\@tmpb D%
     \yl@xdiff=42
     \yl@ydiff=94
   \put(-12,0){\line(0,-1){108}}%                   %double bond 6
   \put(12,0){\line(0,-1){108}}%                    %double bond 6
   \putlratom{-42}{-202}{\@memberb}%                %atom 6
 \fi\fi\fi\fi}
\def\@adamaneg{%
     \yl@xdiff=-20
     \yl@ydiff=110
  \if\@tmpb a%1998/10/24 by SF
   \put(-60,240){\line(-1,-5){30}}%                 %bond 7
   \put(-70,-20){\hbox to0pt{\hss \@memberb}}%      %atom 7
  \else \ifx\@tmpb\empty%
   \put(-60,240){\line(-1,-5){30}}%                 %bond 7
   \put(-70,-20){\hbox to0pt{\hss \@memberb}}%      %atom 7-eq
  \fi\fi}
\def\@adamaneh{%
  \if\@tmpb a%
     \yl@xdiff=17
     \yl@ydiff=33
   \put(-300,420){\line(-4,-3){103}}%               %bond 8-ax
   \put(-420,310){\hbox to0pt{\hss \@memberb}}%     %atom 8-ax
  \else \if\@tmpb b%
     \yl@xdiff=-26
     \yl@ydiff=-16
   \put(-300,420){\line(-1,4){26}}%                 %bond 8-eq
   \put(-300,540){\hbox to0pt{\hss \@memberb}}%     %atom 8-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=17
     \yl@ydiff=33
   \put(-300,420){\line(-4,-3){103}}%               %bond 8
   \put(-420,310){\hbox to0pt{\hss \@memberb}}%     %atom 8
  \else \if\@tmpb D%
     \yl@xdiff=17
     \yl@ydiff=50
   \put(-300,432){\line(-5,-3){103}}%               %double bond 8
   \put(-303,408){\line(-5,-3){103}}%               %double bond 8
   \put(-420,310){\hbox to0pt{\hss \@memberb}}%     %atom 8
  \fi\fi\fi\fi}
\def\@adamanei{%
  \if\@tmpb a%
     \yl@xdiff=-43
     \yl@ydiff=93
   \put(-180,420){\line(-4,-3){103}}%               %bond 9-ax
   \put(-240,250){\hbox to0pt{\hss \@memberb}}%     %atom 9-ax
  \else \if\@tmpb b%
     \yl@xdiff=26
     \yl@ydiff=-16
   \put(-180,420){\line(1,4){26}}%                  %bond 9-eq
   \put(-180,540){\hbox to0pt{\@memberb \hss}}%     %atom 9-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=17
     \yl@ydiff=93
   \put(-180,420){\line(-4,-3){103}}%               %bond 9
   \put(-300,250){\hbox to0pt{\hss \@memberb}}%     %atom 9
  \else \if\@tmpb D%
     \yl@xdiff=17
     \yl@ydiff=113
   \put(-183,432){\line(-5,-3){103}}%               %double bond 9
   \put(-180,408){\line(-5,-3){103}}%               %double bond 9
   \put(-300,250){\hbox to0pt{\hss \@memberb}}%     %atom 9
  \fi\fi\fi\fi}
\def\@adamanej{%
  \if\@tmpb a%
     \yl@xdiff=43
     \yl@ydiff=92
  \put(180,420){\line(4,-3){103}}%                 %bond 10-ax
  \put(240,250){\hbox to0pt{\@memberb  \hss}}%     %atom 10-ax
  \else \if\@tmpb b%
     \yl@xdiff=-26
     \yl@ydiff=-16
  \put(180,420){\line(-1,4){26}}%                  %bond 10-eq
  \put(180,540){\hbox to0pt{\hss \@memberb}}%      %atom 10-eq
  \else \ifx\@tmpb\empty%
     \yl@xdiff=43
     \yl@ydiff=92
   \put(180,420){\line(4,-3){103}}%                %bond 10
   \put(240,250){\hbox to0pt{\@memberb \hss}}%     %atom 10
  \else \if\@tmpb D%
     \yl@xdiff=3
     \yl@ydiff=112
   \put(176,432){\line(5,-3){103}}%                %double bond 10
   \put(172,408){\line(5,-3){103}}%                %double bond 10
   \put(280,250){\hbox to0pt{\@memberb \hss}}%     %atom 10
  \fi\fi\fi\fi}
\def\adamantane{\@ifnextchar[{\@mantane}{\@damantane[Z]}}
\def\@damantane[#1]#2{%
\@reset@ylsw%
\yladamanposition{#2}%
\def\@@ylii{0}\def\@@yli{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\@@ylii
 \advance\yl@shifti\@@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(1100,1300)(-550,-300)
  \iforigpt \put(-550,-300){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `adamantane' origin: (0,0) ---> (550,300)}
  \fi%
\fi
  \put(0,0){\line(-1,4){60}}%                      %bond 6-7
  \put(0,780){\line(2,-1){240}}%                   %bond 2-3
  \put(0,780){\line(-2,-1){240}}%                  %bond 2-1
  \put(-60,240){\line(-4,3){240}}%                 %bond 7-8
  \put(-300,420){\line(1,4){60}}%                  %bond 8-1
  \put(240,660){\line(-1,-4){60}}%                 %bond 3-10
  \put(-60,240){\line(4,3){240}}%                  %bond 10-7
{\thicklines%
  \put(300,420){\line(-1,4){60}}%                  %bond 4-3
  \put(-240,660){\line(1,-4){60}}%                 %bond 1-9
  \put(0,0){\line(1,4){60}}%                       %bond 6-5
  \put(60,240){\line(4,3){240}}%                   %bond 5-4
  \put(60,240){\line(-4,3){240}}%                  %bond 5-9
}%
\@forsemicol\member:=#2\do{%
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax%
\expandafter\threech@r\@membera{}{}\relax%
\ifx\@memberb\@yl\else
\ifcase\@tmpa%0 omit
\or\@adamanea% subst. on 1
\or\@adamaneb% subst. on 2
\or\@adamanec% subst. on 3
\or\@adamaned% subst. on 4
\or\@adamanee% subst. on 5
\or\@adamanef% subst. on 6
\or\@adamaneg% subst. on 7
\or\@adamaneh% subst. on 8
\or\@adamanei% subst. on 9
\or\@adamanej% subst. on 10
\fi%the end of ifcase
\fi\fi}%
\end{picture}}                          %end of \adamantane macro%
\def\yladamanposition#1{%
\@@ylswfalse%%%\@reset@ylsw
\@forsemicol\member:=#1\do{%
\if@@ylsw\else
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax
\expandafter\threech@r\@membera{}{}\relax
\ifx\@memberb\@yl\relax\@@ylswtrue\else\@@ylswfalse\fi
\if@@ylsw
\ifcase\@tmpa%0 omit
 \or\gdef\@ylii{240}\gdef\@yli{-660}\global\@ylswtrue% subst. on 1
 \or\gdef\@ylii{0}\gdef\@yli{-780}\global\@ylswtrue% subst. on 2
 \or\gdef\@ylii{-240}\gdef\@yli{-660}\global\@ylswtrue% subst. on 3
 \or\gdef\@ylii{-300}\gdef\@yli{-420}\global\@ylswtrue% subst. on 4
 \or\gdef\@ylii{-60}\gdef\@yli{-240}\global\@ylswtrue% subst. on 5
 \or\gdef\@ylii{0}\gdef\@yli{0}\global\@ylswtrue% subst. on 6
 \or\gdef\@ylii{60}\gdef\@yli{-240}\global\@ylswtrue% subst. on 7
 \or\gdef\@ylii{300}\gdef\@yli{-420}\global\@ylswtrue% subst. on 8
 \or\gdef\@ylii{180}\gdef\@yli{-420}\global\@ylswtrue% subst. on 9
 \or\gdef\@ylii{-180}\gdef\@yli{-420}\global\@ylswtrue% subst. on 10
\fi%end of ifcase
\fi\fi\fi}}%
\def\hadamantane{\@ifnextchar[{\@hadamantane}{\@hadamantane[H]}}
\def\@hadamantane[#1]#2{%
\@reset@ylsw%
\ylhadamanposition{#2}%
\def\@@ylii{0}\def\@@yli{0}%
\if@ylsw
 \yl@shiftii=\@ylii
 \yl@shifti=\@yli
 \advance\yl@shiftii\@@ylii
 \advance\yl@shifti\@@yli
 \advance\yl@shiftii\yl@xdiff
 \advance\yl@shifti\yl@ydiff
 \begin{picture}(0,0)(-\yl@shiftii,-\yl@shifti)
\else
 \begin{picture}(1600,1400)(-400,-319)
  \iforigpt \put(-400,-319){\circle*{50}}%
           \put(0,0){\circle{50}}%
   \typeout{command `hadamantane' origin: (0,0) ---> (400,319)}
  \fi%
\fi
   \thinlines%
      \put(0,0){\line(3,4){170}}%          % bond 6 to 7
      \put(170,226){\line(3,-1){403}}%     %      7 to 10
      \put(573,91){\line(3,1){270}}%       %      10 to 3
      \put(170,226){\line(0,1){360}}%      %      7 to 8
      \put(170,586){\line(3,1){270}}%      %      8 to 1
      \put(843,181){\line(0,1){360}}%      %      3 to 2
      \put(843,541){\line(-3,1){403}}%     %      2 to 1
   \thicklines%
      \put(843,181){\line(-3,-4){170}}%    %      3 to 4
      \put(673,-46){\line(-3,1){403}}%     %      4 to 5
      \put(0,0){\line(3,1){270}}%          %      6 to 5
      \put(270,90){\line(0,1){360}}%       %      5 to 9
      \put(270,450){\line(3,4){170}}%      %      9 to 1
   \thinlines%
\@tfor\member:=#1\do{%
\if\member r%no endocyclic bonds
\else \if\member a%
      \put(450,636){\line(3,-1){373}}%     % double bond 1 to 2
\else \if\member b%
      \put(803,206){\line(0,1){320}}%      %             3 to 2
\else \if\member c%%%a%
       \put(767,139){\line(-3,-4){110}}%   %             3 to 4
\else \if\member d%%%b%
      \put(640,-5){\line(-3,1){343}}%      %             4 to 5
\else \if\member e%%%%c%
       \put(240,111){\line(-3,-1){190}}%   %             5 to 6
\else \if\member f%%%d%
      \put(63,40){\line(3,4){110}}%        %             6 to 7
\else \if\member g%
      \put(200,246){\line(0,1){320}}%      %             7 to 8
\else \if\member h%
       \put(400,626){\line(-3,-1){190}}%   %             8 to 1
\else \if\member i%
      \put(450,636){\line(-3,-4){150}}%    %             9 to 1
\else \if\member j%
      \put(300,110){\line(0,1){320}}%      %             5 to 9
\else \if\member k%%%f%
      \put(768,131){\line(-3,-1){170}}%    %             3 to 10
\else \if\member l%
      \put(182,187){\line(3,-1){343}}%     %             7 to 10
\fi\fi\fi\fi\fi\fi%
\fi\fi\fi\fi\fi\fi\fi}%
\@forsemicol\member:=#2\do{%
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax%
\expandafter\threech@r\@membera{}{}%
\ifx\@memberb\@yl\else
\ifcase\@tmpa%                  %0 omit
 \or \put(440,676){\@chairiI}%  %subst. on 1%%%9
 \or \put(843,541){\@chairiII}% %subst. on 2%%10
 \or \@chairiIII%               %subst. on 3%%%4
 \or \@chairiIV%                %subst. on 4%%%3
 \or \@chairiV%                 %subst. on 5%%%2
 \or \@chairiVI%                %subst. on 6%%%1
 \or \@chairiVII%               %subst. on 7%%%6
 \or \put(170,586){\@chairiVIII}%subst. on 8%%%8
 \or \put(270,450){\@chairiIX}% %subst. on 9%%%7
 \or \@chairiX%                 %subst. on 10%%5
\fi %end of ifcase
\fi\fi%
}\end{picture}}%               %end of \hadamantane macro
\def\ylhadamanposition#1{%
\@@ylswfalse%%%\@reset@ylsw
\@forsemicol\member:=#1\do{%
\if@@ylsw\else
\ifx\member\empty\else
\expandafter\@m@mb@r\member;\relax
\expandafter\threech@r\@membera{}{}\relax
\ifx\@memberb\@yl\relax\@@ylswtrue\else\@@ylswfalse\fi
\if@@ylsw
\ifcase\@tmpa%0 omit
 \or\gdef\@ylii{-440}\gdef\@yli{-676}\global\@ylswtrue% subst. on 1
 \or\gdef\@ylii{-843}\gdef\@yli{-541}\global\@ylswtrue% subst. on 2
 \or\gdef\@ylii{-843}\gdef\@yli{-181}\global\@ylswtrue% subst. on 3
 \or\gdef\@ylii{-673}\gdef\@yli{46}\global\@ylswtrue% subst. on 4
 \or\gdef\@ylii{-270}\gdef\@yli{-90}\global\@ylswtrue% subst. on 5
 \or\gdef\@ylii{0}\gdef\@yli{0}\global\@ylswtrue% subst. on 6
 \or\gdef\@ylii{-170}\gdef\@yli{-226}\global\@ylswtrue% subst. on 7
 \or\gdef\@ylii{-170}\gdef\@yli{-586}\global\@ylswtrue% subst. on 8
 \or\gdef\@ylii{-270}\gdef\@yli{-450}\global\@ylswtrue% subst. on 9
 \or\gdef\@ylii{-573}\gdef\@yli{-91}\global\@ylswtrue% subst. on 10
\fi%end of ifcase
\fi\fi\fi}}%
\def\@chairiVI{%
   \if\@tmpb a%single bond
     \yl@xdiff=42
     \yl@ydiff=92
           \put(0,0){\line(0,-1){168}}% single bond at 6 axial
           \putlratom{-42}{-260}{\@memberb}% left & right type
   \else\if\@tmpb b%single bond
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 6 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=90
           \put(0,0){\line(-1,-1){120}}% single bond at 6
           \putlatom{-130}{-210}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=92
           \put(0,0){\line(0,-1){168}}% single bond at 6 axial
           \putlratom{-42}{-260}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 6 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=90
           \putlatom{-130}{-210}{\@memberb}% left type
           \put(-10,10){\line(-1,-1){120}}% double bond at 6
           \put(10,-10){\line(-1,-1){120}}% double bond at 6
          \else%
     \yl@xdiff=10
     \yl@ydiff=90
           \putlatom{-130}{-210}{\@memberb}% left type
           \put(0,0){\line(-1,-1){120}}% single bond at 6
   \fi\fi\fi\fi}%
\def\@chairiVII{%
   \if\@tmpb a%single bond
     \yl@xdiff=26
     \yl@ydiff=46
           \put(170,226){\line(-5,-3){144}}% single bond at 7 equatorial
           \putlatom{10}{94}{\@memberb}% left type
   \else\ifx\@tmpb\empty%single bond
     \yl@xdiff=26
     \yl@ydiff=46
           \put(170,226){\line(-5,-3){144}}% single bond at 7 equatorial
           \putlatom{10}{94}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(170,226){\line(-1,1){120}}% single bond at 7
           \putratom{40}{316}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=12
           \put(170,226){\line(0,1){168}}% single bond at 7 axial
           \putlratom{138}{406}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=26
     \yl@ydiff=46
           \put(170,226){\line(-5,-3){144}}% single bond at 7 equatorial
           \putlatom{10}{94}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{40}{316}{\@memberb}% left type
           \put(160,216){\line(-1,1){120}}% double bond at 7
           \put(180,236){\line(-1,1){120}}% double bond at 7
          \else%
     \yl@xdiff=10
     \yl@ydiff=30
           \putlatom{40}{316}{\@memberb}% left type
           \put(170,226){\line(-1,1){120}}% single bond at 7
   \fi\fi\fi\fi}%
\def\@chairiX{%
   \if\@tmpb a%single bond
     \yl@xdiff=40
     \yl@ydiff=104
           \put(573,91){\line(0,-1){168}}% single bond at 5 axial
           \putlratom{533}{-181}{\@memberb}% left type
   \else\if\@tmpb b%single bond
     \yl@xdiff=-36
     \yl@ydiff=3
           \put(573,91){\line(5,3){144}}% single bond at 5 equatorial
           \putlatom{753}{180}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=56
           \put(573,91){\line(5,-4){170}}% single bond at 5
           \putratom{753}{-101}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=104
           \put(573,91){\line(0,-1){168}}% single bond at 5 axial
           \putlratom{533}{-181}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-36
     \yl@ydiff=3
           \put(573,91){\line(5,3){144}}% single bond at 5 equatorial
           \putlatom{753}{180}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=10
     \yl@ydiff=86
           \putratom{733}{-141}{\@memberb}% right type
           \put(563,83){\line(5,-4){170}}% double bond at 5
           \put(583,99){\line(5,-4){170}}% double bond at 5
          \else%
     \yl@xdiff=-10
     \yl@ydiff=76
           \put(573,91){\line(5,-4){170}}% single bond at 5
           \putratom{753}{-121}{\@memberb}% right type
   \fi\fi\fi\fi}%
\def\@chairiIII{%
   \if\@tmpb a%single bond
     \yl@xdiff=-16
     \yl@ydiff=64
           \put(843,181){\line(5,-3){144}}% single bond at 3 equatorial
           \putratom{1003}{31}{\@memberb}% right type
   \else\ifx\@tmpb\empty%single bond
     \yl@xdiff=-16
     \yl@ydiff=64
           \put(843,181){\line(5,-3){144}}% single bond at 3 equatorial
           \putratom{1003}{31}{\@memberb}% right type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(843,181){\line(1,1){120}}% single bond at 3
           \putratom{953}{271}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=11
           \put(843,181){\line(0,1){168}}% single bond at 3 axial
           \putlratom{801}{360}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-16
     \yl@ydiff=64
           \put(843,181){\line(5,-3){144}}% single bond at 3 equatorial
           \putratom{1003}{31}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=30
           \putratom{953}{271}{\@memberb}% right type
           \put(833,191){\line(1,1){120}}% double bond at 3
           \put(853,171){\line(1,1){120}}% double bond at 3
          \else%
     \yl@xdiff=10
     \yl@ydiff=30
           \put(843,181){\line(1,1){120}}% single bond at 3
           \putratom{953}{271}{\@memberb}% right type
   \fi\fi\fi\fi}%
\def\@chairiIV{%
   \if\@tmpb a%single bond
     \yl@xdiff=40
     \yl@ydiff=104
           \put(673,-46){\line(0,-1){168}}% single bond at 4 axial
           \putlratom{633}{-318}{\@memberb}% left & right type
   \else\if\@tmpb b%single bond
     \yl@xdiff=-6
     \yl@ydiff=17
           \put(673,-46){\line(5,3){144}}% single bond at 4 equatorial
           \putratom{823}{23}{\@memberb}% right type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=92
           \put(673,-46){\line(1,-1){120}}% single bond at 4
           \putratom{803}{-258}{\@memberb}% right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=40
     \yl@ydiff=104
           \put(673,-46){\line(0,-1){168}}% single bond at 4 axial
           \putlratom{633}{-318}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=-6
     \yl@ydiff=17
           \put(673,-46){\line(5,3){144}}% single bond at 4 equatorial
           \putratom{823}{23}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-10
     \yl@ydiff=92
           \putratom{803}{-258}{\@memberb}%  right type
           \put(663,-53){\line(1,-1){120}}% double bond at 4
           \put(683,-38){\line(1,-1){120}}% double bond at 4
          \else%
     \yl@xdiff=-10
     \yl@ydiff=76
           \put(673,-46){\line(5,-4){170}}% single bond at 4
           \putratom{853}{-258}{\@memberb}% right type
   \fi\fi\fi\fi}%
\def\@chairiV{%
   \if\@tmpb a%single bond
     \yl@xdiff=26
     \yl@ydiff=102
           \put(270,90){\line(-5,-3){144}}% single bond at 5 equatorial
           \putratom{100}{-98}{\@memberb}% left type
   \else\ifx\@tmpb\empty%single bond
     \yl@xdiff=26
     \yl@ydiff=102
           \put(270,90){\line(-5,-3){144}}% single bond at 5 equatorial
           \putratom{100}{-98}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=0
     \yl@ydiff=46
           \put(270,90){\line(-5,4){170}}% single bond at 5
           \putlatom{100}{180}{\@memberb}% left type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=32
     \yl@ydiff=12
           \put(270,90){\line(0,1){168}}% single bond at 5 axial
           \putlratom{238}{270}{\@memberb}% left type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=36
     \yl@ydiff=102
           \put(270,90){\line(-5,-3){144}}% single bond at 5 equatorial
           \putratom{100}{-98}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=0
     \yl@ydiff=36
           \putlatom{100}{200}{\@memberb}% left or right type
           \put(260,80){\line(-5,4){170}}% double bond at 5
           \put(280,100){\line(-5,4){170}}% double bond at 5
          \else%
     \yl@xdiff=0
     \yl@ydiff=26
           \putlatom{100}{200}{\@memberb}% left type
           \put(270,90){\line(-5,4){170}}% single bond at 5
   \fi\fi\fi\fi}%
\def\@chairiI{%
   \if\@tmpb a%single bond
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
   \else\ifx\@tmpb\empty%
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
    \else\if\@tmpc a%(a) axial
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
    \else\if\@tmpc e%(e) beta
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
    \fi\fi\fi%
  \else \if\@tmpb D%double bond
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
          \else%
     \yl@xdiff=42
     \yl@ydiff=-10
           \put(0,0){\line(0,1){168}}% single bond at 1 axial
           \putlratom{-42}{178}{\@memberb}% left & right type
   \fi\fi\fi\fi}%
\def\@chairiII{%
   \if\@tmpb a%single bond
     \yl@xdiff=-10
     \yl@ydiff=13
           \put(0,0){\line(3,1){190}}% single bond at 6 equatorial
           \putratom{200}{50}{\@memberb}% right type
   \else\if\@tmpb b%single bond
     \yl@xdiff=-10
     \yl@ydiff=0
            \put(0,0){\line(3,4){120}}%          % bond 1 to 6
            \putratom{130}{160}{\@memberb}% left type
   \else\if\@tmpb S%single bond
     \ifx\@tmpc\empty%
     \yl@xdiff=-10
     \yl@ydiff=-10
           \put(0,0){\line(1,1){120}}% single bond at 1
           \putratom{130}{130}{\@memberb}% left type
      \else\if\@tmpc a%(a) axial
     \yl@xdiff=-10
     \yl@ydiff=0
            \put(0,0){\line(3,4){120}}%          % bond 1 to 6
            \putratom{130}{160}{\@memberb}% left type
     \else\if\@tmpc e%(e) beta
     \yl@xdiff=-10
     \yl@ydiff=13
           \put(0,0){\line(3,1){190}}% single bond at 6 equatorial
           \putratom{200}{50}{\@memberb}% right type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=-10
     \yl@ydiff=-10
           \putratom{130}{130}{\@memberb}% left type
           \put(-10,10){\line(1,1){120}}% double bond at 1
           \put(10,-10){\line(1,1){120}}% double bond at 1
          \else%
     \yl@xdiff=-10
     \yl@ydiff=-10
           \putratom{130}{130}{\@memberb}% left type
           \put(0,0){\line(1,1){120}}% single bond at 1
   \fi\fi\fi\fi}%
\def\@chairiVIII{%
   \if\@tmpb a%single bond
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
   \else\if\@tmpb b%single bond
     \yl@xdiff=-10
     \yl@ydiff=0
            \put(0,0){\line(3,4){120}}%          % bond 1 to 6
            \putratom{130}{160}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=4
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-140}{50}{\@memberb}% left type
    \else\if\@tmpc e% right-hand
     \yl@xdiff=-10
     \yl@ydiff=0
            \put(0,0){\line(3,4){120}}%          % bond 1 to 6
            \putratom{130}{160}{\@memberb}% left type
    \else\if\@tmpc a% left-hand
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=4
     \yl@ydiff=26
            \putlatom{-140}{60}{\@memberb}% left type
           \put(10,10){\line(-5,3){144}}% single bond at 1 equatorial
           \put(0,-10){\line(-5,3){144}}% single bond at 1 equatorial
          \else%
     \yl@xdiff=4
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-140}{50}{\@memberb}% left type
   \fi\fi\fi\fi}%
\def\@chairiIX{%
   \if\@tmpb a%single bond
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
   \else\if\@tmpb b%single bond
     \yl@xdiff=-16
     \yl@ydiff=36
           \put(0,0){\line(5,3){144}}% single bond at 6 equatorial
           \putratom{160}{50}{\@memberb}% left type
   \else\if\@tmpb S%single bond
    \ifx\@tmpc\empty%
     \yl@xdiff=4
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-140}{50}{\@memberb}% left type
    \else\if\@tmpc e% right-hand
     \yl@xdiff=-16
     \yl@ydiff=36
           \put(0,0){\line(5,3){144}}% single bond at 6 equatorial
           \putratom{160}{50}{\@memberb}% left type
    \else\if\@tmpc a% left-hand
     \yl@xdiff=16
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-160}{50}{\@memberb}% left type
    \fi\fi\fi%
   \else \if\@tmpb D%double bond
     \yl@xdiff=4
     \yl@ydiff=36
           \putlatom{-140}{50}{\@memberb}% left type
           \put(10,10){\line(-5,3){144}}% single bond at 1 equatorial
           \put(0,-10){\line(-5,3){144}}% single bond at 1 equatorial
          \else%
     \yl@xdiff=4
     \yl@ydiff=36
           \put(0,0){\line(-5,3){144}}% single bond at 1 equatorial
           \putlatom{-140}{50}{\@memberb}% left type
   \fi\fi\fi\fi}%
\endinput
%%
%% End of file `ccycle.sty'.
