summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/pstricks-examples-en/35-02-1.ltxbps
blob: a0488231e00f7c7f4db6cfd3bf0a12c8a2254ae5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
%% 
%%  A DANTE-Edition example
%% 
%%  Example 35-02-1 on page 767.
%% 
%%  Copyright (C) 2011 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.
%% 

% Show page(s) 1,3,5,7,9,11

%% ==== 
\PassOptionsToClass{xcolor=table,slidestop, smaller, compress, hyperref={bookmarks=true,colorlinks}}{beamer}
\documentclass{beamer}
\usepackage[utf8]{inputenc}
\usepackage{etex}
\usepackage{times,pstricks}
\usepackage{pst-3dplot}
\usepackage{pstricks-add}
\usetheme{Warsaw}
\useoutertheme[hideallsubsections]{sidebar}
\usecolortheme{dove}
\definecolor{lgray}{gray}{0.88}
\definecolor{mgray}{gray}{0.78}
\definecolor{dgray}{gray}{0.68}
\definecolor{lorange}{rgb}{1.0,0.7,0.7}
\definecolor{morange}{rgb}{0.9,0.6,0.6}
\newcommand\FU[1][]{Freie Universit\"at Berlin #1}
\newcommand\zedat{\textsl{ze|d|a|t}}
\DeclareRobustCommand\ZEDAT{\includegraphics[height=4ex]{images/zedat}}
\usetheme{Warsaw}
\useoutertheme{sidebar}
\def\La{L\kern-.36em\raise.6ex\hbox{\textsf{{\small A}}}}
\author{Herbert Vo\ss}
\institute[ZEDAT]{Freie Universit\"at Berlin}

\pgfdeclareimage[height=6ex, % beamer41.tex -- logo
  width=7.4\baselineskip]{institute-logo}{zedat2}
\pgfdeclareimage[height=1.3cm]{uni}{images/fu-berlin}
\logo{\pgfuseimage{uni}}
%
\makeatletter
\setbeamercolor{logo}{bg=white}
\setbeamercolor{frametitle}{fg=white}
\setbeamertemplate{headline}{%
    \begin{beamercolorbox}[wd=\paperwidth]{frametitle}
      \ifx\beamer@sidebarside\beamer@lefttext%
      \else%
        \hfill%
      \fi%
      \ifdim\beamer@sidebarwidth>0pt%
        \usebeamercolor[bg]{logo}%
        \vrule width\beamer@sidebarwidth height \beamer@headheight%
        \hskip-\beamer@sidebarwidth%
        \hbox to \beamer@sidebarwidth{\hss\vbox to
          \beamer@headheight{\vss\hbox{\color{fg}\insertlogo}\vss}\hss}%
      \else%
        \vrule width0pt height \beamer@headheight%
      \fi%
    \end{beamercolorbox}
}
%
\setbeamertemplate{footline}{%
  \raisebox{-2ex}{\pgfuseimage{institute-logo}}
  \usebeamerfont{date in head/foot}
  \insertshortdate{}\hfill
  \usebeamertemplate{navigation symbols}\hfill
  \insertframenumber{}/\inserttotalframenumber}
%
\setbeamertemplate{sidebar right}{}
\setbeamertemplate{theorem begin}{%
  \begin{\inserttheoremblockenv}{%
    \inserttheoremname~\inserttheoremnumber
    \ifx\inserttheoremaddition\@empty\else\ (\inserttheoremaddition)\fi%
  }%
}
\beamertemplatetransparentcovereddynamic
\makeatother

\def\radius{4 }\def\PhiI{20 }\def\PhiII{50 }
\def\RadIs{\radius \PhiI sin mul}
\def\RadIc{\radius \PhiI cos mul}
\def\RadIIs{\radius \PhiII sin mul}
\def\RadIIc{\radius \PhiII cos mul}
\def\psxyzlabel#1{\bgroup\tiny\textsf{#1}\egroup}
\renewcommand\documentclass[2][]{}


\documentclass[ngerman,xcolor=table,slidestop, smaller, compress,
  hyperref={bookmarks=true,colorlinks}]{beamer}


\begin{document}
\begin{frame}
\frametitle{\texttt{pst-3dplot}}
\begin{pspicture}(-4.5,-6.5)(3,3.25)
  \transduration<1-11>{2.5}
  \psset{Alpha=45,Beta=30,linestyle=dashed,unit=0.8cm}
  \visible<+->{\pstThreeDCoor[linestyle=solid,xMin=-5,xMax=5,yMin=-4,yMax=5,zMax=5,IIIDticks]}
  \visible<+->{\pstThreeDEllipse[linecolor=red](0,0,0)(0,\radius,0)(0,0,\radius)}
  \multido{\iA=15+15,\iB=3+1}{5}{%
    \visible<+->{\pstThreeDEllipse(\radius \iA\space sin mul,0,0)%
	(0,\radius \iA\space cos mul,0)(0,0,\radius \iA\space cos mul)}}
%
  \visible<+->{\pstThreeDEllipse[linestyle=dotted,
    SphericalCoor](0,0,0)(\radius,90,\PhiI)(\radius,0,0)}
  \visible<+->{\pstThreeDEllipse[SphericalCoor,
	beginAngle=-90,endAngle=90](0,0,0)(\radius,90,\PhiI)(\radius,0,0)}
  \visible<+->{\pstThreeDEllipse[linestyle=dotted,
    SphericalCoor](0,0,0)(\radius,90,\PhiII)(\radius,0,0)}
  \visible<+->{\pstThreeDEllipse[SphericalCoor,
	beginAngle=-90,endAngle=90](0,0,0)(\radius,90,\PhiII)(\radius,0,0)}
%
  \visible<+->{\pscustom[fillstyle=solid,fillcolor=blue]{%
    \pstThreeDEllipse[SphericalCoor,beginAngle=\PhiI,endAngle=\PhiII]%
	(0,0,0)(\radius,90,\PhiII)(\radius,0,0)
    \pstThreeDEllipse[beginAngle=\PhiII,endAngle=\PhiI](\RadIIs,0,0)(0,\RadIIc,0)(0,0,\RadIIc)
    \pstThreeDEllipse[SphericalCoor,beginAngle=\PhiII,endAngle=\PhiI]%
	(0,0,0)(\radius,90,\PhiI)(\radius,0,0)
    \pstThreeDEllipse[beginAngle=\PhiI,endAngle=\PhiII](\RadIs,0,0)(0,\RadIc,0)(0,0,\RadIc)
  }}
\end{pspicture}
\end{frame}
\end{document}