| 17 | | \newcommand\toptableau{ |
|---|
| 18 | | \rowcolor{yellow} |
|---|
| 19 | | \textbf{solide} & \begin{tabular}{c} |
|---|
| 20 | | \textbf{paramètres}\\ |
|---|
| 21 | | \textbf{par défaut} |
|---|
| 22 | | \end{tabular} & |
|---|
| 23 | | \begin{minipage}{4cm} |
|---|
| 24 | | \centerline{\textbf{vue}} |
|---|
| 25 | | \end{minipage}& |
|---|
| 26 | | \begin{minipage}{4cm} |
|---|
| 27 | | \centerline{\textbf{code}} |
|---|
| 28 | | \end{minipage}} |
|---|
| | 17 | \makeatletter |
|---|
| | 18 | \newdimen\pssizeStar |
|---|
| | 19 | \def\psset@sizeStar#1{\pssetlength\pssizeStar{#1}} |
|---|
| | 20 | \psset@sizeStar{1.5pt} |
|---|
| | 21 | |
|---|
| | 22 | %% adapté de \psRandom du package pstricks-add |
|---|
| | 23 | %% pour rendre aléatoire la taille des étoiles |
|---|
| | 24 | \def\psRandomStar{\pst@object{psRandomStar}}% |
|---|
| | 25 | \def\psRandomStar@i{\@ifnextchar({\psRandomStar@ii}{\psRandomStar@iii(0,0)(1,1)}} |
|---|
| | 26 | \def\psRandomStar@ii(#1){\@ifnextchar({\psRandomStar@iii(#1)}{\psRandomStar@iii(0,0)(#1)}} |
|---|
| | 27 | \def\psRandomStar@iii(#1)(#2)#3{% |
|---|
| | 28 | \def\pst@tempA{#3}% |
|---|
| | 29 | \ifx\pst@tempA\pst@empty\psclip{\psframe(#2)}\else\psclip{#3}\fi |
|---|
| | 30 | \pst@getcoor{#1}\pst@tempA |
|---|
| | 31 | \pst@getcoor{#2}\pst@tempB |
|---|
| | 32 | \begin@SpecialObj |
|---|
| | 33 | \addto@pscode{ |
|---|
| | 34 | \pst@tempA\space /yMin exch def |
|---|
| | 35 | /xMin exch def |
|---|
| | 36 | \pst@tempB\space /yMax exch def |
|---|
| | 37 | /xMax exch def |
|---|
| | 38 | /dy yMax yMin sub def |
|---|
| | 39 | /dx xMax xMin sub def |
|---|
| | 40 | rrand srand % initializes the random generator |
|---|
| | 41 | /getRandReal { rand 2147483647 div } def |
|---|
| | 42 | \psk@randomPoints { |
|---|
| | 43 | /DS \pst@number\pssizeStar\space getRandReal mul def |
|---|
| | 44 | \@nameuse{psds@\psk@dotstyle} |
|---|
| | 45 | \ifPst@color getRandReal 1 1 sethsbcolor \fi |
|---|
| | 46 | getRandReal dx mul xMin add |
|---|
| | 47 | getRandReal dy mul yMin add |
|---|
| | 48 | Dot |
|---|
| | 49 | \ifx\psk@fillstyle\psfs@solid fill \fi stroke |
|---|
| | 50 | } repeat |
|---|
| | 51 | }% |
|---|
| | 52 | \end@SpecialObj |
|---|
| | 53 | \endpsclip |
|---|
| | 54 | \ignorespaces |
|---|
| | 55 | } |
|---|
| | 56 | \makeatother |
|---|
| | 57 | |
|---|
| | 58 | \newcommand{\PstMapThreeDPackage}{`\textsf{pst-map3d}'} |
|---|
| | 59 | \title{The \PstMapThreeDPackage{} package\\A PSTricks package for Geographical Projections} |
|---|
| | 60 | \author{Manuel \textsc{Luque} |
|---|
| | 61 | \mbox{\texttt{<manuel.luque27@gmail.com>}}\\ |
|---|
| | 62 | and\\ |
|---|
| | 63 | Giuseppe \textsc{Matarazzo} \mbox{\texttt{<joematara@hotmail.com>}}} |
|---|
| | 64 | \date{Version 2.0\\ 05 mars 2008} |
|---|
| | 67 | \maketitle |
|---|
| | 68 | \begin{abstract} |
|---|
| | 69 | \PstMapThreeDPackage traite de la représentation en trois dimensions |
|---|
| | 70 | du globe terrestre avec plusieurs fonctionnalités qui rendent son |
|---|
| | 71 | utilisation agréable (tout au moins nous l'espérons). |
|---|
| | 72 | |
|---|
| | 73 | Il s'agit d'une reprise du package élaboré avec Giuseppe |
|---|
| | 74 | Matarazzo en 2003. Celui-ci présentait quelques erreurs de |
|---|
| | 75 | représentation lorsqu'une grande partie d'un pays était cachée |
|---|
| | 76 | aux yeux de l'observateur. Une idée très astucieuse de |
|---|
| | 77 | Christophe Poulain permettant de résoudre ce problème est à |
|---|
| | 78 | l'origine de la refonte du package. |
|---|
| | 79 | |
|---|
| | 80 | La plus grande le code ayant du être réécrite, il a semblé judicieux |
|---|
| | 81 | d'introduire de nouvelles fonctionnalités parmi lesquelles : le \textit{globe tellure}, les plaques tectoniques |
|---|
| | 82 | et les épicentres des séismes. |
|---|
| | 83 | \end{abstract} |
|---|
| | 84 | \tableofcontents |
|---|
| | 85 | \newpage |
|---|
| | 86 | \section{Les données\label{datas}} |
|---|
| | 87 | GLOBE Binaries DECODING : World Public Domain Dbase : |
|---|
| | 88 | F.Pospeschil, A.Rivera (1999) |
|---|
| | 89 | |
|---|
| | 90 | \url{ftp://ftp.blm.gov/pub/gis/wdbprg.zip} |
|---|
| | 91 | |
|---|
| | 92 | Elles ont \'et\'e converties sous forme de tableau PostScript, en |
|---|
| | 93 | degr\'es, |
|---|
| | 94 | gr\^ ace à un petit programme en pascal (de Giuseppe Matarazzo) qui |
|---|
| | 95 | fait partie de la distribution. Ce sont les mêmes données que |
|---|
| | 96 | celles du package \textsf{pst-map2d}. |
|---|
| | 160 | \section{La représentation du globe} |
|---|
| | 161 | La représentation du globe est centrée sur Paris avec les paramètres \verb+\psset{PHI=48.85,THETA=2.32}+. |
|---|
| | 162 | Un effet de moirage apparaît du aux cercles concentriques tracés sur la sphère. Différentes options de couleur |
|---|
| | 163 | sont testées avec cet exemple. |
|---|
| | 164 | |
|---|
| | 165 | \begin{LTXexample}[width=8cm] |
|---|
| | 166 | \begin{pspicture}(-4,-4)(4,4) |
|---|
| | 167 | \psset{PHI=48.85,THETA=2.32,Decran=15} |
|---|
| | 168 | \WorldMapThreeD[gridmapcolor=yellow,circlesep=1,mapcolor=green!50,bordercolor=red, |
|---|
| | 169 | coastwidth=1.2pt,capitals,islandcolor=blue,coastcolor=blue,coasts] |
|---|
| | 170 | \psmeridien{2.32} |
|---|
| | 171 | \psparallel{48.85} |
|---|
| | 172 | \mapputIIID(2.32,48.85){Paris} |
|---|
| | 173 | \end{pspicture} |
|---|
| | 174 | \end{LTXexample} |
|---|
| | 175 | \section{Effet de transparence et rotations} |
|---|
| | 176 | La transparence(resp. opacité) du globe se règle avec le paramètre \texttt{opacity}. |
|---|
| | 177 | Si l'on souhaite combiner les rotations celles-ci s'effectuent, pour des raisons |
|---|
| | 178 | spécifiques à ce package, dans l'ordre suivant \texttt{RotZ}, \texttt{RotX}, \texttt{RotY}. |
|---|
| | 179 | |
|---|
| | 180 | Rappelons que les effets de transparence ne sont possibles qu'avec le fichier \texttt{pdf}, celui-ci sera obtenu |
|---|
| | 181 | avec la séquence de commandes : \texttt{\LaTeX}-->\texttt{dvips}-->\texttt{ps2pdf}. |
|---|
| | 182 | |
|---|
| | 183 | \begin{LTXexample}[width=8.2cm] |
|---|
| | 184 | \begin{pspicture}(-4,-4)(4,4) |
|---|
| | 185 | \psset{RotX=-23,RotZ=30,PHI=46.5833,THETA=0.3333,visibility=false,Decran=15} |
|---|
| | 186 | \WorldMapThreeD[circles=false,blueEarth=false] |
|---|
| | 187 | \WorldMapThreeD[circles=false,visibility=true,opacity=0.7] |
|---|
| | 188 | \psmeridien[visibility=true]{0.333} |
|---|
| | 189 | \psparallel[visibility=true]{46.5833} |
|---|
| | 190 | \mapputIIID(0.3333,46.5833){Poitiers} |
|---|
| | 191 | \end{pspicture} |
|---|
| | 192 | \end{LTXexample} |
|---|
| 164 | | \begin{verbatim} |
|---|
| | 263 | |
|---|
| | 264 | \begin{LTXexample}[width=8cm] |
|---|
| | 265 | \definecolor{BlueDark}{cmyk}{1,1,0,0.5} |
|---|
| | 266 | \newpsstyle{Globe}{circles=true,gridmap=true,daynight=false} |
|---|
| | 267 | \newpsstyle{night}{fillstyle=solid,fillcolor=BlueDark,linecolor=BlueDark,opacity=0.8} |
|---|
| | 268 | \psset{Radius=5,Decran=100,Dobs=100,unit=0.5} |
|---|
| | 331 | |
|---|
| | 332 | Il y a de très nombreux renseignements sur les séismes sur le site : |
|---|
| | 333 | |
|---|
| | 334 | \centerline{\url{http://earthquake.usgs.gov/eqcenter/eqarchives/year/magnitude8_1900_date.php}} |
|---|
| | 335 | |
|---|
| | 336 | \begin{LTXexample}[pos=t] |
|---|
| | 337 | \psset{Radius=5,Dobs=200,Decran=200} |
|---|
| | 338 | \begin{pspicture}(-5,-5)(5,5) |
|---|
| | 339 | \psset{PHI=10,THETA=120,circlewidth=1.5pt} |
|---|
| | 340 | \WorldMapThreeD[circles=false,australia=true]% |
|---|
| | 341 | \psmeridien{95.98} |
|---|
| | 342 | \psparallel{3.30} |
|---|
| | 343 | \psepicenter[circlecolor=red,waves=4,Rmax=2000](95.98,3.30){Sumatra} |
|---|
| | 344 | \psmeridien[meridiencolor=green]{160} |
|---|
| | 345 | \psparallel[parallelcolor=green]{52.76} |
|---|
| | 346 | \psepicenter[circlecolor=green](160,52.76){Kamchatka} |
|---|
| | 347 | \end{pspicture} |
|---|
| | 348 | \end{LTXexample} |
|---|
| | 349 | \section{Les plaques tectoniques} |
|---|
| | 350 | Elles se tracent avec l'option \texttt{ridge}. Les différents types de distinguent par des couleurs différentes (paramétrables : voir la partie correspondant aux paramètres). |
|---|
| | 351 | |
|---|
| | 352 | Les données relatives aux plaques ont été obtenues sur le site : |
|---|
| | 353 | |
|---|
| | 354 | \centerline{\url{http://www.ig.utexas.edu/research/projects/plates/}} |
|---|
| | 355 | |
|---|
| | 356 | \begin{LTXexample}[pos=t] |
|---|
| | 357 | \psset{unit=0.8,RotX=0,Decran=100,Dobs=100,PHI=0,THETA=-100} |
|---|
| | 358 | \begin{pspicture}(-5,-5)(5,5) |
|---|
| | 359 | \WorldMapThreeD[gridmapcolor=yellow,circles=false,ridge=true]% |
|---|
| | 360 | \psframe(4,-6.4)(9,-3.6) |
|---|
| | 361 | \uput[r](4,-4){Tectonic plates boundaries} |
|---|
| | 362 | \psline[linecolor=red,linewidth=2pt](4.2,-4.5)(5,-4.5)\uput[r](5,-4.5){\color{red}{Ridge}} |
|---|
| | 363 | \psline[linecolor=darkgreen,linewidth=2pt](4.2,-5.25)(5,-5.25)\uput[r](5,-5.25){\color{darkgreen}{Trench}} |
|---|
| | 364 | \psline[linecolor=orange,linewidth=2pt](4.2,-6)(5,-6)\uput[r](5,-6){\color{orange}{Transform}} |
|---|
| | 365 | \end{pspicture} |
|---|
| | 366 | \begin{pspicture}(-5,-5)(5,5) |
|---|
| | 367 | \psset{PHI=0,THETA=100} |
|---|
| | 368 | \WorldMapThreeD[gridmapcolor=yellow,circles=false,ridge=true]% |
|---|
| | 369 | \end{pspicture} |
|---|
| | 370 | \end{LTXexample} |
|---|