3 files changed, 146 insertions, 22 deletions
diff --git a/Master/texmf-dist/doc/metapost/repere/README.md b/Master/texmf-dist/doc/metapost/repere/README.md
index abb5bde1d9f..8eb44b1f8de 100644
--- a/Master/texmf-dist/doc/metapost/repere/README.md
+++ b/Master/texmf-dist/doc/metapost/repere/README.md
@@ -1,3 +1,5 @@
+Package repere - Version 17.05 - May 10, 2017
+
 This package provides MetaPost macros for drawing secondary school mathematics figures in a coordinate system :
 - axis, grids
 - points, vectors
@@ -7,5 +9,5 @@ This package provides MetaPost macros for drawing secondary school mathema
 
 The doc is in french...
 
-License LPPL
+License LPPL 1.3
 
diff --git a/Master/texmf-dist/doc/metapost/repere/repere-doc.pdf b/Master/texmf-dist/doc/metapost/repere/repere-doc.pdf
index 605edd4b4ff..66fa7f67149 100644
--- a/Master/texmf-dist/doc/metapost/repere/repere-doc.pdf
+++ b/Master/texmf-dist/doc/metapost/repere/repere-doc.pdf
diff --git a/Master/texmf-dist/doc/metapost/repere/repere-doc.tex b/Master/texmf-dist/doc/metapost/repere/repere-doc.tex
index b1a5ece4293..c4599fd5912 100644
--- a/Master/texmf-dist/doc/metapost/repere/repere-doc.tex
+++ b/Master/texmf-dist/doc/metapost/repere/repere-doc.tex
@@ -226,7 +226,7 @@
 \title{Documentation de \texttt{repere.mp}}
 \date{\today}
 \author{Olivier \textsc{Péault}%
-\footnote{E-mail : \href{mailto:o.peault@openmailbox.org}{\texttt{o.peault@openmailbox.org}}}}
+\footnote{E-mail : \href{mailto:o.peault@posteo.net}{\texttt{o.peault@posteo.net}}}}
 \maketitle
 
 \setcounter{tocdepth}{2}
@@ -608,8 +608,8 @@ marque_p:="croix";drawoptions(withcolor rouge);
 pointe(D,E,F);
 marque_p:="creux";drawoptions(withcolor orange);
 nomme.bot(pol(sqrt(2),-pi/4),
-          LaTeX("$\sqrt{2}e^{-i\frac{\pi}{4}}$"));
-nomme.bot((-1.5,1),LaTeX("$(-1,5;1)$"));
+          "$\sqrt{2}e^{-i\frac{\pi}{4}}$");
+nomme.bot((-1.5,1),"$(-1,5;1)$");
 marque_p:="plein";drawoptions(withcolor violet);
 for i=2 upto 4:
   C[i]=(-3+i/2,i);nomme.lft(C[i]);
@@ -774,6 +774,46 @@ marquepointchemin(p,0,2,3,5);
 fin;
 \end{exemple}
 
+
+\subsection{Nommage automatique des courbes}
+\begin{description}
+\item[nomme(p,nom)] affiche \verb|nom| au niveau d'un point d'intersection de \verb|p| et du contour de la figure. Ce point est choisi en fonction de la chaine \verb|prefnomme| qui peut prendre les valeurs \verb|"right"| (valeur par défaut), \verb|"left"|, \verb|"top"| ou \verb|"bottom"|.
+\end{description}
+
+\begin{exemple}
+prefnomme:="left";
+
+repere(-5,5,0.7cm,-5,5,0.7cm);
+path d,C_f;
+d=droite(-1,3);
+vardef f(expr x)=0.5(x**2)-x -4 enddef;
+C_f=courbefonc(f)();
+draw axes(1,1);
+draw d epaisseur 1 couleur bleu;
+draw C_f epaisseur 1 couleur bleu;
+nomme(d,"$d_2$") couleur bleu;
+nomme(C_f) couleur bleu;
+draw cadre;
+fin;
+\end{exemple}
+
+\begin{exemple}
+prefnomme:="bottom";
+
+repere(-5,5,0.7cm,-5,5,0.7cm);
+path d,C_f;
+d=droite(-1,3);
+vardef f(expr x)=0.5(x**2)-x -4 enddef;
+C_f=courbefonc(f)();
+draw axes(1,1);
+draw d epaisseur 1 couleur bleu;
+draw C_f epaisseur 1 couleur bleu;
+nomme(d,"$d_2$") couleur bleu;
+nomme(C_f) couleur bleu;
+draw cadre;
+fin;
+\end{exemple}
+
 \subsection{Dérivée et tangentes}
 \begin{description}
 \item[der.p(x)] image de \verb+x+ par la dérivée de la fonction dont la courbe représentative est \verb+p+.
@@ -799,9 +839,9 @@ q= courbefonc(der.p)(-1,4);
 draw axes(1,1);
 drawoptions(withpen pencircle scaled 1);
 draw p withcolor  bleu;
-nomme.rt(p,0.7,LaTeX("$y=f(x)$"));
+nomme.rt(p,0.7,"$y=f(x)$");
 draw q withcolor  rouge;
-nomme.lft(q,3.7,LaTeX("$y=f'(x)$"));
+nomme.lft(q,3.7,"$y=f'(x)$");
 drawoptions(withpen pencircle scaled 1
             withcolor violet);
 draw tangente.double(p,0);
@@ -995,10 +1035,9 @@ ptantecedents(A,2,Cf);
 draw axes(1,1);
 draw Cf withpen pencircle scaled 1 withcolor bleu;
 drawoptions(dashed evenly withcolor rouge);
-draw projectionaxes((1.3,f(1.3)),
-         LaTeX("$x$"),LaTeX("$f(x)$"));
-draw projectionx.urt(A1,LaTeX("$x_1$"));
-draw projectionx.llft(A2,LaTeX("$x_2$"),-6);
+draw projectionaxes((1.3,f(1.3)),"$x$","$f(x)$");
+draw projectionx.urt(A1,"$x_1$");
+draw projectionx.llft(A2,"$x_2$",-6);
 draw A1--A2;
 fin;
 \end{exemple}
@@ -1024,7 +1063,7 @@ draw projectionaxes((4,f(4)));
 drawoptions(withcolor violet);
 draw intervallex.OF(1,4);
 draw intervalley.FF(0.75,3);
-label(LaTeX("$f(]1;4])=[0,75;3]$"),(2.5,4));
+label("$f(]1;4])=[0,75;3]$",(2.5,4));
 draw cadre;
 fin;
 \end{exemple}
@@ -1082,7 +1121,7 @@ fin
 
 
 \begin{description}
-\item[diagrammebarres((a1,h1),(a2,h2),...(an,hn))] Figure formée de \verb|n| barres rectangulaires de hauteurs \verb|h1| \dots \verb|hn| aux abscisses \verb|a1| \dots \verb|an|. La largeur de ces barres est le nombre \verb|largbarres| qui vaut 20 par défaut.
+\item[diagrammebarres((a1,h1),(a2,h2),...(an,hn))] Figure formée de \verb|n| barres rectangulaires de hauteurs \verb|h1| \dots \verb|hn| aux abscisses \verb|a1| \dots \verb|an|. La largeur de ces barres est le nombre \verb|largbarres| qui vaut \verb|20bp| par défaut.
 \end{description}
 
 \begin{exemple}[0.6]
@@ -1101,7 +1140,7 @@ fin
 
 \subsection{Probabilités}
 
-Quelques fonctions mathématiques sont proposées. Pour les grandes valeurs, on dépasse rapidement les capacités de \MP. Il est dans ce cas conseillé de compiler en utilisant la ligne de commande \verb|mpost -numbersystem="double" <fichier>.mp|.
+Quelques fonctions mathématiques sont proposées. Pour les grandes valeurs, on dépasse rapidement les capacités de \MP. Il est dans ce cas conseillé de compiler en utilisant la ligne de commande \verb|mpost -numbersystem="decimal" <fichier>.mp|.
 
 
 \begin{description}
@@ -1109,6 +1148,9 @@ Quelques fonctions mathématiques sont proposées. Pour les grandes valeurs, on
 \item[binom(n,k)] Entier égal à $\binom{n}{k}$.
 \item[binomiale(n,p,k)] $P(X=k)$ pour $X$ suivant la loi binomiale de paramètres $n$ et $p$.
 \item[diagrammebinomiale(n,p)] Diagramme en bâtons de la loi binomiale de paramètres $n$ et $p$.
+\item[diagrammeuniforme(n,m)] Diagramme en bâtons de la loi uniforme discrète sur les entiers consécutifs de \verb|n| à \verb|m|.
+\item[diagrammegeometrique(p)] Diagramme en bâtons de la loi géométrique de paramètre \verb|p|.
+\item[diagrammepoisson(lambda)] Diagramme en bâtons de la loi de Poisson de moyenne \verb|lambda|.
 \end{description}
 
 
@@ -1120,7 +1162,72 @@ draw axey(0.1,0.1);
 picture diag;
 diampointsbatons:=0;
 diag:=diagrammebinomiale(15,0.6);
-draw diag withcolor blue epaisseur 4;
+draw diag withcolor vertfonce epaisseur 4;
+fin;
+\end{exemple}
+
+\begin{codecache}
+diampointsbatons:=5;
+\end{codecache}
+
+\begin{exemple}
+repere.larg(-2,10,8cm,-0.1,0.5,6cm);
+ setall(0,10,0,0.5);
+ draw axex(1,1);
+ draw axey(0.05,0.05);
+ draw diagrammegeometrique(0.4)
+                   epaisseur 2 couleur bleu;
+fin;
+\end{exemple}
+
+\begin{exemple}
+repere(-2,16,0.45cm,-0.1,0.25,15cm);
+setall(0,16,0,0.25);
+draw axex(1,1);
+draw axey(0.1,0.1);
+picture diag;
+diampointsbatons:=0;
+diag:=diagrammepoisson(6);
+draw diag withcolor orange epaisseur 4;
+fin;
+\end{exemple}
+
+\begin{description}
+\item[densitenormale(mu,sigma,a,b)] Courbe représentant la densité de la loi normale de moyenne \verb|mu| et d'écart type \verb|sigma| entre \verb|a| et \verb|b|. Si \verb|a| et \verb|b| sont omis, le tracé est fait sur l'intervalle définissant le repère.
+\item[densiteexponentielle(lambda)] Courbe représentant la densité de la loi normale de paramètre \verb|lambda|.
+\end{description}
+
+\begin{codecache}
+prefnomme:="top";
+\end{codecache}
+
+\begin{exemple}[0.45]
+repere(-4,32,0.23cm,-0.01,0.12,46cm);
+  draw axex(2,2);
+  draw axey(0.02,0.02);
+  path C,d;
+  C=densitenormale(16,4);
+  fill souscourbe(C,0,14) couleur gris;
+  draw souscourbe(C,0,14);
+  draw C epaisseur 2 couleur rouge;
+  d=droite(16);
+  draw d dashed evenly;
+  drawarrow (5,0.06)--(11,0.02);
+  label.top("$P(X\leq 14)$",(5,0.06));
+  nomme(d,"$\mu$");
+fin;
+\end{exemple}
+
+\begin{exemple}
+repere.larg(-1,9,8cm,-0.05,0.6,6cm);
+  setall(0,9,0,0.6);
+  draw axex(1,1);
+  draw axey(0.1,0.1);
+  path C,D;
+  C=densiteexponentielle(0.5);
+  D=densiteexponentielle(0.3);
+  draw C epaisseur 2 couleur rouge;
+  draw D epaisseur 2 couleur violet;
 fin;
 \end{exemple}
 
@@ -1236,7 +1343,7 @@ draw marqueangle(C,B,A,3);
 drawarrow marqueangle(A,C,B);
 fill marqueangle(B,A,C,1) withcolor vert;
 draw marqueangle(B,A,C,1);
-nomme.rt(B,A,C,LaTeX("\ang{45}"));
+nomme.rt(B,A,C,"\ang{45}");
 fin;
 \end{exemple}
 
@@ -1250,8 +1357,7 @@ repere(-1,10,0.5cm,-1,9,0.5cm);
 pair A,B,C,A',B',C',u;
 A=(3,1);B=(5,2);C=(1,5);u=(3,3);
 A'-A=B'-B=C'-C=u;
-draw projectionaxes(A,LaTeX("$x_A$"),
-                 LaTeX("$y_A$")) dashed evenly;
+draw projectionaxes(A,"$x_A$","$y_A$") dashed evenly;
 draw axes(0,0);
 drawoptions(withcolor pourpre);
 draw triangle(A,B,C);draw triangle(A',B',C');
@@ -1289,9 +1395,25 @@ fin;
 \begin{exemple}[0.55]
 repere(-1,5,1cm,-1,4,1cm);
 draw axes(1,1);
-label.ulft(LaTeX("Abscisses"),(5,0.1));
-label.lrt(LaTeX("Ordonnées"),(0.1,4));
-label(LaTeX("$f(x)=\pi^2\sqrt{x}$"),(2,2));
+label.ulft("Abscisses",(5,0.1));
+label.lrt("Ordonnées",(0.1,4));
+label("$f(x)=\pi^2\sqrt{x}$",(2,2));
+fin;
+\end{exemple}
+
+\begin{description}
+\item[legende.pos(fig,p)] Figure formée du chemin \verb|p| dessiné avec une flèche et de la figure ou de la chaine \verb|fig| située à la position \verb|pos| par rapport au premier point du chemin.
+\end{description}
+
+\begin{exemple}[0.6]
+repere(-0.5,5,1cm,-0.5,4,1cm);
+  draw axes(1,1);
+  pair A,B;
+  A=(2,1);B=(2,2);
+  nomme.rt(A) couleur rouge;
+  nomme.top(B) couleur rouge;
+  legende.top("Le point $A$",(1,3){down}..{down}A);
+  legende.bot("Le point $B$",(4,1)--B);
 fin;
 \end{exemple}
 
@@ -1499,7 +1621,7 @@ Certains packages permettent d'écrire du code \MP{} directement dans un documen
 Il est aussi possible d'utiliser Lua\LaTeX{} avex le package \verb|luamplib|. Il faut alors charger les packages \verb|siunitx| et \verb|esvect| utilisés par \verb|repere|.
 
 \begin{center}
-\begin{minipage}[t]{0.45\linewidth}
+\begin{minipage}[t]{0.5\linewidth}
 {\centering \textbf{Utilisation de Lua\LaTeX}\par}
 
 
@@ -1511,6 +1633,7 @@ Il est aussi possible d'utiliser Lua\LaTeX{} avex le package \verb|luamplib|. Il
 \usepackage{siunitx}
 \usepackage{esvect}
 \usepackage{luamplib}
+\mplibnumbersystem{double} % Si nécessaire
 \begin{document}
 \everymplib{input repere;}
 \begin{mplibcode}
@@ -1529,7 +1652,6 @@ fin;
 
 \begin{exemple}
 repere(-0.5,5,1cm,-0.5,5,1cm);
-coulpoint:=blue;coullabel:=blue;
 pair A,B,C,D;
 A=(0.5,0.5);B=(4,1);C=(3,4);
 typetrace:="mainlevee";