tests/bugs/modalg_6/bug28490_1

   1 puts "========"
   2 puts "OCC28490"
   3 puts "========"
   4 puts ""
   5 ###########################################################
   6 # Point located outside the solid is classified as inside
   7 ###########################################################
   8
   9 restore [locate_data_file bug28490_solid_vertex1.brep] a
  10 explode a
  11 mkpoint p a_2
  12 set case_output [string trim [bclassify a_1 p]]
  13
  14 if {$case_output != "The point is OUT of shape"} {
  15   puts "ERROR: OCC28490 is reproduced. Point is classified as INNER."
  16 }
  17
  18 smallview
  19 fit
  20
  21 checkview -screenshot -2d -path ${imagedir}/${test_image}.png