b62b93ac |
1 | puts "TODO OCC23832 ALL: Error : area by triangles differs from the actual area by" |
2 | |
809eca9d |
3 | puts "================" |
4 | puts "OCC22818" |
5 | puts "================" |
6 | puts "" |
7 | ####################################################################################### |
8 | # Wrong triangulation of Revolution surface with slice angle <= 180 degree |
9 | ###################################################################################### |
10 | |
11 | set BugNumber OCC22818 |
12 | |
13 | vertex v1 0 10 0 |
14 | vertex v2 0 10 10 |
15 | vertex v3 0 5 5 |
16 | vertex v4 0 0 -10 |
17 | edge e1 v1 v2 |
18 | edge e2 v2 v3 |
19 | edge e3 v3 v1 |
20 | wire w1 e1 e2 e3 |
21 | plane pln 0 5 5 1 0 0 |
74f764ba |
22 | mkface f1 pln |
23 | add w1 f1 |
809eca9d |
24 | don f1 |
25 | revol result f1 0 10 0 0 0 1 180 |
26 | checkshape result |
27 | |
74f764ba |
28 | set square 186.072 |
809eca9d |
29 | |
30 | set nb_v_good 3 |
31 | set nb_e_good 8 |
32 | set nb_w_good 4 |
33 | set nb_f_good 4 |
34 | set nb_sh_good 1 |
35 | set nb_sol_good 1 |
36 | set nb_compsol_good 0 |
37 | set nb_compound_good 0 |
38 | set nb_shape_good 21 |
39 | |
b62b93ac |
40 | vinit |
41 | vdisplay result |
42 | vsetdispmode 1 |
43 | vfit |
44 | vzfit |
45 | |
46 | # relative tolerance (%) |
47 | set rel_tol 1 |
48 | set area_eps 0 |
b62b93ac |
49 | |
50 | set only_screen 1 |