%% auteur :
beginfig(1);
drawarrow (0,2)*u--(13,2)*u withpen pencircle scaled 2 pt;
for i=0 upto 10 :
draw (i*v,1.8*u)--(i*v,2.2*u);
draw (i*v,-0.2*u)--(i*v,0.2*u);
endfor;
drawarrow (0,0)--(13,0)*u withpen pencircle scaled 2 pt;
for i=1 upto 3 :
draw (i*3,-0.5)*u--(i*3,1)*u withpen pencircle withcolor red dashed evenly;
draw (i*3,1.5)*u--(i*3,2.5)*u withpen pencircle withcolor red dashed evenly;
endfor;
label.top(btex 0 h etex,(0,2.2)*u);
label.top(btex 0 min etex,(0,0.2)*u);
label.top(btex 1 h etex,(12,2.2)*u);
label.top(btex 60 min etex,(12,0.2)*u);
endfig;
|