61c421bf |
1 | #INTERFACE STEP |
2 | puts "============" |
3 | puts "OCC6289" |
4 | puts "============" |
5 | puts "" |
6 | ###################################################### |
7 | # Internal error (code 101) in Section computation |
8 | ###################################################### |
9 | |
10 | catch { pload XDE } |
11 | |
12 | set BugNumber OCC6289 |
13 | |
5d1833ef |
14 | set filepath [locate_data_file OCC6289.stp] |
15 | if { [catch { stepread $filepath a * } catch_result] } { |
61c421bf |
16 | puts "Faulty ${BugNumber} : here is reading problem" |
17 | } else { |
18 | tpcompound comp |
19 | |
20 | plane pl 0 0 28 0 0 1 |
21 | mkface f pl |
22 | |
23 | if { [catch { bsection result comp f } catch_result] } { |
24 | puts "Faulty ${BugNumber}" |
25 | } |
26 | } |
27 | |
28 | set length 453.679 |
29 | set 3dviewer 0 |
30 | |