-\documentclass{article}
+\documentclass[a4paper]{article}
\usepackage[utf8]{inputenc}
\usepackage[charter]{mathdesign}
\usepackage[margin=2.5cm]{geometry}
\usepackage{showexpl} % examples
\usepackage{mflogo}
\usepackage[frenchb]{babel}
+\usepackage{tikz}
+\usepackage{url}
\renewcommand{\ttdefault}{lmtt}
\newcommand\foncGDD[1]{\texttt{#1}}
\begin{document}
+%% === Page de garde ===================================================
+\thispagestyle{empty}
+\begin{tikzpicture}[remember picture, overlay]
+ \node[below right, shift={(-4pt,4pt)}] at (current page.north west) {%
+ \includegraphics{fond.pdf}%
+ };
+\end{tikzpicture}%
+
+\noindent
+\includegraphics{mp-gdd}\\
+{\large Paquet \MP{} pour des figures de géométrie plane}\\[1cm]
+\parbox{0.6\textwidth}{
+\includegraphics[scale=0.86]{figure.pdf}
+}\hfill
+\parbox{0.4\textwidth}{\Large\raggedleft
+ \textbf{Contributeurs}\\
+ Maxime \textsc{Chupin}\\
+ Jean-Michel \textsc{Sarlat}
+}
+\vfill
+\begin{center}
+Version 0.1 du 25 septembre 2011\\
+\url{http://melusine.eu.org/syracuse/G/mp-gdd/}
+\end{center}
+%% == Page de garde ====================================================
+\newpage
\section{Introduction}
label.@#(TEX(s), _milieuChemin(chemin,pos) gddEnPlace)
enddef;
-vardef _milieuChemin(expr p,pos) = % là, p est du type path
+vardef _milieuChemin(expr p,pos) = % p est du type path
save midtime;
midtime = arctime (pos*(arclength(p))) of p;
point infinity of (subpath (0,midtime) of p)