tests/bugs/modalg_1/bug10435_1

   1 puts "============"
   2 puts "OCC10435"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # error in fillet after Cut of torus from box
   7 #######################################################################
   8
   9 set BugNumber OCC10435
  10
  11 restore [locate_data_file OCC10435.brep] a
  12
  13 checkshape a
  14 explode a e
  15
  16 set radius 5.
  17
  18 if { [catch {fillet result a ${radius} a_10 ${radius} a_15 ${radius} a_16 } catch_result] } {
  19     puts "Faulty ${BugNumber} exception (case 1): Fillet operation fails on given shape "
  20 } else {
  21     puts "${BugNumber} (case 1) OK: Fillet operation was made"
  22
  23     set square 36455.2
  24
  25     # Analysis of "nbshapes res"
  26     set nb_v_good 12
  27     set nb_e_good 19
  28     set nb_w_good 11
  29     set nb_f_good 10
  30     set nb_sh_good 1
  31     set nb_sol_good 1
  32     set nb_compsol_good 0
  33     set nb_compound_good 1
  34     set nb_shape_good 55
  35 }
  36
  37 set 2dviewer 0
  38