80d659a5 |
1 | puts "TODO CR25469 ALL: Error : Colors are not equal in default coordinate and in the near coordinates too" |
2 | |
3 | puts "=========" |
4 | puts "CR25469" |
5 | puts "=========" |
6 | puts "" |
7 | ############################################### |
8 | # BRepMesh corrupts triangulation of another not connected shape |
9 | ############################################### |
10 | |
11 | pload QAcommands |
12 | |
13 | restore [locate_data_file bug25469_bad_tria.brep] a |
14 | tclean a |
15 | incmesh a 0.001 |
16 | triangles a |
17 | isos a 0 |
18 | |
19 | donly a |
20 | top |
21 | fit |
22 | |
23 | vinit |
24 | vsetdispmode 1 |
25 | vdisplay a |
26 | vtop |
27 | vfit |
28 | vmoveto 200 150 |
29 | |
80d659a5 |
30 | checkcolor 64 200 1 0.72549021244049072 0.12941177189350128 |
80d659a5 |
31 | |
32 | if { ${stat} == 1} { |
33 | puts "Error : Bad triangulation" |
34 | } else { |
35 | puts "OK : Good triangulation" |
36 | } |
37 | |
38 | xwd ${imagedir}/${test_image}_1.png |
39 | vdump ${imagedir}/${test_image}_2.png |