[occt.git] / tests / bugs / modalg_7 / bug29293_2

puts "========"
puts "OCC29293"
puts "========"
puts ""
#################################################
# Boolean Operations algorithm does not preserve the orientations of the faces
#################################################

brestore [locate_data_file bug29293_etchable_face_compound.brep] a
brestore [locate_data_file bug29293_top_shell.brep] b

explode a f
explode b f

shape bsh Sh
add b_25 bsh

bclearobjects
bcleartools
baddobjects a_7
baddtools bsh
bfillds
bbop result 0

checkshape result
checkprops result -s 13460
checknbshapes result -vertex 4 -edge 4 -wire 1 -face 1 -shell 1


smallview
don result
fit

# Check that the normal directions have been preserved.
# Both input faces faces have normals
# directed strictly to the top (0, 0, 1). So, it is necessary to check
# that the reuslting face has the same normal direction.

if {![regexp "(0, 0, 100)" [normals result -length 100 -print]]} {
  puts "Error: the orientation is changed"
}

checkview -screenshot -2d -path ${imagedir}/${test_image}_1.png
Commit	Line	Data
93964cc2	1	puts "========"
	2	puts "OCC29293"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Boolean Operations algorithm does not preserve the orientations of the faces
	7	#################################################
	8
	9	brestore [locate_data_file bug29293_etchable_face_compound.brep] a
	10	brestore [locate_data_file bug29293_top_shell.brep] b
	11
	12	explode a f
	13	explode b f
	14
	15	shape bsh Sh
	16	add b_25 bsh
	17
	18	bclearobjects
	19	bcleartools
	20	baddobjects a_7
	21	baddtools bsh
	22	bfillds
	23	bbop result 0
	24
	25	checkshape result
	26	checkprops result -s 13460
	27	checknbshapes result -vertex 4 -edge 4 -wire 1 -face 1 -shell 1
	28
	29
	30	smallview
	31	don result
	32	fit
	33
	34	# Check that the normal directions have been preserved.
	35	# Both input faces faces have normals
7b5e532f	36	# directed strictly to the top (0, 0, 1). So, it is necessary to check
93964cc2	37	# that the reuslting face has the same normal direction.
	38
	39	if {![regexp "(0, 0, 100)" [normals result -length 100 -print]]} {
	40	puts "Error: the orientation is changed"
	41	}
	42
	43	checkview -screenshot -2d -path ${imagedir}/${test_image}_1.png