Modification des pages de gardes de la documentation.
[mp-solid.git] / doc / figures / Torsion.mp
1 input mp-solid
2
3 vardef Transform(expr PT)=%pour la torsion.
4   save $;
5   color $;
6   angz:=subh*(Zpart(PT));
7   $=RotXYZ(PT);
8   $
9 enddef;
10
11 incolor:=0.5[vert,blanc];
12 unit:=0.75;
13
14 figureespace(-3u,-3u,3u,10u);
15 Initialisation(500,50,20,35);
16 outcolor:=blanc;
17 subh:=8;
18 Objetgrille1("am=-2","an=2","bm=-2","bn=2");
19 nb:=2;
20 subh:=20;
21 outcolor:=0.5[rouge,blanc];
22 ObjetPrisme2("axe=(0,0,1)","h=10")((0.5,-0.5,0),(0.5,0.5,0),(-0.5,0.5,0),(-0.5,-0.5,0));
23 nbobj:=2;
24 DessineFusion;
25 finespace;
26
27 figureespace(-3u,-3u,3u,10u);
28 Initialisation(500,50,20,35);
29 outcolor:=blanc;
30 subh:=8;
31 Objetgrille1("am=-2","an=2","bm=-2","bn=2");
32 nb:=2;
33 subh:=20;
34 transformation:=true;
35 outcolor:=0.5[rouge,blanc];
36 ObjetPrisme2("axe=(0,0,1)","h=10")((0.5,-0.5,0),(0.5,0.5,0),(-0.5,0.5,0),(-0.5,-0.5,0));
37 nbobj:=2;
38 DessineFusion;
39 finespace;
40 end

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.