--- /dev/null
+puts "================"
+puts "0032817: Data Exchange - Step export - writing untrimmed Curve"
+puts "================"
+
+pload XDE
+
+catch {Close D}
+XNewDoc D
+line l1 0 0 0 0 1 0
+mkedge e1 l1
+XAddShape D e1
+WriteStep D $imagedir/${casename}.stp
+file delete $imagedir/${casename}.stp