diff options
Diffstat (limited to 'graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/polaires/pol07.mp')
-rw-r--r-- | graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/polaires/pol07.mp | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/polaires/pol07.mp b/graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/polaires/pol07.mp new file mode 100644 index 0000000000..35ba629654 --- /dev/null +++ b/graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/polaires/pol07.mp @@ -0,0 +1,29 @@ +input geom2d; + +labeloffset := 6; +gddU:=1.5cm; + +vardef r(expr t) = 4*cos(t/3)*cos(t/3)*cos(t/3) enddef; +vardef rp(expr t) = (r(t)*cos(t),r(t)*sin(t)) enddef; + +def traceDoubleVecteur(expr o,d)= drawdblarrow ((o-d)--(o+d)) gddEnPlace enddef; + + + +beginfig(1); + Repere(8,8,2,4,1,1); + Axes; + Debut; + Graduations; Unites(1); + + drawoptions(withcolor Gainsboro); + + trace CourbeEnPolaires(r,0,3Pi,450) + avecCrayon(1.5,Crimson); + + drawoptions(withcolor LightGoldenrod); + + pointe Point(0,0); + Fin; +endfig; +end |