1 files changed, 35 insertions, 0 deletions
diff --git a/Master/texmf-doc/doc/english/latex-graphics-companion/4-6-26.ltx b/Master/texmf-doc/doc/english/latex-graphics-companion/4-6-26.ltx
new file mode 100644
index 00000000000..96e648f5bca
--- /dev/null
+++ b/Master/texmf-doc/doc/english/latex-graphics-companion/4-6-26.ltx
@@ -0,0 +1,35 @@
+\documentclass{ppex}
+\nonstopmode
+\usepackage {pstcol,pst-node,multido}
+\pagestyle{empty}
+\setlength\textwidth{207.0pt}
+\begin{document}
+\ResetPreambleCommands
+\ReadyForTheFray
+\usepackage {pstcol,pst-node,multido}
+\newcounter{CtA}     \newcounter{CtB}
+\newcommand{\Wheel}[3]{{%
+\color{black}     \psset{unit=#2}
+\pspicture(-1,-1.2)(1,1.2)
+\SpecialCoor      \degrees[#1]
+\multido{\ia=1+1}{#1}{%
+  \setcounter{CtA}{\ia}%
+  \stepcounter{CtA}%
+  \setcounter{CtB}{#1}%
+  \addtocounter{CtB}{-\ia}%
+  \multido{\ib=\value{CtA}+1}
+     {\value{CtB}}{#3(1;\ia)(1;\ib)}}
+\multido{\i=1+1}{#1}{%
+  \rput(1;\i){%
+   \pscirclebox[fillstyle=solid,
+       fillcolor=white]%
+    {\footnotesize\i}}}
+\endpspicture}}% end of newcommand
+{\color{white}
+\fbox{\Wheel{3}{1.2}{\psline}
+\Wheel{5}{1.2}{\psline}}
+
+\psset{arcangle=10}
+\fbox{\Wheel{12}{3}{\pcarc[linecolor=blue]}}
+}
+\end{document}