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
|
puts "========"
puts "OCC548"
puts "OCC628"
puts "========"
puts ""
##################################################################
# Function BRepTool::IsClosed returns Standard_True although argument is open shell
# Incorrect work of BRepCheck
##################################################################
pload XDE
restore [locate_data_file CTO908_topo103-t.brep] a
decho off
checkshape a
checkshape a b
decho on
fixshape result a 0.001
set che [checkshape result c]
if { [regexp {problems} $che] } {
puts "Faulty OCC628"
}
set square 119630
set 2dviewer 2
|
