tests/bugs/modalg_7/bug29322_3

   1 puts "========"
   2 puts "OCC29322"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # Unify faces classification procedures in Boolean Operations
   7 #################################################
   8
   9 line line1 0 0 0 0 0 1
  10 mkedge e1 line1 0 10
  11 line line2 0 0.5 0 0 0 1
  12 mkedge e2 line2 0 10
  13
  14 erase line1 line2
  15
  16 vertex v1 0 0.25 0
  17 settolerance v1 0.25
  18 vertex v2 0 0.25 10
  19 settolerance v2 0.25
  20 vertex v3 0 0.25 5
  21 settolerance v3 0.25
  22
  23 bclearobjects
  24 bcleartools
  25 baddobjects e1 e2 v1 v2 v3
  26 bfillds
  27 bbuild result
  28
  29 checkshape result
  30 checknbshapes result -vertex 3 -edge 2
  31 checkprops result -l 10
  32