1 puts "TODO OCC27711 ALL: ERROR: OCC27711 is reproduced. Result of blend operation is WRONG."
2 puts "TODO OCC27711 ALL: Error: tolerance"
3 puts "TODO OCC27711 ALL: Faulty shapes in variables faulty_1 to faulty_"
8 #####################################
9 # Blend-on-blend corrupts the shape
10 #####################################
14 restore [locate_data_file bug27711.brep] s
19 xwd $imagedir/${casename}_step_0.png
22 blend r1 s 0.5 s_7 0.5 s_12
23 set bug_info [string trim [checkshape r1]]
24 if {$bug_info != "This shape seems to be valid"} {
25 puts "ERROR: Problem of test case functionality. Should be additionally investigated."
29 xwd $imagedir/${casename}_step_1.png
32 blend r1 r1 0.5 r1_1 0.5 r1_8
33 set bug_info [string trim [checkshape r1]]
34 if {$bug_info != "This shape seems to be valid"} {
35 puts "ERROR: Problem of test case functionality. Should be additionally investigated."
39 xwd $imagedir/${casename}_step_2.png
42 blend result r1 0.35 r1_4 0.25 r1_15 0.2 r1_27
43 set bug_info [string trim [checkshape result]]
44 if {$bug_info != "This shape seems to be valid"} {
45 puts "ERROR: OCC27711 is reproduced. Result of blend operation is WRONG."
47 checkmaxtol result -min_tol 1.e-3
50 xwd $imagedir/${casename}_step_3.png