tests/bugs/modalg_5/bug24481_2

   1 puts "================"
   2 puts "OCC24481"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # Test "Perform Infinite Point" provides wrong result for a solid
   7 #######################################################################
   8
   9 set BugNumber OCC24481
  10
  11 restore [locate_data_file bug24481_sdp.brep] b
  12
  13 set res [xclassify b]
  14
  15 if { [regexp "OUT" $res] == 1 } {
  16    puts "OK ${BugNumber}"
  17 } else {
  18    puts "Faulty ${BugNumber}"
  19 }