tests/bugs/moddata/bug60825

   1 puts "========================"
   2 puts "BUC60825"
   3 puts "========================"
   4
   5 pload QAcommands
   6
   7 line aLine 0 0 0 0 0 1
   8 mkedge aEdge1 aLine
   9 restore [locate_data_file buc60825.brep] aEdge2
  10 puts [checkshape aEdge2]
  11
  12 distmini d aEdge1 aEdge2
  13 regexp {NB RESULTS +: +([-0-9.+eE]+)} [BUC60825 aEdge1 aEdge2] full ext
  14 if { $ext != 0 } {
  15     puts "Error : The extrema has not been calculated."
  16 }
  17
  18
  19
  20