tests/bugs/moddata_2/bug303_2

   1 puts "========================"
   2 puts " OCC303 "
   3 puts "(case 2)"
   4 puts "========================"
   5 puts ""
   6 #################################################################
   7 ## Exception while segment operation.
   8 #################################################################
   9
  10 restore [locate_data_file OCC303b.brep] sh1
  11
  12 explode sh1 e
  13
  14 mkcurve c1 sh1_1
  15 trim result c1
  16
  17 if [catch {segment result 23.09944997429109 23.6320483505636} catch_result] {
  18     puts "Faulty OCC303 (case 2): function SEGMENT works wrongly"
  19 } else {
  20     puts "OCC303 OK (case 2): function SEGMENT works properly"
  21 }
  22
  23 checkview -display result -2d -path ${imagedir}/${test_image}.png