[occt.git] / tests / bugs / moddata_1 / bug22043

puts "============"
puts "OCC22043"
puts "============"
puts ""
#######################################################################
# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug 002019
#######################################################################

set BugNumber OCC22043

puts "Load shape ..."
restore [locate_data_file bug22043_f181.brep] result

decho off
set che [checkshape result]
decho on

if {[regexp {Faulty} $che]} {
     puts "OK ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire"
} else {
     puts "Faulty ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire"
}


set 2dviewer 0
Commit	Line	Data
3bea4c16	1	puts "============"
	2	puts "OCC22043"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug 002019
	7	#######################################################################
	8
	9	set BugNumber OCC22043
	10
	11	puts "Load shape ..."
	12	restore [locate_data_file bug22043_f181.brep] result
	13
	14	decho off
	15	set che [checkshape result]
	16	decho on
	17
	18	if {[regexp {Faulty} $che]} {
	19	puts "OK ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire"
	20	} else {
	21	puts "Faulty ${BugNumber} : The face f181 can not be valid because at least it contain self-intersected wire"
	22	}
	23
	24
	25	set 2dviewer 0