Mobdification de Courbe en CourbeDat dans gdd.mp, ajout des variable gddXlabel et...
[mp-gdd.git] / gdd-arc.mp
1 if unknown Pi: input gdd-fct; fi;
2
3 %%% --------------------------------------------------------------------------
4 %%% Arcs de cercles
5 %%% --------------------------------------------------------------------------
6
7 vardef Arc(expr c,r,a,b) =
8   save centre, pas; pair centre; centre = PairImp(c); pas =(b-a)/10;
9   (centre+r*(cos(a),sin(a))) for i=0 upto 10: .. (centre+r*(cos(a+i*pas),sin(a+i*pas))) endfor
10 enddef;
11
12
13 endinput

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.