Fichier 151.jps — Modifié le 27 Novembre 2006 à 23 h 14
%% Courbe jps
%
%
25 setxunit
7.5 setborder
90 setangle_repere
-5 5 setxrange
-5 5 setyrange
1 1 settkstep
.5 .5 setsubtkstep
2 2 setmkstep
traceaxes
30 setxunit [1 1 .5 .5 .1 .1] {orange} Quadrillage .7 setlinewidth
tracerepere marks
setTimesItalic
(O) O drtext
setTimes (x) 4.8 0.2 cctext
setTimes (y) -0.2 4.8 cctext
ticks
subticks
marks
traceaxes
axesarrow
unites
-4 -4 /A defpoint
-3 -3 /B defpoint
-2 -2 /C defpoint
-1 -1 /D defpoint
0 0 /E defpoint
1 1 /F defpoint
2 2 /G defpoint
3 3 /H defpoint
4 4 /J defpoint
[A B C D E F G H J] points
/f {setxvar
1
} def
/g {setxvar
2
} def
/h {setxvar
3
} def
/i {setxvar
4
} def
/j {setxvar
0
} def
/k {setxvar
-1
} def
/l {setxvar
-2
} def
/m {setxvar
-3
} def
/n {setxvar
-4
} def
gsave
noir
.75 setlinewidth
continu
0 1 {f} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
1 2 {g} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
2 3 {h} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
3 4 {i} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
1 neg 0 {j} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
2 neg 1 neg {k} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
3 neg 2 neg {l} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
4 neg 3 neg {m} Courbe
grestore
gsave
noir
.75 setlinewidth
continu
5 neg 4 neg {n} Courbe
grestore