set viewname "vright"
set length 1664.48

testreadstep [locate_data_file bug27341_CCS_Adapter_CAD.stp] a
COMPUTE_HLR $viewname $algotype