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

puts "========"
puts "OCC27472"
puts "========"
puts ""
#######################
# Wrong result of cut
#######################

restore [locate_data_file bug27472_o.brep] o
restore [locate_data_file bug27472_t.brep] t

bcut result o t
checkshape result

set o_Vol [lindex [string trim [vprops o]] 2]
set r_Vol [lindex [string trim [vprops result]] 2]

if {$r_Vol == $o_Vol} {
  puts "ERROR: OCC27472 is reproduced. Result of bcut operation is WRONG."
}

vinit
vdisplay result
vfit

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
cba287d6	1	puts "========"
	2	puts "OCC27472"
	3	puts "========"
	4	puts ""
	5	#######################
	6	# Wrong result of cut
	7	#######################
	8
	9	restore [locate_data_file bug27472_o.brep] o
	10	restore [locate_data_file bug27472_t.brep] t
	11
	12	bcut result o t
	13	checkshape result
	14
	15	set o_Vol [lindex [string trim [vprops o]] 2]
	16	set r_Vol [lindex [string trim [vprops result]] 2]
	17
	18	if {$r_Vol == $o_Vol} {
	19	puts "ERROR: OCC27472 is reproduced. Result of bcut operation is WRONG."
	20	}
	21
	22	vinit
	23	vdisplay result
	24	vfit
	25
	26	checkview -screenshot -3d -path ${imagedir}/${test_image}.png