Loading files
This file is pinned to the selected release. Download the original to open it in your design tool.
f2929057eThis file is pinned to the selected release. Download the original to open it in your design tool.
puts "============"
puts "0032821: DEWrapper - Implementation of a common toolkit for importing and exporting CAD files"
puts "============"
puts ""
catch { Close D_First }
catch { Close D_Second }
ReadObj D_First ${filename}
XGetOneShape S_First D_First
set file_path ${imagedir}/${casename}.obj
WriteFile D_First $file_path -conf "provider.OBJ.OCC.author: Alexander "
ReadObj D_Second $file_path
XGetOneShape S_Second D_Second
checktrinfo S_Second -ref [trinfo S_First]
file delete $file_path
Close D_First
Close D_Second