40 setxunit -0.1 4 setxrange -0.1 2.5 setyrange /x {1 1} def /p {3 1} def /l {3 2} def traceaxes axesarrow x point l point [x p] (<->) ligne [p l] (<->) ligne [x l] (<->) ligne