Présentation de 459.jps

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
(Tesaruot) 
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