tests/bugs/step/bug32817_1

   1 puts "================"
   2 puts "0032817: Data Exchange - Step export - writing untrimmed Curve"
   3 puts "================"
   4
   5 pload XDE
   6
   7 catch {Close D}
   8 XNewDoc D
   9 line l1 0 0 0 0 1 0
  10 mkedge e1 l1
  11 XAddShape D e1
  12 WriteStep D $imagedir/${casename}.stp
  13 file delete $imagedir/${casename}.stp