\begin{pspicture}(-6,-5)(6,8)%
\psframe*[linecolor=blue!50](-6,-5)(6,7)
\psset{lightsrc=viewpoint,viewpoint=50 30 15,Decran=60}
\psset{solidmemory}
%% definition du plan de projection
\psSolid[object=plan,
   definition=equation,
   args={[1 0 0 0] 90},
   fillcolor=white,
   linecolor=gray!40,
   plangrid,
   planmarks,
   showBase,
   base=-4.2 4.2 -3.2 3.2,
   name=monplan,
]
\psset{plan=monplan}
%% definition du point A
\psProjection[object=point,
   args=-3 1,
   name=A,
   text=A,
   pos=uc,
]
%% definition du cercle C
\psProjection[object=cercle,
   args=A 1,
   range=0 360,
   name=C,
]
%% definition du point d'angle 45 du cercle C
\psProjection[object=point,
   definition=cpoint,
   args=45 C,
   range=0 360,
   name=D,
   text=D,
   pos=ur
]
\composeSolid
\axesIIID(4,4,2)(5,5,6)
\end{pspicture}