| 1 |
\documentclass{article} |
|---|
| 2 |
\usepackage[T1]{fontenc} |
|---|
| 3 |
\usepackage[latin1]{inputenc} |
|---|
| 4 |
\usepackage[a4paper,margin=2cm]{geometry} |
|---|
| 5 |
\usepackage{pstricks-add,pst-map3d} |
|---|
| 6 |
\pagestyle{empty} |
|---|
| 7 |
\newpsstyle{Globe}{circles=true} |
|---|
| 8 |
\newpsstyle{night}{fillstyle=solid,fillcolor=black,opacity=0.8} |
|---|
| 9 |
|
|---|
| 10 |
\begin{document} |
|---|
| 11 |
\psset{Radius=5,Decran=100,Dobs=100,unit=0.5} |
|---|
| 12 |
\begin{center} |
|---|
| 13 |
\multido{\i=0+2,\ih=1+2}{12}{ |
|---|
| 14 |
\begin{pspicture}(-7,-8)(7,6) |
|---|
| 15 |
\psframe(-7,-8)(7,6) |
|---|
| 16 |
\psline(-10;48.85)(8;48.85) |
|---|
| 17 |
\rput(-10;48.85){\psline(3,0)\psarc{->}(0,0){2}{0}{48.85}\uput[24.4](2;24.4){48.85}} |
|---|
| 18 |
\psGlobeTellure[hour=\i,Day=22,Month=12,Year=2008](2.32,48.85000){Paris} |
|---|
| 19 |
\end{pspicture} |
|---|
| 20 |
\hfill |
|---|
| 21 |
\begin{pspicture}(-7,-8)(7,6) |
|---|
| 22 |
\psframe(-7,-8)(7,6) |
|---|
| 23 |
\psline(-10;48.85)(8;48.85) |
|---|
| 24 |
\rput(-10;48.85){\psline(3,0)\psarc{->}(0,0){2}{0}{48.85}\uput[24.4](2;24.4){48.85}} |
|---|
| 25 |
\psGlobeTellure[hour=\ih,Day=22,Month=12,Year=2008](2.32,48.85000){Paris} |
|---|
| 26 |
\end{pspicture} |
|---|
| 27 |
\newline} |
|---|
| 28 |
\end{center} |
|---|
| 29 |
\end{document} |
|---|
| 30 |
|
|---|
| 31 |
|
|---|
