tests/bugs/modalg_2/bug2986_2

   1 puts "============"
   2 puts "OCC2986"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result
   7 ######################################################
   8 ## (old topology)
   9 ## (cut)
  10 ## (fuse)
  11 ######################################################
  12
  13 ############# data #############
  14 ptorus p1 10 4
  15 explode p1 f
  16 mksurface gs p1_1
  17 trim trgs gs 1 2 1 2
  18 mkface ff trgs
  19
  20 bcut rcut1 p1_1 ff
  21 checkshape rcut1
  22
  23 bfuse result rcut1 ff
  24
  25 checkprops result -s 1579.81
  26 checkshape result
  27 checkview -display result -3d -path ${imagedir}/${test_image}.png