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

puts "========"
puts "CR25202"
puts "========"
puts ""
#########################################
## Incorrect value of IsClosed flag in shapes produced by some algorithms
#########################################

box b 100 100 100
explode b sh
trotate b_1 0 0 0 1 0 0 45
removeloc result b_1

set info [whatis result]
if { [regexp {Closed} ${info}] } {
    puts "OK : value of IsClosed flag is correct"
} else {
    puts "Error : value of IsClosed flag is not correct"
}

set 2dviewer 1
Commit	Line	Data
ab860031	1	puts "========"
	2	puts "CR25202"
	3	puts "========"
	4	puts ""
	5	#########################################
	6	## Incorrect value of IsClosed flag in shapes produced by some algorithms
	7	#########################################
	8
	9	box b 100 100 100
	10	explode b sh
	11	trotate b_1 0 0 0 1 0 0 45
	12	removeloc result b_1
	13
	14	set info [whatis result]
	15	if { [regexp {Closed} ${info}] } {
	16	puts "OK : value of IsClosed flag is correct"
	17	} else {
	18	puts "Error : value of IsClosed flag is not correct"
	19	}
	20
	21	set 2dviewer 1