tests/bugs/vis/bug137_8

   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 pload XDE
  11
  12 stepread [locate_data_file OCC137-ANC101-Solid.stp] a *
  13 tpcompound a
  14 vinit
  15 vdisplay a
  16 vfit
  17 vsetdispmode 1
  18
  19 set only_screen 1