tgt103.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;37.78333)(10;37.78333)
\rput(-10;37.78333){\psline(3,0)%
    \psarc[linecolor=white]{->}(0,0){2}{0}{37.7833}%
    \uput[19](2;19){\white37.78}}
\psGlobeTellure[hour=11](-122.416666667,37.7833333333){San Francisco}
\end{pspicture}
 
\end{document}