[occt.git] / tests / bugs / modalg_6 / bug28266

puts "========"
puts "OCC28266"
puts "========"
puts ""
#################################################
# Boolean CUT produces incorrect result with quasi-planar cone
#################################################

brestore [locate_data_file bug28261_face.brep] f
brestore [locate_data_file bug28266_tool1.brep] t1
brestore [locate_data_file bug28266_tool2.brep] t2

explode f E
mkcurve c f_1
cvalue c 0 x y z dx dy dz
revol rev f $x $y $z $dx $dy $dz 360

bcut r rev t1

checkshape r
checknbshapes r -solid 1 -face 86 -edge 267 -vertex 184
checkprops r -v 17215.5 -s 4033.34

bcut result r t2

checkshape result
checknbshapes result -solid 1 -face 90 -edge 278 -vertex 190
checkprops result -v 17215.5 -s 4033.52
Commit	Line	Data
9f2d9736	1	puts "========"
	2	puts "OCC28266"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Boolean CUT produces incorrect result with quasi-planar cone
	7	#################################################
	8
	9	brestore [locate_data_file bug28261_face.brep] f
	10	brestore [locate_data_file bug28266_tool1.brep] t1
	11	brestore [locate_data_file bug28266_tool2.brep] t2
	12
	13	explode f E
	14	mkcurve c f_1
	15	cvalue c 0 x y z dx dy dz
	16	revol rev f $x $y $z $dx $dy $dz 360
	17
	18	bcut r rev t1
	19
	20	checkshape r
	21	checknbshapes r -solid 1 -face 86 -edge 267 -vertex 184
	22	checkprops r -v 17215.5 -s 4033.34
	23
	24	bcut result r t2
	25
	26	checkshape result
	27	checknbshapes result -solid 1 -face 90 -edge 278 -vertex 190
	28	checkprops result -v 17215.5 -s 4033.52