img/serie02/pavage1.tex

   1 \documentclass[a4paper]{article}
   2 \usepackage[T1]{fontenc}
   3 \usepackage{pst-anamorphosis-add}
   4 \definecolor{sepia}{rgb}{1,0.8,0.8}
   5 \pagestyle{empty}
   6 \begin{document}
   7 \section*{Image d'un pavage avec des cercles}
   8 \begin{center}
   9 \psset{type=conical}
  10 %\psset{unit=0.7}
  11 \begin{pspicture}[showgrid](-7,-7)(7,7)
  12 \pscircle[doubleline=true]{3}
  13 {\psset{linecolor=red}
  14 \pnodeA(-0.5,-1){I}
  15 \pnodeA(-0.5,1){J}
  16 \pnodeA(1,1){K}
  17 \pnodeA(1,-1){L}
  18 \pnode(-0.5,-1){I'}
  19 \pnode(-0.5,1){J'}
  20 \pnode(1,1){K'}
  21 \pnode(1,-1){L'}
  22 \pslineA(-0.5,-1)(-0.5,1)(1,1)(1,-1)(-0.5,-1)
  23 %\psdots[dotsize=2mm](I)(J)(K)(L)(I')(J')(K')(L')
  24 \psframe(-0.5,-1)(1,1)}
  25 \multido{\N=-1.5+1.0}{4}{
  26 \multido{\n=-1.5+1.0}{4}{%
  27     \pscircle[fillstyle=solid,fillcolor=sepia](\n,\N){0.5}
  28     }}
  29 \multido{\N=-1.5+1.0}{4}{
  30 \multido{\n=-1.5+1.0}{4}{%
  31     \pscircleA[fillstyle=solid,fillcolor=sepia](\n,\N){0.5}
  32     }}
  33 \multido{\n=0.5+0.5,\N=0.5+0.5}{4}{%
  34     \pnode(! \n\space -2){A}
  35     \pnode(! \n\space 2){B}
  36     \psline(A)(B)
  37     \pslineA(A)(B)
  38     \pnode(!-2 \N){A}
  39     \pnode(!2 \N){B}
  40     \pslineA(A)(B)
  41     \psline(A)(B)
  42     }
  43 \multido{\n=-2.0+0.5,\N=-2.0+0.5}{4}{%
  44     \pnode(! \n\space -2){A}
  45     \pnode(! \n\space 2){B}
  46     \psline(A)(B)
  47     \pslineA(A)(B)
  48     \pnode(!-2 \N){A}
  49     \pnode(!2 \N){B}
  50     \pslineA(A)(B)
  51     \psline(A)(B)
  52     }
  53 \pnodeA(-0.5,-1){I}
  54 \pnodeA(-0.5,1){J}
  55 \pnodeA(1,1){K}
  56 \pnodeA(1,-1){L}
  57 \pnode(-0.5,-1){I'}
  58 \pnode(-0.5,1){J'}
  59 \pnode(1,1){K'}
  60 \pnode(1,-1){L'}
  61 \pslineA[linecolor=blue](-0.5,-1)(-0.5,1)(1,1)(1,-1)(-0.5,-1)
  62 \psframe[linecolor=blue](I')(K')
  63 \psdots[dotsize=2mm,linecolor=red](I)(J)(K)(L)(I')(J')(K')(L')
  64 \end{pspicture}
  65 \end{center}
  66 \end{document}