tests/bugs/vis/bug137_6

   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