%% 
%%  The LaTeX Graphics Companion, 2ed (first printing May 2007)
%% 
%%  Example 7-5-3 on page 509.
%% 
%%  Copyright (C) 2007 Michel Goossens, Frank Mittelbach, Denis Roegel, Sebastian Rahtz, Herbert Vo\ss 
%% 
%%  It 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.
%% 
%%  See http://www.latex-project.org/lppl.txt for details.
%% 

\documentclass{ttctexa}
\pagestyle{empty}
\setcounter{page}{6}
\setlength\textwidth{348.0pt}
\StartShownPreambleCommands
\usepackage[all,arc,knot]{xy}
\StopShownPreambleCommands
\begin{document}
\[
 \xy %FIG.11. Frames as movies of one dimension.
(0,-12)*\ellipse(3,1)__,=:a(-180){-};
(0,-12)*\ellipse(3,1){.};
(-3,0)*\ellipse(3,1){.};
(3,0)*\ellipse(3,1){.};
(-3,0)*\ellipse(3,1)__,=:a(-180){-};
(3,0)*\ellipse(3,1)__,=:a(-180){-};
(-3,4)*\ellipse(3,1){-};
(3,4)*\ellipse(3,1){-};
(0,-6.5)*\ellipse(3,1){.};
(0,-6.5)*\ellipse(3,1)__,=:a(-180){-};
(-3,0)*{}="1";
(3,0)*{}="2";
(-9,0)*{}="A2";
(9,0)*{}="B2";
"1";"2" **\crv{(-3,-5) & (3,-5)};
(-3,-13)*{}="A";
(3,-13)*{}="B";
(-3,-9)*{}="A1";
(3,-9)*{}="B1";
"A";"A1" **\dir{-};
"B";"B1" **\dir{-};
"B1";"B2" **\crv{(8,-7)};
"A1";"A2" **\crv{(-8,-7)};
%TUBE TIP*********************
(-9,8)*{}="tl";
(-3,8)*{}="tr";
(9,8)*{}="er";
(3,8)*{}="el";
(-3,-19.5)*{}="f2";
(3,-19.5)*{}="f4";
(-3,-24)*{}="xf2";
(3,-24)*{}="xf4";
"1";"tr" **\dir{-};
"2";"el" **\dir{-};
"A2";"tl" **\dir{-};
"B2";"er" **\dir{-};
"f2";"xf2" **\dir{-};
"f4";"xf4" **\dir{-};
"f2";"A" **\dir{-}; %ADJUST HERE IF PLANES ARE NOT TRANSPERANT
"f4";"B" **\dir{-};
%End tube tips***************
(0,-8)*{}="A"; %START OF SLICES
(18,0)*{}="B";
(0,8)*{}="G";
(-18,0)*{}="Y";
(-9.2,4)*{}="L";
(9.2,4)*{}="R";
(-3,6.5)*{}="LL";
(3,6.5)*{}="RR";
"A";"B" **\dir{-};
"LL";"G" **\dir{-};
"Y";"L" **\dir{-};
"Y";"A" **\dir{-};
"G";"RR" **\dir{-};
"R";"B" **\dir{-};
(0,-21)*{}="A"; %START OF SLICES
(18,-13)*{}="B";
(0,-5)*{}="G";
(-18,-13)*{}="Y";
(6,-8)*{}="R";
(-6,-8)*{}="L";
"A";"B" **\dir{-};
"Y";"L" **\dir{-};
"Y";"A" **\dir{-};
"R";"B" **\dir{-};
\endxy
\]
\end{document}