[occt.git] / tests / bugs / moddata_3 / bug25693_2

puts "============"
puts "OCC25693"
puts "============"
puts ""
###############################
## Wire of BSplines fails bopcheck
###############################

restore [locate_data_file bug25693_path3039.brep] path3039

prism Extrude_path3039 path3039 0 0 50

set log1 [string trim [bopcheck path3039]]
if {$log1 != "This shape seems to be OK."} {
    puts "Error : bad shape"
}

set log2 [string trim [bopcheck Extrude_path3039]]
if {$log2 != "This shape seems to be OK."} {
    puts "Error : Wire of BSplines fails bopcheck"
}

checkview -display path3039 -2d -path ${imagedir}/${test_image}-path3039-2d.png
checkview -display Extrude_path3039 -2d -path ${imagedir}/${test_image}-Extrude_path3039-2d.png
Commit	Line	Data
dfdfa61f	1	puts "============"
	2	puts "OCC25693"
	3	puts "============"
	4	puts ""
	5	###############################
	6	## Wire of BSplines fails bopcheck
	7	###############################
	8
	9	restore [locate_data_file bug25693_path3039.brep] path3039
	10
	11	prism Extrude_path3039 path3039 0 0 50
	12
ad8b073e	13	set log1 [string trim [bopcheck path3039]]
ad8b073e	14	if {$log1 != "This shape seems to be OK."} {
dfdfa61f	15	puts "Error : bad shape"
	16	}
	17
ad8b073e	18	set log2 [string trim [bopcheck Extrude_path3039]]
ad8b073e	19	if {$log2 != "This shape seems to be OK."} {
dfdfa61f	20	puts "Error : Wire of BSplines fails bopcheck"
	21	}
	22
	23	checkview -display path3039 -2d -path ${imagedir}/${test_image}-path3039-2d.png
	24	checkview -display Extrude_path3039 -2d -path ${imagedir}/${test_image}-Extrude_path3039-2d.png