0029528: Visualization, TKOpenGl - allow defining sRGB textures
[occt.git] / tests / bugs / modalg_6 / bug22634
1 puts "============"
2 puts "OCC22634"
3 puts "============"
4 puts ""
5 ######################################################
6 # Cut operation on closed solids returns opened one
7 ######################################################
8
9 restore [ locate_data_file bug22634_shape.brep ] shape
10 restore [ locate_data_file bug22634_tool.brep ] tool
11
12 checkshape shape
13
14 checkshape tool
15
16 bop shape tool
17 bopcut result
18
19 checkprops result -v 5.61524e+007
20
21 checkshape result
22
23 set nbshapes_expected "
24 Number of shapes in result
25  VERTEX    : o
26  EDGE      : 12
27  WIRE      : 6
28  FACE      : 6
29  SHELL     : 1
30  SOLID     : 1
31  COMPSOLID : 0
32  COMPOUND  : 1
33  SHAPE     : 35
34 "
35 checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by Boolean cut operation"
36
37 checkview -display result -2d -path ${imagedir}/${test_image}.png