tests/bugs/modalg_6/bug27315

   1 puts "============"
   2 puts "OCC27315"
   3 puts "============"
   4 puts ""
   5 ###############################
   6 ## UnifySameDomain leaves unmerged edges
   7 ###############################
   8
   9 restore [locate_data_file bug27315_fused.brep] a
  10 unifysamedom result a
  11
  12 checkshape result
  13 checknbshapes result -m "unifysamedom" -edge 141
  14
  15 subshape a e 85
  16 don a_85
  17 smallview; fit
  18 repeat 20 md; repeat 3 pr
  19 don result
  20 explode result v
  21
  22 checkview -screenshot -2d -path ${imagedir}/${test_image}.png