puts "========================"
puts "BUC60809"
puts "========================"

################################################################
### Reading file teststp.stp produces a sphere without restriction which is not usable in the viewer 
################################################################

param read.step.product.mode OFF
stepread [locate_data_file BUC60809.stp] a *

tpcompound result
checkshape result
checkshape result r

set 2dviewer 0



