[occt.git] / tests / bugs / modalg / bug60703_3


puts "========================"
puts "BUC60703"
puts "========================"

restore [locate_data_file buc60703e.brep] a 
#maxtolerance a
puts [checkshape a]
restore [locate_data_file buc60703d.brep] b
#maxtolerance b
puts [checkshape b]

if [catch {bfuse result a b } catch_result] {
    puts "Faulty  BUC60703: here is problem with FUSE operation"
} else {
    puts "OK OCC348: function FUSE works ok"
    if [catch {checkshape result} catch_result] {
	puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4"
    } else {
	puts "BUC60703   : here is NOT checking problem"
    }
}
set square 371.259
set 2dviewer 0
Commit	Line	Data
0e94a94e	1
	2	puts "========================"
	3	puts "BUC60703"
	4	puts "========================"
	5
	6	restore [locate_data_file buc60703e.brep] a
	7	#maxtolerance a
	8	puts [checkshape a]
	9	restore [locate_data_file buc60703d.brep] b
	10	#maxtolerance b
	11	puts [checkshape b]
	12
	13	if [catch {bfuse result a b } catch_result] {
	14	puts "Faulty BUC60703: here is problem with FUSE operation"
	15	} else {
	16	puts "OK OCC348: function FUSE works ok"
	17	if [catch {checkshape result} catch_result] {
	18	puts "Faulty BUC60703 : here is checking problem. See also OCC438: 919 D3 and D4"
	19	} else {
	20	puts "BUC60703 : here is NOT checking problem"
	21	}
	22	}
	23	set square 371.259
	24	set 2dviewer 0