tests/bugs/modalg_2/bug526

   1 #INTERFACE IGES
   2 puts "========"
   3 puts "OCC526"
   4 puts "========"
   5 puts ""
   6 ################################################
   7 ## BRepAlgoAPI_Section fails to build planar sections on some faces
   8 ################################################
   9
  10 pload XDE
  11
  12 restore [locate_data_file OCC592.brep] a
  13
  14 set Z 67.599311020481764
  15 plane p 0 0 $Z
  16 psection r1 a p
  17 if ![regexp VERTEX [statshape r1]] {puts [format "OCC526 FAULTY Z=%f" $Z ] }
  18
  19 set Z 66.599311020481764
  20 plane p 0 0 $Z
  21 psection r2 a p
  22 if ![regexp VERTEX [statshape r2]] {puts [format "OCC526 FAULTY Z=%f" $Z ] }
  23
  24 set Z 65.599311020481764
  25 plane p 0 0 $Z
  26 psection result a p
  27 if ![regexp VERTEX [statshape result]] {puts [format "OCC526 FAULTY Z=%f" $Z ] }
  28
  29 set length 27.8021
  30 set 2dviewer 1
  31
  32