puts "========"
puts "OCC171"
puts "========"
puts ""

stepread [locate_data_file bm2_id_t4-A.stp] a1 *

tpcompound result

set 2dviewer 0