0e94a94e |
1 | puts "========================" |
2 | puts "BUC60809" |
3 | puts "========================" |
4 | |
5 | ################################################################ |
6 | ### Reading file teststp.stp produces a sphere without restriction which is not usable in the viewer |
7 | ################################################################ |
8 | |
9 | param read.step.product.mode OFF |
10 | stepread [locate_data_file BUC60809.stp] a * |
11 | |
12 | tpcompound result |
13 | puts [checkshape result] |
14 | puts [checkshape result r] |
15 | |
16 | set 2dviewer 0 |
17 | |
18 | |
19 | |