Exporting the Notebook expression corresponding to a DocumentNotebook

*To*: mathgroup at smc.vnet.net*Subject*: [mg81591] Exporting the Notebook expression corresponding to a DocumentNotebook*From*: David Reiss <dbreiss at gmail.com>*Date*: Fri, 28 Sep 2007 02:18:02 -0400 (EDT)

Hello Men and Women... Here is something that is perhaps a useful thing to include in a future version of Mathematica. Does anyone know how to do this with the current functionality of Mathematica 6? I'd like a function called ToNotebookExpression that takes the results of a DocumentNotebook, for example docnb=DocumentNotebook[{x + y, 1/x + 1/y}]; and returns the Notebook expression corresponding to it. The following does do this, but it has to display the notebook in the front end first: Module[{nb,nbg}, nb=CreateDocument[ docnb]] nbg=NotebookGet[nb]; NotebookClose[nb]; nbg ] One reason for wanting this, is that I'd like to create a DocumentNotebook inside of a program and then use Export to write the Notebook out to a .nb file. (Of course I can create the NotebookExpressoin using lower-level constructs, but I want to take at more Mathematica 6-ish path to this.) If one does Export["file.nb", docnb,"NB"] then the resulting saved notebook has the embedded DocumentNotebook expression, rather than what is generated when acting with CreateDocument[docnb]. Any thoughts, or is this what I need to do for now? Either way, I pass this on to WRI as a suggestion for a ToNotebookExpression-like function. --David http://scientificarts.com/worklife A WorkLife FrameWork E x t e n d i n g MATHEMATICA's Reach...