%&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}