summaryrefslogtreecommitdiff
path: root/obsolete/macros/latex/contrib/tkz/tkz-berge/examples/latex/hypercubed.tex
blob: f5c33f46931516223966f3c58b4d736259321e38 (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
% Author : Alain Matthes
% Encoding : UTF8
% Engine : PDFLaTeX
\documentclass[]{article}
\usepackage[utf8]{inputenc} 
\usepackage[usenames,dvipsnames]{xcolor}
\usepackage{fullpage}
\usepackage[upright]{fourier}
\usepackage{tkz-berge}
\thispagestyle{empty}
\begin{document}
\tikzstyle{SimpleVertexStyle} = [shape        = circle,%
                                 fill         = red,%
                                 inner sep    = 3pt,%
                                 outer sep    = 0pt,%
                                 draw]
\SetVertexSimple
\SetVertexNoLabel

\begin{center}
 \begin{tikzpicture}
   \grCycle[RA=8]{8}
   \pgfmathparse{8*(1-4*sin(22.5)*sin(22.5))}
   \let\tkzbradius\pgfmathresult
    \grCirculant[prefix=b,RA=\tkzbradius]{8}{3}
    \makeatletter
   \foreach \vx in {0,...,7}{%
     \pgfmathsetcounter{tkz@gr@n}{mod(\vx+1,8)}
     \pgfmathsetcounter{tkz@gr@a}{mod(\vx+7,8)}
     \pgfmathsetcounter{tkz@gr@b}{mod(\thetkz@gr@n+1,8)}
     \Edge(a\thetkz@gr@n)(b\thetkz@gr@b)
     \Edge(b\thetkz@gr@a)(a\vx)
      }\makeatother
  \end{tikzpicture}

\end{center}

\end{document}