puts "=========="
puts "BUC60687"
puts "=========="

igesbrep [locate_data_file buc40130.igs] a xst-transferrable-roots

tpcompound result
checkshape result
checkshape result r

set 2dviewer 0
