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