tests/bugs/moddata_3/bug25407_2

   1 puts "================"
   2 puts "OCC25407"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # Exception in extrema operation.
   7 #######################################################################
   8
   9 restore [locate_data_file bug25407_e2.brep] e
  10 restore [locate_data_file bug25407_f2.brep] f
  11
  12 mkcurve c e
  13 mksurface s f
  14
  15 trim st s -0.168011130695572 0. -16.5 0.
  16 trim ct c 1.1167213545471877e-008 0.033333343614041021
  17
  18 extrema ct st
  19
  20 if { [isdraw ext_1] } {
  21    mkedge result ext_1
  22    set length 1.00005e-07
  23 } else {
  24    puts "Error: invalid result"
  25 }
  26
  27 set 2dviewer 1