%% auteur : 

300 setxunit
7.5 setborder
90 setangle_repere
-0.2 1.2 setxrange
-0.2 1.2 setyrange
traceaxes
axesarrow
%marks


/f {setxvar
    x 2 exp
} def
gsave
   noir
   1 setlinewidth
   continu
  0  1 {f} Courbe
grestore



/A_1{0.25 0.0625} def
/Q_1{0.25 0} def
/A{0.5 0.0625} def
[A A_1] ligne
[A_1 Q_1] ligne
<latex>
  $ A_1 $
</latex>
A_1 [1.5 1.5] ultexlabel
<latex>
  $ Q_1 $
</latex>
Q_1 [1.5 1.5] dctexlabel





/A_2{0.5 0.25} def
/Q_2{0.5 0} def
/A'{0.75 0.25} def
[A_2 A'] ligne
[A_2 Q_2] ligne
<latex>
  $ Q_2 $
</latex>
Q_2 [1.5 1.5] dctexlabel
<latex>
  $ A_2 $
</latex>
A_2 [1.5 1.5] ultexlabel



/A_3{0.75 0.5625} def
/Q_3{0.75 0} def
/A''{1 0.5625} def
[A_3 A''] ligne
[A_3 Q_3] ligne
<latex>
  $ A_3 $
</latex>
A_3 [1.5 1.5] ultexlabel
<latex>
  $ Q_3 $
</latex>
Q_3 [1.5 1.5] dctexlabel




/A_4{1 1} def
/Q_4{1 0} def
/B{1 0.5625} def
[B Q_4] ligne
<latex>
  $ A_4 $
</latex>
A_4 [1.5 1.5] ultexlabel
<latex>
  $ Q_4 $
</latex>
Q_4 [1.5 1.5] dctexlabel

<latex>
  $1 $
</latex>
0 1 [1.5 1.5] cltexlabel
<latex>
  $ 1 $
</latex>
Q_4 [1.5 1.5] urtexlabel

pointilles
[A_4 B] ligne
/C{0 1} def
[A_4 C] ligne
/D{0.75 1} def
[A_3 D] ligne

/E{0.5 0.5625} def
[A_3 E] ligne
[A_2 E] ligne

/F{0.25 0.25} def
[A_1 F] ligne
[F A_2] ligne
/G{0 0.0625} def
[G A_1] ligne

<latex>
  $ Q_0 $
</latex>
O [1.5 1.5] dltexlabel

<latex>
  $ A_0 $
</latex>
O [1.5 1.5] ultexlabel