[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 

bclearobjects
bcleartools
baddobjects b1
baddtools b2
bfillds


# SECTION
bbop rr 4

# CUT 1-2
bbop res1 2

# CUT 2-1
bbop res2 3

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"
}

checknbshapes res1 -wire 6 -face 6 -shell 1 -solid 1 -t
checknbshapes res2 -wire 6 -face 6 -shell 1 -solid 1 -t

smallview
donly rr
fit
donly res1
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
261b7d9e	12	bclearobjects
	13	bcleartools
	14	baddobjects b1
	15	baddtools b2
	16	bfillds
7365fad6	17
261b7d9e	18
	19	# SECTION
	20	bbop rr 4
	21
	22	# CUT 1-2
	23	bbop res1 2
	24
	25	# CUT 2-1
	26	bbop res2 3
7365fad6	27
	28	checkshape res1
	29	checkshape res2
	30
	31	set log1 [bopargcheck res1 #F]
	32	set log2 [bopargcheck res2 #F]
	33
	34	if { [string compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } {
	35	puts "ERROR. res1 is not valid for BOP"
	36	}
	37
	38	if { [string compare -nocase $log2 "Shape(s) seem(s) to be valid for BOP.\n"] } {
	39	puts "ERROR. res2 is not valid for BOP"
	40	}
	41
261b7d9e	42	checknbshapes res1 -wire 6 -face 6 -shell 1 -solid 1 -t
	43	checknbshapes res2 -wire 6 -face 6 -shell 1 -solid 1 -t
	44
7365fad6	45	smallview
261b7d9e	46	donly rr
7365fad6	47	fit
261b7d9e	48	donly res1
7365fad6	49	xwd ${imagedir}/${casename}_1.png
	50	donly res2
	51	fit
	52	xwd ${imagedir}/${casename}_2.png