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

puts "============"
puts "OCC19811"
puts "============"
puts ""
#######################################################################
# Scaling problem. Appendix for NPAL19806 
#######################################################################

set BugNumber OCC19811

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

puts "Scaling operation ..."
if [catch { tscale result 0 0 0 0.5 } catch_result] {
   puts "Faulty ${BugNumber} : Scaling is wrong"
}

checkprops result -s 1.6949e+06 
checkshape result

checknbshapes result -vertex 173 -edge 285 -wire 113 -face 113 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 686
vinit
vdisplay result
vfit

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
3bea4c16	1	puts "============"
	2	puts "OCC19811"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Scaling problem. Appendix for NPAL19806
	7	#######################################################################
	8
	9	set BugNumber OCC19811
	10
	11	puts "Load shape ..."
	12	restore [locate_data_file bug19811_VanneMP_supports_tiges_V3.brep] result
	13
	14	puts "Scaling operation ..."
	15	if [catch { tscale result 0 0 0 0.5 } catch_result] {
	16	puts "Faulty ${BugNumber} : Scaling is wrong"
	17	}
	18
58cf74e0	19	checkprops result -s 1.6949e+06
58cf74e0	20	checkshape result
3bea4c16	21
a4eba920	22	checknbshapes result -vertex 173 -edge 285 -wire 113 -face 113 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 686
3bea4c16	23	vinit
	24	vdisplay result
	25	vfit
	26
5747059b	27	checkview -screenshot -3d -path ${imagedir}/${test_image}.png