Fichier 5049.jps — Modifié le 21 Septembre 2009 à 14 h 53
autocrop
15 setxunit
%quadrillage
%marks
%%les ensembles numériques
-21 27 setxrange
-12 17 setyrange
%tracerepere
%%ensemble des entiers naturels
/N1 {-0.9 0.6} def
/N2 {0.9 -.4} def
/N3 {-1 dup} def
/N0 {0.2 0.2} def
/ellN[N0 3 2 30] def
/N {50 ellN epoint} def
%%ensemble des entiers relatifs
/Z1 {3 3} def
/Z2 {3.8 1.7} def
/Z3 {3.5 0} def
/Z0 {1.1 0.8} def
/ellZ[Z0 5 3 30] def
/Z {45 ellZ epoint} def
%%ensemble des décimaux relatifs
/D1 {6.3 2} def
/D2 {5.2 0} def
/D3 {4.2 -1.5} def
/D0 {2 0.8} def
/ellD[D0 7 4 30] def
/D {40 ellD epoint} def
%%ensemble des rationnels
/Q1 {9 2} def
/Q2 {8.5 0} def
/Q3 {8 6} def
/Q0 {4 1.5} def
/ellQ[Q0 11 5 30] def
/Q {37.5 ellQ epoint} def
%%ensemble des réels
/R1 {14 2} def
/R2 {12 -1} def
/R3 {15 8} def
/R0 {6 1} def
/ellR[R0 15 7 30] def
/R {37.5 ellR epoint} def
/C1 {19 2} def
/C2 {19 0} def
/C3 {18 10} def
/C0 {8 1} def
/ellC[C0 17 9 30] def
/C {30 ellC epoint} def
noir
ellN ellipse
[N0 N1 N2 N3] {times2} plot
bleu
ellZ ellipse
[Z1 Z2 Z3] {times2} plot
vert
ellD ellipse
[D1 D2 D3] {times2} plot
rouge
ellQ ellipse
[Q1 Q2 Q3] {times2} plot
orange
ellR ellipse
[R1 R2 R3] {times2} plot
noir
ellC ellipse
[C1 C2 C3] {times2} plot
11 setfontsize
noir
setTimes
(0) N0 urtext
(1) N1 urtext
(2) N2 urtext
(3) N3 urtext
(-1) Z1 urtext
(-2) Z2 urtext
(-3) Z3 urtext
(-1,3) D1 urtext
(3,14) D2 urtext
(4/5) D3 urtext
(-1/3) Q1 urtext
(3/7) Q2 urtext
(1,2727...) Q3 urtext
(sin 17°) R3 urtext
(i) C1 urtext
(3+i) C2 urtext
(4i) C3 urtext
<tex>
$\sqrt 2$
</tex>
R1 [1.1 dup] urtexlabel
setSymbol
(p) R2 urtext
/fillstyle {blanc fill} def
/dx_boxit 2 def
/dy_boxit 2 def
circleit_all
setTimes
<tex>
${\nset}$
</tex>
N [1.3 1.3] cctexlabel
<tex>
${\zset}$
</tex>
Z [1.3 1.3] cctexlabel
<tex>
${\dset}$
</tex>
D [1.3 1.3] cctexlabel
<tex>
${\qset}$
</tex>
Q [1.3 1.3] cctexlabel
<tex>
${\rset}$
</tex>
R [1.3 1.3] cctexlabel
<tex>
${\cset}$
</tex>
C [1.3 1.3] cctexlabel