0026619: Tolerances of operands are modified using bop
[occt.git] / tests / bugs / modalg_6 / bug26619
1 puts "TODO OCC27014 ALL: Error : result is WRONG because number of .* entities in shape"
2
3 puts "============"
4 puts "OCC26619"
5 puts "============"
6 puts ""
7 #######################################################################
8 # Tolerances of operands are modified using bop
9 #######################################################################
10
11 restore [locate_data_file bug26619_shell_ft81_h0.brep] h0
12 restore [locate_data_file bug26619_the_face.brep] f0
13
14 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTolerance1
15
16 tolerance f0
17
18 #turn on non-destructive mode of BOP
19 #setflags h0 locked
20 #setflags f0 locked
21 bnondestructive 1
22
23 bop h0 f0
24 bopsection result
25
26 set length 145.692
27
28 set nbshapes_expected "
29 Number of shapes in shape
30  VERTEX    : 46
31  EDGE      : 46
32  WIRE      : 0
33  FACE      : 0
34  SHELL     : 0
35  SOLID     : 0
36  COMPSOLID : 0
37  COMPOUND  : 1
38  SHAPE     : 93
39 "
40 checknbshapes result -ref ${nbshapes_expected} -t -m "result"
41
42 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTolerance2
43
44 set expected_MaxTolerance ${MaxTolerance1}
45 set tol_abs_MaxTolerance 0.0001
46 set tol_rel_MaxTolerance 0.0001
47 checkreal "MaxTolerance" ${MaxTolerance2} ${expected_MaxTolerance} ${tol_abs_MaxTolerance} ${tol_rel_MaxTolerance}
48
49 set 2dviewer 1