Rev 3265 | Rev 4351 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3265 | Rev 4158 | ||
---|---|---|---|
Line 1... | Line -... | ||
1 | - | ||
2 | !if $wims_read_parm!=slib_header |
1 | !if $wims_read_parm!=slib_header |
3 | !goto proc |
2 | !goto proc |
4 | !endif |
3 | !endif |
5 | slib_title=Polyedron in flydraw |
- | |
6 | slib_parms=5 |
- | |
7 | ,name of polyedre\ |
- | |
8 | ,phi\ |
- | |
9 | ,theta\ |
- | |
10 | ,size\ |
- | |
11 | ,coordonnates of the center |
- | |
12 | 4 | ||
13 | slib_author=Bernadette PERRIN-RIOU |
5 | slib_author=Bernadette PERRIN-RIOU |
14 | slib_out=code for draw of drawing a polyhedron using the projection given par the spherical/ |
- | |
15 | coordonnates phi and theta |
- | |
16 | slib_comment= |
- | |
17 | slib_require=pari |
6 | slib_require=pari |
18 | 7 | ||
19 | !exit |
8 | !exit |
20 | 9 | ||
21 | :proc |
10 | :proc |
22 | - | ||
23 | 11 | ||
24 | !distribute item $wims_read_parm into slib_polyedre,slib_phi,slib_theta,slib_size,slib_G,slib_option |
12 | !distribute item $wims_read_parm into slib_polyedre,slib_phi,slib_theta,slib_size,slib_G,slib_option |
25 | slib_G=!declosing $slib_G |
13 | slib_G=!declosing $slib_G |
26 | 14 | ||
27 | !if d isin $slib_option |
15 | !if d isin $slib_option |