[occt.git] / tests / bugs / modalg_1 / buc60830_4

puts "============="
puts "BUC60830"
puts "BUC60829"
puts "============="

restore [locate_data_file BUC60830-face2.brep] f
checkshape f

set che [checkshape f rr]
if { [regexp {OK} $che] != 1 } {
    puts "Faulty : mistakes are found in SOURCE  shape by checkshape command"
    puts "Body of the script was not executed"
} else {
    puts "Checking of SOURCE shape by checkshape - OK"
    mkoffset result f 1 3
    renamevar result_1 result
}

checkprops result -l 81.5088 
checkshape result
checksection result
checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
a87752f3	1	puts "============="
	2	puts "BUC60830"
	3	puts "BUC60829"
	4	puts "============="
	5
	6	restore [locate_data_file BUC60830-face2.brep] f
352ffd73	7	checkshape f
a87752f3	8
	9	set che [checkshape f rr]
	10	if { [regexp {OK} $che] != 1 } {
	11	puts "Faulty : mistakes are found in SOURCE shape by checkshape command"
	12	puts "Body of the script was not executed"
	13	} else {
	14	puts "Checking of SOURCE shape by checkshape - OK"
	15	mkoffset result f 1 3
	16	renamevar result_1 result
	17	}
	18
58cf74e0	19	checkprops result -l 81.5088
	20	checkshape result
	21	checksection result
5747059b	22	checkview -display result -2d -path ${imagedir}/${test_image}.png