[occt.git] / tests / bugs / modalg_2 / bug302_2

puts "========================"
puts " OCC302 "
puts "(case 2)"
puts "========================"
puts ""
#################################################################
## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape"
##  but I believe that orientation of this face is correct.
#################################################################

restore [locate_data_file OCC302b.brep] result

set che [checkshape result r]
if { [regexp {OK} $che] != 1} {
    puts "Faulty OCC302 (case 2): command  checkbrep works wrongly"
} else {
    puts "OCC302 OK (case 2) :  command  checkbrep works properly"
}

set square 1.93998
set 2dviewer 0
Commit	Line	Data
0e94a94e	1	puts "========================"
	2	puts " OCC302 "
	3	puts "(case 2)"
	4	puts "========================"
	5	puts ""
	6	#################################################################
	7	## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape"
	8	## but I believe that orientation of this face is correct.
	9	#################################################################
	10
	11	restore [locate_data_file OCC302b.brep] result
	12
	13	set che [checkshape result r]
	14	if { [regexp {OK} $che] != 1} {
	15	puts "Faulty OCC302 (case 2): command checkbrep works wrongly"
	16	} else {
	17	puts "OCC302 OK (case 2) : command checkbrep works properly"
	18	}
	19
	20	set square 1.93998
	21	set 2dviewer 0