Fichier 2830.jps — Modifié le 6 Juillet 2009 à 17 h 45
-6 5 setxrange
-0.5 3 setyrange
1 setxyrapport
60 setxunit
7.5 setborder
90 setangle_repere
-4 4 setxrange
-0.5 3 setyrange
1 1 settkstep
.5 .5 setsubtkstep
2 2 setmkstep
%ticks
%subticks
%marks
traceaxes
axesarrow
%unites
/f {setxvar
#rpn# (7/10*x^2-41/20*x+37/20)
} def
/g {setxvar
#rpn# (7/10*x^2+41/20*x+37/20)
} def
/P {0.5 1} def
/K {-0.5 1} def
/R {1.5 0.35} def
/M {-1.5 0.35} def
/Q {3 2} def
/L {-3 2} def
setTimesItalic
(O) O [1.8 dup] drtext
(x) 3.7 0 [1.8 dup] drtext
(y) 0 2.7 [1.8 dup] ultext
(P) P [1.5 dup] dltext
(R) R [1.5 dup] dctext
(Q) Q [1.5 dup] crtext
(P') K [1.5 dup] crtext
(Q') -3.03 2 [1.5 dup] cltext
(R') M [1.5 dup] dctext
[P Q R K L M] points
gsave
noir
1 setlinewidth
continu
0.2 3.2 {f} Courbe
grestore
gsave
noir
1 setlinewidth
pointilles
-0.2 -3.2 {g} Courbe
grestore
gsave
1.5 setlinewidth
[P Q] ligne
[R Q] ligne
grestore
gsave
pointilles
1.5 setlinewidth
[L K] ligne
[L M] ligne
grestore
<latex>
$\rm{Abb}.\,5$
</latex>
-4.8 1.2 [2.0 dup] ultexlabel