From: Jean-Michel Sarlat <jm.sarlat@gmail.com>
Date: Sun, 25 Sep 2011 09:23:02 +0000 (+0200)
Subject: Page de garde pour la documentation (essai)
X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=mp-gdd.git;a=commitdiff_plain;h=858919b2db3b8e4245afd71ef5fc53b638288132

Page de garde pour la documentation (essai)
---

diff --git a/doc/figure.pdf b/doc/figure.pdf
new file mode 100644
index 0000000..54db90c
Binary files /dev/null and b/doc/figure.pdf differ
diff --git a/doc/fond.mp b/doc/fond.mp
new file mode 100644
index 0000000..8f2ca64
--- /dev/null
+++ b/doc/fond.mp
@@ -0,0 +1,21 @@
+input svgnames;
+
+l = 596;
+h = 842;
+
+pair A, B, C, D;
+
+A = (0,0);
+B = (l,0);
+C = (l,h);
+D = (0,h);
+
+beginfig(1);
+
+  fill (A--B--D--cycle) withcolor Moccasin;
+  fill (A--C--D--cycle) withcolor Gainsboro;
+  
+
+endfig;
+
+end
diff --git a/doc/fond.pdf b/doc/fond.pdf
new file mode 100644
index 0000000..2221815
Binary files /dev/null and b/doc/fond.pdf differ
diff --git a/doc/mp-gdd-doc.pdf b/doc/mp-gdd-doc.pdf
index 36fe5e0..ca5535f 100644
Binary files a/doc/mp-gdd-doc.pdf and b/doc/mp-gdd-doc.pdf differ
diff --git a/doc/mp-gdd-doc.tex b/doc/mp-gdd-doc.tex
index c2c6655..0a2515f 100644
--- a/doc/mp-gdd-doc.tex
+++ b/doc/mp-gdd-doc.tex
@@ -1,4 +1,4 @@
-\documentclass{article}
+\documentclass[a4paper]{article}
 \usepackage[utf8]{inputenc}
 \usepackage[charter]{mathdesign}
 \usepackage[margin=2.5cm]{geometry}
@@ -9,6 +9,8 @@
 \usepackage{showexpl} % examples
 \usepackage{mflogo}
 \usepackage[frenchb]{babel}
+\usepackage{tikz}
+\usepackage{url}
 
 \renewcommand{\ttdefault}{lmtt}
 
@@ -65,6 +67,32 @@
 \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}
 
diff --git a/doc/mp-gdd.pdf b/doc/mp-gdd.pdf
new file mode 100644
index 0000000..a212e93
Binary files /dev/null and b/doc/mp-gdd.pdf differ
diff --git a/doc/mp-gdd.w b/doc/mp-gdd.w
new file mode 100644
index 0000000..2e26513
--- /dev/null
+++ b/doc/mp-gdd.w
@@ -0,0 +1,6 @@
+%@EXEC:pstopdftrim
+PATRON:texte-ombrage.ps
+FONT:CaslonECB
+TEXTE:mp-gdd
+MARGES:-1 12 8 8
+
diff --git a/gdd-lbl.mp b/gdd-lbl.mp
index 6ed8490..7d91ed3 100644
--- a/gdd-lbl.mp
+++ b/gdd-lbl.mp
@@ -73,7 +73,7 @@ vardef EtiquetteChemin.@#(expr s,p,pos) = % label, chemin, position
   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)