tests/bugs/moddata_1/bug22494

   1 puts "================"
   2 puts "OCC22494"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # BRepClass_FaceClassifier bug (ref SALOME issue 21185)
   7 #######################################################################
   8
   9 set BugNumber OCC22494
  10
  11 restore [locate_data_file bug22494_Pb_belogToGeom_FACE.brep] Face
  12
  13 point p -3.53254182396379145e-05 0.000877856930738714065
  14
  15 set res [split [b2dclassify Face p] ]
  16
  17 set ll [llength ${res}]
  18 if {${ll} < 4} {
  19    puts "Bad format of bclassify draw-command; Faulty ${BugNumber}"
  20 } else {
  21    if {[regexp {The point is ON shape} $res]} {
  22       puts "OK ${BugNumber}"
  23    } else {
  24       puts "Faulty ${BugNumber}"
  25    }
  26 }
  27