img/serie01/exemples_pavages_conique.tex

   1 \documentclass[a4paper]{article}
   2 \usepackage[T1]{fontenc}
   3 \usepackage{pst-anamorphosis-add}
   4 \definecolor{sepia}{rgb}{1,0.8,0.8}
   5 \begin{document}
   6 \section{Image d'un pavage avec des cercles}
   7 \begin{center}
   8 \psset{type=conical}
   9 %\psset{unit=0.7}
  10 \begin{pspicture}[showgrid](-7,-7)(7,7)
  11 \pscircle[doubleline=true]{3}
  12 {\psset{linecolor=red}
  13 \pnodeA(-0.5,-1){I}
  14 \pnodeA(-0.5,1){J}
  15 \pnodeA(1,1){K}
  16 \pnodeA(1,-1){L}
  17 \pnode(-0.5,-1){I'}
  18 \pnode(-0.5,1){J'}
  19 \pnode(1,1){K'}
  20 \pnode(1,-1){L'}
  21 \pslineA(-0.5,-1)(-0.5,1)(1,1)(1,-1)(-0.5,-1)
  22 %\psdots[dotsize=2mm](I)(J)(K)(L)(I')(J')(K')(L')
  23 \psframe(-0.5,-1)(1,1)}
  24 \multido{\N=-1.5+1.0}{4}{
  25 \multido{\n=-1.5+1.0}{4}{%
  26     \pscircle[fillstyle=solid,fillcolor=sepia](\n,\N){0.5}
  27     }}
  28 \multido{\N=-1.5+1.0}{4}{
  29 \multido{\n=-1.5+1.0}{4}{%
  30     \pscircleA[fillstyle=solid,fillcolor=sepia](\n,\N){0.5}
  31     }}
  32 \multido{\n=0.5+0.5,\N=0.5+0.5}{4}{%
  33     \pnode(! \n\space -2){A}
  34     \pnode(! \n\space 2){B}
  35     \psline(A)(B)
  36     \pslineA(A)(B)
  37     \pnode(!-2 \N){A}
  38     \pnode(!2 \N){B}
  39     \pslineA(A)(B)
  40     \psline(A)(B)
  41     }
  42 \multido{\n=-2.0+0.5,\N=-2.0+0.5}{4}{%
  43     \pnode(! \n\space -2){A}
  44     \pnode(! \n\space 2){B}
  45     \psline(A)(B)
  46     \pslineA(A)(B)
  47     \pnode(!-2 \N){A}
  48     \pnode(!2 \N){B}
  49     \pslineA(A)(B)
  50     \psline(A)(B)
  51     }
  52 \pnodeA(-0.5,-1){I}
  53 \pnodeA(-0.5,1){J}
  54 \pnodeA(1,1){K}
  55 \pnodeA(1,-1){L}
  56 \pnode(-0.5,-1){I'}
  57 \pnode(-0.5,1){J'}
  58 \pnode(1,1){K'}
  59 \pnode(1,-1){L'}
  60 \pslineA[linecolor=blue](-0.5,-1)(-0.5,1)(1,1)(1,-1)(-0.5,-1)
  61 \psframe[linecolor=blue](I')(K')
  62 \psdots[dotsize=2mm,linecolor=red](I)(J)(K)(L)(I')(J')(K')(L')
  63 \end{pspicture}
  64 \end{center}
  65 \section{Esquisse de l'image d'un pavage classique}
  66 \begin{center}
  67 %\psset{unit=0.75}
  68 \begin{pspicture}(-6,-6)(6,6)
  69 \psset{type=conical}
  70 \pscircle[doubleline=true]{3}
  71 \multido{\nY=-2.0+1.0}{4}{%
  72 \multido{\nX=-2.0+1.0}{4}{%
  73     \psframe*[linecolor=sepia](!\nX\space \nY\space)(!\nX\space 0.5 add \nY\space 0.5
  74     add)
  75     \psframe*[linecolor=sepia](!\nX\space 0.5 add \nY\space 0.5 add)%
  76     (!\nX\space 1 add \nY\space 1 add)
  77 }}
  78 \multido{\nY=-2.0+1.0}{2}{%
  79 \multido{\nX=-2.0+1.0}{4}{%
  80 \psset{linecolor=blue,linewidth=1mm}%
  81     \pslineA[fillstyle=solid,fillcolor=cyan!50](!\nX\space \nY\space)(!\nX\space \nY\space 0.5 add)(!\nX\space 0.5 add \nY\space 0.5 add)(!\nX\space 0.5 add \nY\space)(!\nX\space \nY\space)
  82     }}
  83 \multido{\nY=0.5+1.0}{2}{%
  84 \multido{\nX=-1.5+1.0}{4}{%
  85 \psset{linecolor=red,linewidth=1mm}%
  86     \pslineA[fillstyle=solid,fillcolor=sepia](!\nX\space \nY\space)(!\nX\space \nY\space 0.5 add)(!\nX\space 0.5 add \nY\space 0.5 add)(!\nX\space 0.5 add \nY\space)(!\nX\space \nY\space)
  87     }}
  88 \pslineA[fillstyle=solid,fillcolor=sepia,linecolor=red,linewidth=1mm](-2,0)(-2,0.5)(-1.5,0.5)(-1.5,0)(-2,0)
  89 \pslineA[fillstyle=solid,fillcolor=sepia,linecolor=red,linewidth=1mm](-2,1)(-2,1.5)(-1.5,1.5)(-1.5,1)(-2,1)
  90 \pscustom[fillstyle=solid,fillcolor=sepia,linecolor=red,linewidth=1mm]{
  91     \movetoA(-1,1)
  92     \pslineA(-1,1)(-1,1.5)(-0.5,1.5)(-0.5,1)(-1,1)
  93     \closepath}
  94 \pscustom[fillstyle=solid,fillcolor=sepia,linecolor=red,linewidth=1mm]{
  95     \movetoA(1,1)
  96     \pslineA(1,1)(1,1.5)(1.5,1.5)(1.5,1)(1,1)
  97     \closepath}
  98 \pscustom[fillstyle=solid,fillcolor=sepia,linecolor=red,linewidth=1mm]{
  99     \movetoA(0,1)
 100     \pslineA(0,1)(0,1.5)(0.5,1.5)(0.5,1)(0,1)
 101     \closepath}
 102 \multido{\n=0.5+0.5,\N=0.5+0.5}{4}{%
 103     \pnode(! \n\space -2){A}
 104     \pnode(! \n\space 2){B}
 105     \psline(A)(B)
 106     \pslineA(A)(B)
 107     \pnode(!-2 \N){A}
 108     \pnode(!2 \N){B}
 109     \pslineA(A)(B)
 110     \psline(A)(B)
 111     }
 112 \multido{\n=-2.0+0.5,\N=-2.0+0.5}{4}{%
 113     \pnode(! \n\space -2){A}
 114     \pnode(! \n\space 2){B}
 115     \psline(A)(B)
 116     \pslineA(A)(B)
 117     \pnode(!-2 \N){A}
 118     \pnode(!2 \N){B}
 119     \pslineA(A)(B)
 120     \psline(A)(B)
 121     }
 122 \psline(-2,0)(2,0)
 123 \psline(0,-2)(0,2)
 124 \end{pspicture}
 125 \end{center}
 126
 127 \end{document}