Présentation de 8914.jps

400 setwidth 1 1 scale 90 setangle_repere 1 setxyrapport -3 10 setxrange -2 6 setyrange -6 25 setxrange -5 8 setyrange %quadrillage /A {2 1} def /B {7 4} def /C{7 1} def B dashpoint A dashpoint tracerepere /u {5 3} def 2 setlinewidth [A C] (->) ligne [B C] (->) ligne A C B angledroit /arrowscale{2 2} def <tex> $\vec \imath $ </tex> .3 0 [1.5 dup] dctexlabel <tex> $\vec \jmath $ </tex> 0 .1 [1.5 dup] ultexlabel <tex> $\vec u$ </tex> A dupp u addv milieu [1.5 dup] ultexlabel 1.3 setlinewidth [A dupp u addv] (->) ligne <tex> $x\vec \imath$ </tex> A C milieu [1.5 dup] dctexlabel <tex> $y\vec \jmath$ </tex> B C milieu [1.5 dup] drtexlabel