Re: (yet another) dxf translation question
- To: mathgroup at smc.vnet.net
 - Subject: [mg4935] Re: (yet another) dxf translation question
 - From: Harald Berndt <hberndt9 at mail.idt.net>
 - Date: Fri, 4 Oct 1996 00:18:02 -0400
 - Organization: Data Communication and Newtorking Services
 - Sender: owner-wri-mathgroup at wolfram.com
 
Larry Burks wrote:
> 
> I fave searched through everything I could find about writing dxf files
> from Mathmatica. (I'm running 2.2.4 in Windows 95) The closest I could
> find was the snipet below:
> 
>  Needs["Utilities`DXF`"]
> 
>  shape = Plot3D[Sin[x+Sin[y]], {x,-3,3},{y,-3,3}]
> 
>  WriteDXF["knot.dxf", shape]
> 
> Instead, what I get is this message:
> 
>  WriteDXF[knot.dxf, -SurfaceGraphics-]
> 
> What am I missing? Thanks for your help!
> 
A simple thing that I couldn't find in the documentation either: the 
second argument to WriteDXF must be a Graphics3D[] object!!! (Hmmm...)
So, if you just write
   WriteDXF["knot.dxf", Graphics3D[shape]]
everything goes smoothly.
Enjoy!
-- 
______________________________________________________________________
Harald Berndt, Ph.D.                              Research Specialist,
                                                           Consultant                        
Phone:	510-652-5974                                FAX:			510-215-4299
______________________________________________________________________
"I am what I am"..................................  .Popeye the Sailor
(KRYTEN:.............Are you sure? I always thought it was Descartes!)
(LISTER:.So did I, man! It's so easy to get those two dudes mixed up!)
==== [MESSAGE SEPARATOR] ====