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

puts "========"
puts "OCC27664"
puts "========"
puts ""
#################################################
# Incomplete intersection curve from the attached shapes
#################################################

restore [locate_data_file bug27664_pl0.brep] pl0
restore [locate_data_file bug27664_nsh_8.brep] nsh_8

bclearobjects
bcleartools

baddobjects pl0
baddtools nsh_8

bfillds

# section
bbop rs 4

if { [string compare -nocase [checksection rs] " nb alone Vertices : 0\n\n"] } {
  puts "ERROR: the section is not closed"
} else {
  puts "The section is OK"
}

# cut
bbop result 2

smallview
donly result
fit

checkview -screenshot -2d -path ${imagedir}/${test_image}.png

checkprops result -s 33.8629
Commit	Line	Data
f7991731	1	puts "========"
	2	puts "OCC27664"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Incomplete intersection curve from the attached shapes
	7	#################################################
	8
	9	restore [locate_data_file bug27664_pl0.brep] pl0
	10	restore [locate_data_file bug27664_nsh_8.brep] nsh_8
	11
	12	bclearobjects
	13	bcleartools
	14
	15	baddobjects pl0
	16	baddtools nsh_8
	17
	18	bfillds
	19
	20	# section
	21	bbop rs 4
	22
	23	if { [string compare -nocase [checksection rs] " nb alone Vertices : 0\n\n"] } {
	24	puts "ERROR: the section is not closed"
	25	} else {
	26	puts "The section is OK"
	27	}
	28
	29	# cut
	30	bbop result 2
	31
	32	smallview
	33	donly result
	34	fit
	35
	36	checkview -screenshot -2d -path ${imagedir}/${test_image}.png
	37
	38	checkprops result -s 33.8629