puts "========"
puts "OCC365"
puts "========"
puts ""

cpulimit 3000

stepread [locate_data_file BUC61004.stp] a *

tpcompound result
checkshape result
checkshape result r

set 2dviewer 0