tests/bugs/modalg_5/bug25828_6

   1 puts "========"
   2 puts "OCC25828"
   3 puts "========"
   4 puts ""
   5 ##########################################
   6 ## BRepAlgoAPI_Section fails for a solid and a face depending on order of arguments
   7 ##########################################
   8
   9 set BugNumber OCC25828
  10
  11 restore [locate_data_file bug25828_intersectionproblem.brep] b
  12
  13 explode b
  14 copy b_1 b1
  15 copy b_2 b2
  16
  17 explode b1 f
  18 copy b1_1 b1
  19 explode b2 f
  20 copy b2_6 b2
  21
  22 mksurface s1 b1
  23 mksurface s2 b2
  24
  25 trim s2 s2 -31.464272161690925 31.464272161690968 -21.228551512037676 26.343858939611884
  26
  27 set log [intersect rr s2 s1 2.0e-7]
  28
  29 set ll [llength ${log}]
  30
  31 if {${ll} == 1} {
  32     puts "${BugNumber} OK"
  33 } else {
  34     puts "Error ${BugNumber}"
  35 }
  36
  37 smallview
  38 donly rr
  39 fit
  40
  41 checkview -screenshot -2d -path ${imagedir}/${test_image}.png