tgt105.tex

\documentclass[a4paper]{article}
\usepackage[T1]{fontenc}
\usepackage[latin1]{inputenc}
\usepackage{pstricks-add,pst-map3d}
\pagestyle{empty}
\begin{document}
\psset{path=../data}
 
\newpsstyle{Globe}{circles=true,canada=true}
\newpsstyle{night}{fillstyle=solid,fillcolor=black,linecolor=black}
\psset{Radius=5,Decran=100,Dobs=100,unit=0.5}
\begin{pspicture}(-8,-8)(8,7)
\psframe*(-8,-8)(8,7)
\psline[linecolor=white](-7;90)(7;90)
\rput(-7;90){\psline[linecolor=white](3,0)%
    \psarc[linecolor=white]{->}(0,0){2}{0}{90}%
    \uput[19](2;45){\white90}}
\psGlobeTellure[hour=11](-120,90){Pôle Nord}
\end{pspicture}
 
\end{document}