diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/euclide/Exemples/hypocyclo.tex')
| -rw-r--r-- | Master/texmf-dist/source/latex/euclide/Exemples/hypocyclo.tex | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/Master/texmf-dist/source/latex/euclide/Exemples/hypocyclo.tex b/Master/texmf-dist/source/latex/euclide/Exemples/hypocyclo.tex deleted file mode 100644 index 67b13815b24..00000000000 --- a/Master/texmf-dist/source/latex/euclide/Exemples/hypocyclo.tex +++ /dev/null @@ -1,20 +0,0 @@ -\newcommand{\HypoCyclo}[4][100]{% - \def\R{#2}\def\petitR{#3}\def\NbPt{#4}% définitions locales pour lisibilité - %% Selon la valeur de R sur petitR : - %% 4 une astroïde -- 3 une deltoïde -- 2 un diamètre (!) - \def\Anglen{\n\space 360 \NbPt\space 1 add div mul} - \pstGeonode{O}\pstCircleOA[Radius=\pstDistVal{\R}]{O}{} - \pstGeonode[PointName=none](\R;0){P} - \pstHomO[HomCoef=\petitR\space\R\space div, PointSymbol=none]{P}{O}{M} - \multido{\n=1+1}{\NbPt}{% - \pstRotation[RotAngle=\Anglen, PointSymbol=none]{O}{M}{M\n} - \rput(M\n){\pstGeonode[PointSymbol=none](\petitR;0){Q}} - \pstRotation[RotAngle=\Anglen, PointSymbol=none]{M\n}{Q}{N} - \pstRotation[RotAngle=\n\space -360 \NbPt\space 1 add div - mul \R\space\petitR\space div mul, PointName=none]% - {M\n}{N}{N\n} - \ifnum\n=#1 - \pstCircleOA{M\n}{N\n}\ncline{M\n}{N\n}% - \psset{linecolor=red, linewidth=2\pslinewidth} - \pstArcOAB{M\n}{N\n}{N}\pstArcOAB{O}{P}{N} - \fi}}%fin multido-newcommand |