puts "============" puts "0032821: DEWrapper - Implementation of a common toolkit for importing and exporting CAD files" puts "============" puts "" readfile S_First ${filename} set file_path ${imagedir}/${casename}.stp writefile S_First $file_path readfile S_Second $file_path checknbshapes S_Second -ref [nbshapes S_First] file delete $file_path