[occt.git] / tests / bugs / vis / bug137_6

puts "================"
puts "OCC137"
puts "================"
#
# The patch "patch-MITUTOYO-USA-05112001.zip" has to be converted to Open Cascade 4.0
#
puts "IT IS NECESSARY TO CHECK SHAPE SHADING"
puts ""

restore [locate_data_file OCC137-ANC101-Solid.brep] a
vinit
vdisplay a
vfit
vsetdispmode 1

set only_screen 1
Commit	Line	Data
61c421bf	1	puts "================"
	2	puts "OCC137"
	3	puts "================"
	4	#
	5	# The patch "patch-MITUTOYO-USA-05112001.zip" has to be converted to Open Cascade 4.0
	6	#
	7	puts "IT IS NECESSARY TO CHECK SHAPE SHADING"
	8	puts ""
	9
	10	restore [locate_data_file OCC137-ANC101-Solid.brep] a
	11	vinit
	12	vdisplay a
	13	vfit
	14	vsetdispmode 1
	15
	16	set only_screen 1