tests/bugs/modalg_6/bug26914

   1 puts "========"
   2 puts "OCC26914"
   3 puts "========"
   4 puts ""
   5 #################################
   6 # Hang in surface approximation
   7 #################################
   8
   9 set max_time 2
  10
  11 restore [locate_data_file OCC26914-a_2773_draw.draw] s
  12
  13 dchrono cr reset
  14 dchrono cr start
  15 approxsurf rs s 5e-5 0 0 15 15 100 0
  16
  17 dchrono cr stop
  18
  19 set chrono_info [dchrono cr show]
  20 regexp {CPU user time: ([-0-9.+eE]+) seconds} $chrono_info full CPU_time
  21 if { $CPU_time > ${max_time} } {
  22   puts "Elapsed time of surface approximation is more than ${max_time} seconds - Error"
  23 } else {
  24   puts "Elapsed time of surface approximation is less than ${max_time} seconds - OK"
  25 }