0028499: Checkshape incorrectly reports BRepCheck_NotClosed when gap is covered by...
[occt.git] / tests / bugs / modalg_7 / bug27711
1 puts "TODO OCC27711 ALL: Error: tolerance"
2 puts "========"
3 puts "OCC27711"
4 puts "========"
5 puts ""
6 #####################################
7 # Blend-on-blend corrupts the shape
8 #####################################
9
10 smallview
11
12 restore [locate_data_file bug27711.brep] s
13
14 clear
15 display s
16 fit
17 xwd $imagedir/${casename}_step_0.png
18
19 explode s e
20 blend result s 0.5 s_12 0.5 s_11
21 set bug_info [string trim [checkshape result]]
22 if {$bug_info != "This shape seems to be valid"} {
23   puts "ERROR: Problem of test case functionality. Should be additionally investigated."
24 }
25 clear
26 display result
27 xwd $imagedir/${casename}_step_1.png
28
29 explode result e
30 # The correct command format should be following:
31 # blend res res 0.5 res_7 0.5 res_11
32 # but it does not work properly on win64 vc 10
33 # so for automated test case following command format was used:
34 blend result result 0.5 result_11
35 set bug_info [string trim [checkshape result]]
36 if {$bug_info != "This shape seems to be valid"} {
37   puts "ERROR: Problem of test case functionality. Should be additionally investigated."
38 }
39 clear
40 display result
41 xwd $imagedir/${casename}_step_2.png
42
43 explode result e
44 blend result result 0.35 result_4 0.25 ressult_15 0.2 result_27
45 set bug_info [string trim [checkshape result]]
46 if {$bug_info != "This shape seems to be valid"} {
47   puts "ERROR: OCC27711 is reproduced. Result of blend operation is WRONG."
48 }
49 checkmaxtol result -min_tol 1.e-3
50 clear
51 display result
52 xwd $imagedir/${casename}_step_3.png