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

puts "========"
puts "0030354: BOP Cut doesn't modify the attached face"
puts "========"
puts ""

restore [locate_data_file bug30354_Face_14.brep] b1
restore [locate_data_file bug30354_vol_neg.brep] b2

explode b2 f

bclearobjects
bcleartools
baddobjects b1
baddtools b2
bfillds

bbop r_0 0
bbop r_1 2
bbop r_2 4

for {set i 0} {$i <= 2} {incr i} {
  checkshape r_$i
  if {[regexp "Faulties" [ bopargcheck r_$i ]]} {
    puts "Error: bopargcheck has found some faulties in r_$i"
  }
}

checknbshapes r_0 -face 1 -wire 1 
checkprops r_0 -s 0.000284873

checknbshapes r_1 -face 1 -wire 1
checkprops r_1 -s 0.000284873

checknbshapes r_2 -vertex 2 -edge 1
checkprops r_2 -l 0.00670288

checksection r_2 -r 2

# CUT
copy r_1 result
checkmaxtol result -min_tol 1.0e-4
checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
5fe14d0f	1	puts "========"
	2	puts "0030354: BOP Cut doesn't modify the attached face"
	3	puts "========"
	4	puts ""
	5
	6	restore [locate_data_file bug30354_Face_14.brep] b1
	7	restore [locate_data_file bug30354_vol_neg.brep] b2
	8
	9	explode b2 f
	10
	11	bclearobjects
	12	bcleartools
	13	baddobjects b1
	14	baddtools b2
	15	bfillds
	16
	17	bbop r_0 0
	18	bbop r_1 2
	19	bbop r_2 4
	20
	21	for {set i 0} {$i <= 2} {incr i} {
	22	checkshape r_$i
	23	if {[regexp "Faulties" [ bopargcheck r_$i ]]} {
	24	puts "Error: bopargcheck has found some faulties in r_$i"
	25	}
	26	}
	27
	28	checknbshapes r_0 -face 1 -wire 1
	29	checkprops r_0 -s 0.000284873
	30
	31	checknbshapes r_1 -face 1 -wire 1
	32	checkprops r_1 -s 0.000284873
	33
	34	checknbshapes r_2 -vertex 2 -edge 1
	35	checkprops r_2 -l 0.00670288
	36
	37	checksection r_2 -r 2
	38
	39	# CUT
	40	copy r_1 result
	41	checkmaxtol result -min_tol 1.0e-4
	42	checkview -display result -2d -path ${imagedir}/${test_image}.png
	43