u := 1cm;beginfig(1); xmin := -10; xmax := 10; ymin := -10; ymax := 10; %quadrillage(gros) for i=0 upto (ymax-ymin): draw (xmin*u,(ymin+i)*u) --(xmax*u,(ymin+i)*u) withpen pencircle scaled 1pt; endfor; for i=0 upto (xmax-xmin): draw ((xmin+i)*u,ymin*u) --((xmin+i)*u,ymax*u) withpen pencircle scaled 1pt; endfor; %fin du gros quadrillage endfig; u := 2cm;
beginfig(2); pair O,I,J; xmin := -5; xmax := 5; ymin := -5; ymax := 5; j = 10; %subdivision du quadrillage fin %quadrillage(fin) for i=0 upto j*(ymax-ymin): draw (xmin*u,(ymin+i/j)*u) --(xmax*u,(ymin+i/j)*u) withpen pencircle scaled 1.5pt withcolor green+0.7white; endfor; for i=0 upto j*(xmax-xmin): draw ((xmin+i/j)*u,ymin*u) --((xmin+i/j)*u,ymax*u) withpen pencircle scaled 1.5pt withcolor green+0.7white; endfor; %fin du petit quadrillage %quadrillage(gros) for i=0 upto (ymax-ymin): draw (xmin*u,(ymin+i)*u) --(xmax*u,(ymin+i)*u) withpen pencircle scaled 2pt withcolor black; endfor; for i=0 upto (xmax-xmin): draw ((xmin+i)*u,ymin*u) --((xmin+i)*u,ymax*u) withpen pencircle scaled 2pt withcolor black; endfor; %fin du gros quadrillage %on trace le repère O = (0,0); I = (u,0); J = (0,u); drawarrow ((abs(xmin)+1)[I,O])--(xmax[O,I]) withpen pencircle scaled 2pt withcolor blue; %on part de I [I,O] drawarrow O--I withpen pencircle scaled 2.5pt withcolor red; label.bot(btex $\overrightarrow{\imath}$ etex scaled 2,(0.5*u,0)); drawarrow ((abs(ymin)+1)[J,O])--(ymax[O,J]) withpen pencircle scaled 2pt withcolor blue; drawarrow O--J withpen pencircle scaled 2.5pt withcolor red; label.lft(btex $\overrightarrow{\jmath}$ etex scaled 2, (0,0.5*u)); label.llft(btex $O$ etex scaled 2, O); %fin du repère endfig; u := 1cm;
beginfig(3); pair O,I,J; xmin := -10; xmax := 10; ymin := -10; ymax := 10; %quadrillage(gros) %horizontal for i=0 upto (ymax-ymin): draw (xmin*u,(ymin+i)*u)--(xmax*u,(ymin+i)*u) withpen pencircle scaled 1.5pt withcolor 0.7blue; endfor; %vertical for i=0 upto (xmax-xmin): draw ((xmin+i)*u,ymin*u)--((xmin+i)*u,ymax*u) withpen pencircle scaled 1.5pt withcolor 0.7blue; endfor; %fin du gros quadrillage %on trace le repère O = (0,0); I = (u,0); J = (0,u); drawarrow ((abs(xmin)+1)[I,O])--(xmax[O,I]) withpen pencircle scaled 2pt withcolor black; %on part de I [I,O] drawarrow O--I withpen pencircle scaled 2.5pt withcolor red; label.bot(btex $\overrightarrow{\imath}$ etex scaled 1.5,(0.5*u,0)); drawarrow ((abs(ymin)+1)[J,O])--(ymax[O,J]) withpen pencircle scaled 2pt withcolor black; drawarrow O--J withpen pencircle scaled 2.5pt withcolor red; label.lft(btex $\overrightarrow{\jmath}$ etex scaled 1.5, (0,0.5*u)); label.llft(btex $O$ etex scaled 1.5, O); %fin du repère endfig; u := 2cm;
beginfig(4); pair O,I,J; xmin := -5; xmax := 5; ymin := -5; ymax := 5; j := 10; %subdivision du quadrillage fin %quadrillage(fin) for i=0 upto j*(ymax-ymin): draw (xmin*u,(ymin+i/j)*u)--(xmax*u,(ymin+i/j)*u) withpen pencircle scaled 1.5pt withcolor green; endfor; for i=0 upto j*(xmax-xmin): draw ((xmin+i/j)*u,ymin*u)--((xmin+i/j)*u,ymax*u) withpen pencircle scaled 1.5pt withcolor green; endfor; %fin du petit quadrillage %quadrillage(gros) for i=0 upto (ymax-ymin): draw (xmin*u,(ymin+i)*u)--(xmax*u,(ymin+i)*u) withpen pencircle scaled 2pt withcolor black; endfor; for i=0 upto (xmax-xmin): draw ((xmin+i)*u,ymin*u)--((xmin+i)*u,ymax*u) withpen pencircle scaled 2pt withcolor black; endfor; %fin du gros quadrillage %on trace le repère O = (0,0); I = (u,0); J = (0,u); drawarrow ((abs(xmin)+1)[I,O])--(xmax[O,I]) withpen pencircle scaled 2pt withcolor blue; % on part de I [I,O] drawarrow O--I withpen pencircle scaled 2.5pt withcolor red; label.bot(btex $\overrightarrow{\imath}$ etex scaled 2,(0.5*u,0)); drawarrow ((abs(ymin)+1)[J,O])--(ymax[O,J]) withpen pencircle scaled 2pt withcolor blue; drawarrow O--J withpen pencircle scaled 2.5pt withcolor red; label.lft(btex $\overrightarrow{\jmath}$ etex scaled 2, (0,0.5*u)); label.llft(btex $O$ etex scaled 2, O); %fin du repère endfig; end