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

puts "========"
puts "OCC26310"
puts "========"
puts ""
#################################################
# Very slow boolean cut operations on cylinders
#################################################

restore [locate_data_file OCC26310-b1.brep] b1 
restore [locate_data_file OCC26310-b2.brep] b2 

bop b1 b2

bopcut res1
boptuc res2

checkshape res1
checkshape res2

set log1 [bopargcheck res1 #F]
set log2 [bopargcheck res2 #F]

if { [string compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } {
  puts "ERROR. res1 is not valid for BOP"
}

if { [string compare -nocase $log2 "Shape(s) seem(s) to be valid for BOP.\n"] } {
  puts "ERROR. res2 is not valid for BOP"
}

smallview
donly res1
fit
xwd ${imagedir}/${casename}_1.png
donly res2
fit
xwd ${imagedir}/${casename}_2.png
Commit	Line	Data
7365fad6	1	puts "========"
	2	puts "OCC26310"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Very slow boolean cut operations on cylinders
	7	#################################################
	8
	9	restore [locate_data_file OCC26310-b1.brep] b1
	10	restore [locate_data_file OCC26310-b2.brep] b2
	11
	12	bop b1 b2
	13
	14	bopcut res1
	15	boptuc res2
	16
	17	checkshape res1
	18	checkshape res2
	19
	20	set log1 [bopargcheck res1 #F]
	21	set log2 [bopargcheck res2 #F]
	22
	23	if { [string compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } {
	24	puts "ERROR. res1 is not valid for BOP"
	25	}
	26
	27	if { [string compare -nocase $log2 "Shape(s) seem(s) to be valid for BOP.\n"] } {
	28	puts "ERROR. res2 is not valid for BOP"
	29	}
	30
	31	smallview
	32	donly res1
	33	fit
	34	xwd ${imagedir}/${casename}_1.png
	35	donly res2
	36	fit
	37	xwd ${imagedir}/${casename}_2.png