0030082: Intersection algorithm returns curve with big tolerance value
[occt.git] / tests / bugs / modalg_7 / bug29293_1
CommitLineData
93964cc2 1puts "========"
2puts "OCC29293"
3puts "========"
4puts ""
5#################################################
6# Boolean Operations algorithm does not preserve the orientations of the faces
7#################################################
8
9brestore [locate_data_file bug29293_etchable_face_compound.brep] a
10brestore [locate_data_file bug29293_top_shell.brep] b
11
12bclearobjects
13bcleartools
14baddcompound a
15baddtools b
16bfillds
17bbop result 0
18
19checkshape result
20checkprops result -s 411200
21checknbshapes result -vertex 588 -edge 588 -wire 147 -face 147 -shell 147
22
23
24# Check that the normal directions have been preserved.
25# All faces from input shapes which could pass into result have normals
26# directed stricly to the top (0, 0, 1). So, it is necessary to check
27# that all faces from the result have the same normal direction.
28
29foreach f [explode result f] {
30 if {![regexp "(0, 0, 1)" [normals $f -length 1 -print]]} {
31 puts "Error: the orientation is changed"
32 }
33}