tgt102.tex

\documentclass[a4paper]{article}
\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](-10;40.75)(10;40.75)
\rput(-10;40.75){\psline[linecolor=white](3,0)%
    \psarc[linecolor=white]{->}(0,0){2}{0}{40.75}%
    \uput[20.37](2;20.37){\white40.75}}
\psGlobeTellure[hour=13](-74.0,40.75){New York}
\end{pspicture}
 
\end{document}