puts "========"
puts "OCC272"
puts "========"

igesbrep [locate_data_file 919-001-T02-04-CP-VL.igs] a *

tpcompound result
checkshape result
checkshape result r

if { [llength [whatis result]] == 3 } {
    puts "Error : There is no result"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png

