tests/bugs/modalg_6/bug21821

   1 puts "=========="
   2 puts "OCC21821"
   3 puts "=========="
   4 puts ""
   5 ############################################################
   6 # Section of face by plane is not built due to small edges
   7 ############################################################
   8
   9 restore [locate_data_file bug21821_plane_tailtop.brep] a
  10
  11 plane p 28.85 0 0 1 0 0
  12 mkface f p -10 10 -10 10
  13 bsection result a f
  14
  15 smallview
  16 clear
  17 display result
  18 display f
  19 display a
  20 fit
  21
  22 checkprops result -l 2.95277
  23 checkshape result
  24 checksection result
  25
  26 checkview -screenshot -2d -path ${imagedir}/${test_image}.png