200# Mac drawError = { drawError( liste, erreurs <, color, fillcolor>) } [ Ligne(%1, 0), SaveAttr(), $ep:=0.125, LineStyle:=solid, Color:= (if %3=Nil then red else %3 fi), FillColor:= (if %4=Nil then blue else %4 fi), $k:=0, Ligne( for $z in %1 do Inc(k,1), $d:=Copy(%2,k,1)/2, $u1:=z-Re(d),$u2:=z+Re(d),$v1:=z-i*Im(d),$v2:=z+i*Im(d), u1,u2,jump, v1,v2,jump, if abs(v1-v2)>1E-10 then v1-ep/Xscale, v1+ep/Xscale,jump, v2-ep/Xscale, v2+ep/Xscale,jump fi, if abs(u1-u2)>1E-10 then u1-i*ep/Yscale, u1+i*ep/Yscale,jump, u2-i*ep/Yscale, u2+i*ep/Yscale,jump fi od, 0), DotStyle:=dotcircle, Point(%1), RestoreAttr() ]; Graph objet1 = [ view(0,100,0,45), size(9), Color:=lightgray, Grille(0,10+5*i), Color:=black, Axes(0,10+5*i, 1+i), f:=[5+4*i, 40+10*i,50+20*i, 90+40*i], df:=[0, 2, 5+7*i, 5*i], drawError(f, df, red, blue), ];