%FSTYLE{/syracuse/fabrique/styles/fabrique.css}
%TITRE{Rapporteurs avec PSTricks}
%AUTEUR{Manuel Luque}
%MAIL{}
%P{En cliquant sur les images vous aurez accès aux sources. De plus, sous
chacune d'entre elles, un lien vers une version PDF est présent.}
== Macro de présentation
FICHIER:presentation.txt:EOF::
EXEC:log:Images.pl -fpng -t1.5 -acBBox %%pre%%.tex
EXEC:log:Images.pl -fpdf -t1.5 -acBBox %%pre%%.tex
<[
]>
EOF
%S{Jean-Côme Charpentier}
%P{C'est parti ! J'ai un rapporteur à vendre. Bon mis à part le fait
que cela pourrait servir de règle à calcul circulaire, je n'en vois pas
trop l'intérêt: c'est juste pour le fun :-)}
FICHIER:rjcc.tex:EOF::
%&latex
\documentclass{article}
\usepackage{pst-node}
\usepackage{multido}
\usepackage[latin1]{inputenc}%
\usepackage[a4paper]{geometry}
\pagestyle{empty}
\begin{document}
\begin{pspicture}(-5,-5)(5,5)
\SpecialCoor
\def\fct{ log 360 10 log div mul }
\psset{linewidth=0.4pt}
\pscircle(0,0){5}
\pnode(0,0){Or}
\psset{linewidth=0.2pt}
\pscircle(0,0){4.3}
\multido{\n=1+0.1}{90}{
\pnode(!\n\space \fct cos 4.2 mul \n\space \fct sin 4.2 mul){B0}
\pnode(!\n\space \fct cos 4.4 mul \n\space \fct sin 4.4 mul){E0}
\ncline{B0}{E0}
}
\psset{linewidth=0.3pt}
\multido{\n=1+0.5}{19}{
\pnode(!\n\space \fct cos 4.1 mul \n\space \fct sin 4.1 mul){B0}
\pnode(!\n\space \fct cos 4.5 mul \n\space \fct sin 4.5 mul){E0}
\ncline{B0}{E0}
}
\psset{linewidth=0.4pt,npos=-0.3}
\multido{\n=1+1}{9}{
\pnode(!\n\space \fct cos 4.0 mul \n\space \fct sin 4.0 mul){B0}
\pnode(!\n\space \fct cos 4.6 mul \n\space \fct sin 4.6 mul){E0}
\ncline{B0}{E0}\ncput{\n}
\ncline{E0}{B0}\ncput{\n}
}
\end{pspicture}
\end{document}
EOF
M:presentation: pre="rjcc" alt="JC Charpentier"
%S{Manuel Luque}
FICHIER:rml.tex:EOF::
%&latex
\documentclass{article}
\usepackage{pstricks,multido}
\pagestyle{empty}
\SpecialCoor
\begin{document}
\begin{pspicture}(-5,-5)(5,5)
\pscircle[fillstyle=solid,fillcolor=lightgray]{5}
\pscircle[fillstyle=solid]{3.5}
\begin{psclip}{\pscircle[linestyle=none,dimen=middle]{3.5}}
\psframe[fillstyle=solid,fillcolor=lightgray](-3.55,-0.75)(3.55,0.75)
\end{psclip}
\psline(-3.5,0)(3.5,0)
\psline(0,0.75)(0,-0.75)
\pscircle[fillstyle=solid]{0.1}
\multido{\i=-10+-10,\I=80+-10}{9}{%
\rput{\I}(4.2;\i){\I}}
\multido{\i=90+-10,\I=0+10}{10}{%
\rput{-\I}(4.2;\i){\I}}
\multido{\i=-100+-10,\I=10+10}{9}{%
\rput{-\I}(4.2;\i){\I}}
\multido{\i=100+10,\I=10+10}{8}{%
\rput{\I}(4.2;\i){\I}}
\multido{\i=1+1}{360}{%
\psline[linewidth=0.3\pslinewidth](4.6;\i)(5;\i)}
\multido{\i=10+10}{36}{\psline(4.3;\i)(5;\i)}
\end{pspicture}
\end{document}
EOF
M:presentation: pre="rml" alt="Manuel Luque"
%S{Dominique Rodriguez}
%SS{Un demi-cercle}
FICHIER:rdr1.tex:EOF::
%&latex
\documentclass{article}
\usepackage{pstricks,multido}
\usepackage[latin1]{inputenc}%
\usepackage[a4paper]{geometry}
% \author{Dominique Rodriguez}
% \title{Rapporteurs}
\pagestyle{empty}
\begin{document}
% \maketitle
% \begin{itemize}
% \item un demi-cercle ;
% \item un cercle ;
% \item un rapporteur équerre (plus facile à découper pour les élèves).
% \end{itemize}
\sffamily
\psset{unit=1.3, dimen=middle}
\SpecialCoor
%%demi-cercle
\begin{pspicture}(-6,-1)(6,6)
\pswedge{5}{0}{180}
\multido{\n=1+1}{179}{\psline[linewidth=.25\pslinewidth](4.8;\n)(5;\n)}
\multido{\n=5+10}{17}{\psline[linewidth=.5\pslinewidth](4.6;\n)(5;\n)}
\multido{\n=10+10}{17}{%
\psline[linewidth=.4pt, linecolor=gray](0;\n)(5;\n)
\rput*{U}(4;\n){\n}}
\end{pspicture}
\end{document}
EOF
M:presentation: pre="rdr1" alt="Dominique Rodriguez (demi-cercle)"
%SS{Un cercle}
FICHIER:rdr2.tex:EOF::
%&latex
\documentclass{article}
\usepackage{pstricks,multido}
\usepackage[latin1]{inputenc}%
\usepackage[a4paper]{geometry}
% \author{Dominique Rodriguez}
% \title{Rapporteurs}
\pagestyle{empty}
\begin{document}
% \maketitle
% \begin{itemize}
% \item un demi-cercle ;
% \item un cercle ;
% \item un rapporteur équerre (plus facile à découper pour les élèves).
% \end{itemize}
\sffamily
\psset{unit=1.3, dimen=middle}
\SpecialCoor
%%cercle
\begin{pspicture}(-6,-1)(6,6)
\pswedge{5}{0}{360}
\multido{\n=1+1}{359}{\psline[linewidth=.25\pslinewidth](4.8;\n)(5;\n)}
\multido{\n=5+10}{35}{\psline[linewidth=.5\pslinewidth](4.6;\n)(5;\n)}
\multido{\n=10+10}{35}{%
\psline[linewidth=.4pt, linecolor=gray](0;\n)(5;\n)
\rput*{U}(4;\n){\n}
}
\end{pspicture}
\end{document}
EOF
M:presentation: pre="rdr2" alt="Dominique Rodriguez (cercle)"
%SS{Un rapporteur équerre}
FICHIER:rdr3.tex:EOF::
%&latex
\documentclass{article}
\usepackage{pstricks,multido}
\usepackage[latin1]{inputenc}%
\usepackage[a4paper]{geometry}
% \author{Dominique Rodriguez}
% \title{Rapporteurs}
\pagestyle{empty}
\begin{document}
% \maketitle
% \begin{itemize}
% \item un demi-cercle ;
% \item un cercle ;
% \item un rapporteur équerre (plus facile à découper pour les élèves).
% \end{itemize}
\sffamily
\psset{unit=1.3, dimen=middle}
\SpecialCoor
%%équerre
\begin{pspicture}(-5.5,-.5)(5.5,5.5)
\pspolygon(5,0)(0,5)(-5,0)
\multido{\n=1+1}{89}{%
\rput[l]{\n}
(!\n\space dup sin exch cos div dup 1 add 5 exch div exch 1
index mul)
{\psline[linewidth=.25\pslinewidth](0,0)(-.2,0)}
\rput[l]{-\n}
(!\n\space dup sin exch cos div dup 1 add 5 exch div neg exch 1
index mul neg)
{\psline[linewidth=.25\pslinewidth](0,0)(.2,0)}}
\multido{\n=5+10}{9}{%
\rput[l]{\n}(!\n\space dup sin exch cos div dup 1 add 5 exch div
exch 1 index mul)
{\psline[linewidth=.5\pslinewidth](0,0)(-.4,0)}
\rput[l]{-\n}(!\n\space dup sin exch cos div dup 1 add 5 exch div
neg exch 1 index mul neg)
{\psline[linewidth=.5\pslinewidth](0,0)(.4,0)}}
\multido{\n=10+10}{8}{%
\psline(0.5;\n)(!\n\space dup sin exch cos div dup 1 add 5 exch
div exch 1 index mul)
\psline(-0.5;-\n)(!\n\space dup sin exch cos div dup 1 add 5 exch
div neg exch 1 index mul neg)}
\psline(0,0)(0,5)
\multido{\n=10+10}{17}{\rput*(3;\n){\n}}
\end{pspicture}
\end{document}
EOF
M:presentation: pre="rdr3" alt="Dominique Rodriguez (rapporteur équerre)"