5 #################################
6 # Hang in surface approximation
7 #################################
11 restore [locate_data_file bug23943_s.draw] s
15 approxsurf rs s 5e-5 0 0 15 15 100 0
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"
24 puts "Elapsed time of surface approximation is less than ${max_time} seconds - OK"