tests/boolean/removefeatures/C1

   1 restore [locate_data_file bug29481_ex1.brep] s
   2 explode s f
   3
   4 # remove all features from the shape
   5
   6 # remove the step first
   7 compound s_6 s_18 step
   8
   9 removefeatures res s step
  10
  11 compound s_4 s_15 s_21 s_22 s_7 s_11 s_8 s_9 s_10 s_14 s_20 s_13 features
  12
  13 # get history of the operation
  14 savehistory rf_hist
  15
  16 # check modification of the features
  17 compound mf
  18 foreach f [explode features f] {
  19   if { [regexp "The shape has not been modified" [modified m rf_hist $f]]} {
  20     add $f mf
  21   } else {
  22     add m mf
  23   }
  24 }
  25
  26 removefeatures result res mf
  27 checkshape result
  28 checkprops result -s 460 -v 200
  29 checknbshapes result -vertex 8 -edge 12 -wire 6 -face 6 -shell 1 -solid 1
  30 CheckIsFeatureRemoved mf {v e f}
  31
  32 checkview -display result -2d -path ${imagedir}/${test_image}.png