tests/thrusection/specific/L1

   1 puts "============"
   2 puts "OCC7166"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # Improvement of API of ThruSection
   7 #######################################################################
   8
   9 set BugNumber OCC7166
  10
  11 # spine
  12 polyline s1 0 0 20 0 0 -20
  13
  14 # profile
  15 beziercurve bc1 5 5 5 0 5 -5 0 -5 -5 0 -5 5 0 5 5 0
  16 mkedge e1 bc1
  17 wire s2 e1
  18
  19 # 1 vertex
  20 vertex v1 40 0 -20
  21
  22 mksweep s1
  23
  24 addsweep v1
  25 addsweep s2 -T
  26
  27 buildsweep result
  28
  29
  30 set square 1465.92
  31
  32 set nb_v_good 2
  33 set nb_e_good 3
  34 set nb_w_good 1
  35 set nb_f_good 1
  36 set nb_sh_good 1
  37 set nb_sol_good 0
  38 set nb_compsol_good 0
  39 set nb_compound_good 0
  40 set nb_shape_good 8
  41
  42
  43
  44 set 3dviewer 0
  45