tests/bugs/modalg_4/bug702

   1
   2 puts "======="
   3 puts "OCC702"
   4 puts "SAM1541"
   5 puts "======="
   6 puts ""
   7 ########################
   8 ## No possibility to make a prism.
   9 ########################
  10
  11 restore [locate_data_file OCC702.brep] a
  12
  13 if [ catch { prism result a 100 100 100 } catch_result ] {
  14     puts "Faulty OCC702"
  15 }
  16
  17 checkprops result -s 308957.
  18 checkshape result
  19 checkview -display result -2d -path ${imagedir}/${test_image}.png