-7.5 6.5 setxrange -1.5 2.5 setyrange 50 setxunit 18 setfontsize traceOx axeOxarrow /ticklength {10} def xticks 0 xtick %[-9 -4 1] {xmark} apply /a {3} def /b {-0.4} def (0) 0 b [a dup] dctext (-7) -7 b [a dup] dctext (-3) -3 b [a dup] dctext (+4) -5 1.6 [a dup] cctext /arrowscale {2 dup} def /angleA 30 def /angleB 150 def -7 0.5 -3 0.5 (->) pccurve %% adresse IP : 83.99.30.230