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