autocrop
-4.5 5 setxrange
-3 5 setyrange
20 setxunit
6 -6 7 SetCamPos
0 0 0 SetCamView
2 setlinejoin 

35 setfontsize
setTimes

0 3 1 axesRVB

%% projete sur un plan
orange
(Test) 
3 0 0 [0 0 1 90] cctextp3d

%% projete sur un solide
noir
3 newcube /A exch def
A {0 0 1.5 translatepoint3d} solidtransform
A drawsolid
%solidnumfaces
(2) A 2 false cctextp3d
(3) A 3 cctextp3d
bleu
(3) A 3 (0 -2.5 1.5) cctextp3d
noir
(3) A 3 90 (0 -3.5 1.5) cctextp3d