Présentation de inter_002.jps

/syracuse/bbgraf/albums/geometrie_2nd/inter_002.jpg
-5 6 setxrange -2 6 setyrange 10 setfontsize 20 setxunit quadrillage /axesarrow {} def /arrowscale {.7 dup} def tracerepere /A {0 3} def /B {-4 0} def /C {3 0} def /D {0 1} def A B C D interdroite /M defpoint [-4 1 3] {xmark} apply .8 setlinewidth A B droite C D droite setTimesItalic (O) O dltext (M) M (3 -1) brtext (d) 4 A B xdpoint dctext (d') -4 C D xdpoint urtext <tex> $\vec \imath $ </tex> .5 0 dctexlabel <tex> $\vec \jmath $ </tex> 0 .5 cltexlabel