Présentation de 3D_14.jps

/syracuse/bbgraf/albums/sections_planes/3D_14.jpg
jpegmode 400 setheight 667 setwidth -15 15 setxrange -3.5 14.5 setyrange /l 8 def /a {0 l l} def /b {l l l} def /c {l 0 l} def /d {0 0 l} def /e {0 l 0} def /f {l l 0} def /g {l 0 0} def /h {0 0 0} def /i {3.5 3.5 l} def /j {3.5 0 6.5} def /k {5 6.5 l} def /vect_I {-15 cos -15 sin} def /vect_J {35 cos 35 sin .8 mulv} def /vect_K {0 1} def /xyz2xy { 3 dict begin /z exch def /y exch def /x exch def vect_I x mulv vect_J y mulv vect_K z mulv addv addv end } def [/A /B /C /D /E /F /G /H /I /J /K] [a b c d e f g h i j k] {xyz2xy} capply mapnp /dotscale {2 dup} def 1.2 setlinewidth [A B C G F B] ligne [C D A] ligne [D H G] ligne K I A B interdroite /K1 defpoint K I D C interdroite /K2 defpoint K2 J C G interdroite /K3 defpoint I J K paral K2 J interdroite /L defpoint gsave .8 setlinewidth pointilles [A E H] ligne [E F] ligne [I J] ligne %% mixte %% [K1 K2 K3] ligne %% K L 1 trait grestore [I J K] {times} plot 12 setfontsize setTimesItalic (A) A ultext (B) B urtext (C) C drtext (D) D ultext (E) E brtext (F) F brtext (G) G drtext (H) H dltext (I) I (0 2) uctext (J) J (-5 0) cltext (K) K ultext (d) 8 13 brtext (d') 11.5 13 bltext <tex> \vbox {\hsize 60mm \parindent 0pt Les deux droites $d$ et $d'$ sont parallèles. La droite $d$ rencontre les faces du cube en $I$ et en $J$. La droite $d'$ rencontre les faces du cube en $K$ et en un point $L$ à dessiner. } </tex> -14.5 2.5 [1.5 dup] urtexlabel 1.2 setlinewidth xmax L K xdpoint K 1 trait I J -1 trait