Thanks, Andrej, for the advice, which worked like a charm:
--------------------
(%i2) file_search(critpts);
(%o2) c:/work2/critpts.max
(%i3) batch(critpts);
batching #pc:/work2/critpts.max
(%i4) critpts() := (print("program to find critical points "),
f : read("enter f(x,y) "), print(" f = ", f), eqs : [diff(f, x), diff(f,
y)],
unk : [x, y], solve(eqs, unk))
critpts();
program to find critical points
enter f(x,y)
x*y + a/x + a/y ;
... etc.
Ted Woollett
-----------------------
----- Original Message -----
From: "Andrej Vodopivec" <andrej.vodopivec at gmail.com>
To: "Edwin Woollett" <woollett at charter.net>
Cc: "maxima mailing list" <maxima at math.utexas.edu>
Sent: Saturday, July 28, 2007 2:12 AM
Subject: Re: [Maxima] file_search_maxima and work directory
> On 7/27/07, Edwin Woollett <woollett at charter.net> wrote:
>> The contents of my startup file, c:\Documents and Settings\Edwin
>> Woollett\maxima\maxima-init.mac are:
>> ----------------------------
>>
>> maxima_userdir : "c:/work2"$
>> maxima_tempdir : "c:/work1/temp"$
>> file_search_maxima :
>> append(["c:/work2","c:/work1/temp"],file_search_maxima )$
>
> I think you should change the last line to
>
> append(["C:/work2/###.{mac,max}", "C:/work1/temp/###.{mac,max}",
> file_search_maxima)$
>
> HTH,
> --
> Andrej
>