tests/bugs/modalg_5/bug24037_2

   1 puts "================"
   2 puts "OCC24037"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # Wrong result done by General Fuse algorithm
   7 #######################################################################
   8
   9 restore [locate_data_file bug24037_coude_sain.brep] b1
  10 restore [locate_data_file bug24037_plans_bloc.brep] b2
  11
  12 explode b1 so
  13 copy b1_1 b1
  14 explode b2 f
  15 copy b2_3 b2
  16 don b1 b2
  17 bclearobjects
  18 bcleartools
  19 baddobjects b1
  20 baddtools b2
  21 bfillds
  22 bbuild result
  23
  24 nbshapes result -t
  25 #the number of solids should be 2 instead of 1
  26
  27 set nbsh_t 1
  28 set nb_v_good 16
  29 set nb_e_good 24
  30 set nb_w_good 13
  31 set nb_f_good 12
  32 set nb_sh_good 2
  33 set nb_sol_good 2
  34 set nb_compsol_good 0
  35 set nb_compound_good 1
  36 set nb_shape_good 70
  37
  38 set 3dviewer 1