[occt.git] / tests / bugs / modalg_5 / bug24706

puts "========"
puts "CR24706"
puts "========"
puts ""
#########################################
## Solids produced by BOP do not have flag Closed set in shells
#########################################

box b 10 10 10
psphere s 2
bcut r b s

explode r sh
set info [whatis r_1]
if { [regexp {Closed} ${info}] } {
    puts "OK : Flag CLOSED is set for closed shells created during perform of Boolean Operation"
} else {
    puts "Faulty : Flag CLOSED is not set for closed shells created during perform of Boolean Operation"
}
Commit	Line	Data
df80c6dd	1	puts "========"
	2	puts "CR24706"
	3	puts "========"
	4	puts ""
	5	#########################################
	6	## Solids produced by BOP do not have flag Closed set in shells
	7	#########################################
	8
	9	box b 10 10 10
	10	psphere s 2
	11	bcut r b s
	12
	13	explode r sh
	14	set info [whatis r_1]
	15	if { [regexp {Closed} ${info}] } {
	16	puts "OK : Flag CLOSED is set for closed shells created during perform of Boolean Operation"
	17	} else {
	18	puts "Faulty : Flag CLOSED is not set for closed shells created during perform of Boolean Operation"
	19	}