tests/bugs/modalg_2/bug22770_21

   1 puts "================"
   2 puts "OCC22770"
   3 puts "================"
   4 puts ""
   5 #######################################################################################
   6 # Improve comman sewing in DRAW
   7 ######################################################################################
   8
   9 set BugNumber OCC22770
  10
  11 box a 1 1 1
  12 box b 1 0 0 1 2 1
  13 explode a f
  14 explode b f
  15
  16 sewing result a_2 a_3 b_3
  17
  18 checkprops result -s 3
  19 checkshape result
  20
  21 checknbshapes result -vertex 10 -edge 11 -wire 3 -face 3 -shell 1 -solid 0 -compsolid 0 -compound 1 -shape 29
  22 checkmaxtol result -ref 9.9999999999999995e-008
  23 checknbshapes result -shell 1
  24 checkfreebounds result 10
  25 checkview -display result -3d -path ${imagedir}/${test_image}.png