80d659a5 |
1 | puts "=========" |
2 | puts "CR25469" |
3 | puts "=========" |
4 | puts "" |
5 | ############################################### |
6 | # BRepMesh corrupts triangulation of another not connected shape |
7 | ############################################### |
8 | |
9 | restore [locate_data_file bug25469_common_edge.brep] a |
10 | |
11 | explode a |
12 | explode a_1 |
13 | explode a_2 |
14 | |
15 | ttranslate a_2_1 -100 -220 0 |
16 | |
17 | incmesh a_1_1 0.04 |
18 | set report [tricheck a_1_1] |
19 | if {$report != ""} { |
20 | puts "Error: incorrect meshing of shape 1" |
21 | } |
22 | |
23 | incmesh a_2_1 0.04 |
24 | set report [tricheck a_1_1 a_2_1] |
25 | if {$report != ""} { |
26 | puts "Error: meshing of shape 2 corrupts mesh of shape 1" |
27 | } |
28 | |
29 | vinit |
30 | vsetdispmode 1 |
31 | vdisplay a_1_1 a_2_1 |
32 | vfit |
33 | |
5747059b |
34 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |