Hello,
I have a notebook written by a past student with Mathematica version 5.2 which I am trying to update to run in Mathematica 9. This is what I am having trouble with:
<< Calculus`FourierTransform`
SetDirectory[ToFileName[
Extract["FileName" /. NotebookInformation[EvaluationNotebook[]],
{1}, FrontEnd`FileName
]]];
I believe I can remove "Calculus`FourierTransform`", as that package is now built-in, correct?
I tried replacing ToFileName with FileNameJoin but I still receive the error:
Extract::partd: "Part specification {1} is longer than depth of object.
SetDirectory::fstr: "File specification \!\(FileNameJoin[Extract[\"FileName\", {1}, FrontEnd`FileName]]\) is not a string of one or more characters.
Admittedly, I am a "beginner" at using Mathematica, and I hope these questions are not extremely simple.
Thanks for any help!
