tests/bugs/modalg_2/bug23341

   1 puts "================"
   2 puts "OCC23341"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # Wrong result done by 2D classifier algorithm for a point and a face
   7 #######################################################################
   8
   9 set BugNumber OCC23341
  10
  11 restore [locate_data_file bug23341_f1] f1
  12 restore [locate_data_file bug23341_p] p
  13 set info [b2dclassify f1 p]
  14 set check [regexp "OUT" $info]
  15
  16 if { ${check} == 1 } {
  17     puts "OK ${BugNumber}"
  18 } else {
  19     puts "Faulty ${BugNumber}"
  20 }
  21
  22