You can subscribe to this list here.
2014 
_{Jan}

_{Feb}
(232) 
_{Mar}
(323) 
_{Apr}
(383) 
_{May}
(359) 
_{Jun}
(435) 
_{Jul}
(252) 
_{Aug}
(172) 
_{Sep}
(265) 
_{Oct}
(263) 
_{Nov}
(350) 
_{Dec}
(359) 

2015 
_{Jan}
(267) 
_{Feb}
(220) 
_{Mar}
(311) 
_{Apr}
(269) 
_{May}
(388) 
_{Jun}
(403) 
_{Jul}
(172) 
_{Aug}
(399) 
_{Sep}
(364) 
_{Oct}
(269) 
_{Nov}
(357) 
_{Dec}
(468) 
2016 
_{Jan}
(618) 
_{Feb}
(592) 
_{Mar}
(625) 
_{Apr}
(516) 
_{May}
(375) 
_{Jun}
(155) 
_{Jul}
(346) 
_{Aug}
(262) 
_{Sep}
(346) 
_{Oct}
(291) 
_{Nov}
(333) 
_{Dec}
(335) 
2017 
_{Jan}
(436) 
_{Feb}
(376) 
_{Mar}

_{Apr}

_{May}

_{Jun}

_{Jul}

_{Aug}

_{Sep}

_{Oct}

_{Nov}

_{Dec}

S  M  T  W  T  F  S 







1
(7) 
2
(14) 
3
(22) 
4
(14) 
5
(9) 
6
(8) 
7
(18) 
8
(8) 
9
(1) 
10
(4) 
11
(4) 
12
(22) 
13
(10) 
14
(8) 
15
(6) 
16
(6) 
17
(15) 
18
(1) 
19
(13) 
20
(15) 
21
(7) 
22
(12) 
23
(17) 
24
(13) 
25
(10) 
26
(12) 
27
(8) 
28
(9) 
29
(14) 
30
(10) 
31
(6) 





From: Robert Dodier <robert.dodier@gm...>  20140303 00:57:07

On 20140303, Josef Eschgfaeller <esg@...> wrote: > This is much better. But I would like to > include a library, where in the init file > I use > > library: ... ; > for x in ["file","graphics",...] do batch(concat(library,x)); > > And the definitions there still appear in the output. > I could make a large file of all them (Maxima is here > called from Python), or is there another way instead > of the batch commands? Thanks. Well, you could put the initialization stuff into a file and tell Maxima to process it before anything else. Something like: maxima veryquiet initmac=my_init_stuff.mac < my_input.mac Hmm. Having tried that, I see that if my_init_stuff.mac contains functions which output something (e.g. load(draw)) then Maxima will output that stuff  probably you don't want that. To make that go away, you might consider either patching the offending code to make it quieter (e.g. some packages use defsystem to load them, and you can probably tell defsystem to be quiet), or you can load all the packages you want and dump a new Maxima image which you can use in place of the prepackaged one. I can say more about that; it's not difficult. best Robert Dodier 
From: Josef Eschgfaeller <esg@un...>  20140303 00:11:06

Robert Dodier wrote: > maxima veryquiet < myinput.mac > Does that behave as you wish? This is much better. But I would like to include a library, where in the init file I use library: ... ; for x in ["file","graphics",...] do batch(concat(library,x)); And the definitions there still appear in the output. I could make a large file of all them (Maxima is here called from Python), or is there another way instead of the batch commands? Thanks. Josef Eschgfaeller 
From: Robert Dodier <robert.dodier@gm...>  20140302 23:25:12

On 20140302, Josef Eschgfaeller <esg@...> wrote: > Maxima in batch mode (b) rewrites all > commands in the output, even with > veryquiet. Can one deactivate this? Try: maxima veryquiet < myinput.mac Does that behave as you wish? best, Robert Dodier 
From: Robert Dodier <robert.dodier@gm...>  20140302 23:16:56

On 20140302, Thomas D. Dean <tomdean@...> wrote: > (%i5) desolve([%o1,%o2],[f(x),g(x)]); > d d > (%o5) desolve([ (f(x)) =  (g(x)) + sin(x), > dx dx I can't reproduce this behavior. I get: (%i5) desolve([%o1,%o2],[f(x),g(x)]); x x (%o5) [f(x) = a %e  a + 1, g(x) = cos(x) + a %e  a + g(0)  1] The solution contains the unspecified g(0), which we make make disappear with a suitable atvalue, but nonetheless desolve does yield a solution without it. I have tried this with current (5.32+) sources on 32bit Linux with GCL and with Clisp. I see that you are working on 64bit Linux with GCL. I wonder if it would work for you with either 32bit Linux or something other than GCL. best Robert Dodier 
From: Josef Eschgfaeller <esg@un...>  20140302 22:01:32

Maxima in batch mode (b) rewrites all commands in the output, even with veryquiet. Can one deactivate this? Josef Eschgfaeller 
From: Jan Hendrik Mueller <jan.mueller@ma...>  20140302 21:47:45

dear list, how can I connect a draw output of maxima to gnuplot (using x11) when my new gnuplot version (4.6) is installed via macports? I am using OSX10.9. Any help is welcome!! Jan 
From: Thomas D. Dean <tomdean@wa...>  20140302 21:21:59

maxima 5.32.1 kill(all); ode:'diff(g(x),x,4); atvalue(g(x),x=1,2); atvalue(g(x),x=1,1); atvalue('diff(g(x),x),x=1,0); atvalue('diff(g(x),x),x=1,0); soln:desolve([ode],[g(x)]); ev(ode,soln,diff); maple_soln:g(x) = (3/4)*x^3 + (1/2)  (9/4)*x; ev(ode,maple_soln,diff); soln contains ('at('diff(g(x),x,3),x = 0))/6, etc. g(x) = x^3*('at('diff(g(x),x,3),x = 0))/6 +x^2*('at('diff(g(x),x,2),x = 0))/2 +x*('at('diff(g(x),x,1),x = 0)) +g(0) What am I doing wrong? How do I resolve these? Tom Dean 
From: Barton Willis <willisb@un...>  20140302 18:59:18

>By "convert", I assume you mean "check that all the elements of the list are true". > An easy way is: xreduce("and", list) I might suggest using "every" instead of xreducethis insulates the user from the option variable prederror; for example: (%i44) xreduce("and", [spurious, true, bogus, fake]),prederror : true; Unable to evaluate predicate spurious (%i46) xreduce("and", [spurious, true, bogus, fake]),prederror : false; (%o46) spurious and bogus and fake (%i48) every(lambda([x], x=true), [spurious, true, bogus,fake]),prederror : true; (%o48) false 
From: Thomas D. Dean <tomdean@wa...>  20140302 18:43:59

I have attached a patch. How does this get into the docs? Tom Dean 
From: Thomas D. Dean <tomdean@wa...>  20140302 18:35:42

On 03/02/14 05:14, Aleksas Domarkas wrote: > (%i1) ode1:'diff(f(x),x)='diff(g(x),x)+sin(x)$ > ode2:'diff(g(x),x,2)='diff(f(x),x)cos(x)$ > (%i3) atvalue(f(x),x=0,1)$ > atvalue(g(x),x=0,1)$ > atvalue('diff(g(x),x),x=0,a)$ > My point is the example is incomplete, it needs a third initial condition, atvalue(g(x),x=0,b), etc.. How does this get back into the docs? Tom Dean (%i1) ode1:'diff(f(x),x)='diff(g(x),x)+sin(x); d d (%o1)  (f(x)) =  (g(x)) + sin(x) dx dx (%i2) ode2:'diff(g(x),x,2)='diff(f(x),x)cos(x); 2 d d (%o2)  (g(x)) =  (f(x))  cos(x) 2 dx dx (%i3) atvalue('diff(g(x),x),x=0,a); (%o3) a (%i4) atvalue(f(x),x=0,1); (%o4) 1 (%i5) atvalue(g(x),x=0,b); (%o5) b (%i6) soln:desolve([ode1,ode2],[f(x),g(x)]); x x (%o6) [f(x) = a %e  a + 1, g(x) = cos(x) + a %e + b  a  1] (%i7) check:ev([ode1,ode2],soln,diff); x x x x (%o7) [a %e = a %e , a %e  cos(x) = a %e  cos(x)] (%i8) apply("and",check); (%o8) true 
From: Stavros Macrakis <macrakis@al...>  20140302 18:26:53

By "convert", I assume you mean "check that all the elements of the list are true". An easy way is: xreduce("and", list) s On Sun, Mar 2, 2014 at 2:50 AM, Thomas D. Dean <tomdean@...>wrote: > kill(all); > ode1:'diff(f(x),x)='diff(g(x),x)+sin(x); > ode2:'diff(g(x),x,2)='diff(f(x),x)cos(x); > atvalue('diff(g(x),x),x=0,a); > atvalue(f(x),x=0,1); > atvalue(g(x),x=0,1); > soln:desolve([ode1,ode2],[f(x),g(x)]); > ev([ode1,ode2],soln,diff); > /* using the results from maple */ > soln:[f(x) = exp(x), g(x) = cos(x) + exp(x)  1]; > check:ev([ode1,ode2],soln,diff); > x:map(is,check); > > This has to be simple, but, > > x is [true, true]. How do I convert this to true, without using x[1]=x[2] > ? > > Tom Dean > > >  > Flowbased realtime traffic analytics software. Cisco certified tool. > Monitor traffic, SLAs, QoS, Medianet, WAAS etc. with NetFlow Analyzer > Customize your own dashboards, set traffic alerts and generate reports. > Network behavioral analysis & security monitoring. Allinone tool. > > http://pubads.g.doubleclick.net/gampad/clk?id=126839071&iu=/4140/ostg.clktrk > _______________________________________________ > Maximadiscuss mailing list > Maximadiscuss@... > https://lists.sourceforge.net/lists/listinfo/maximadiscuss > 
From: Aleksas Domarkas <aleksasd873@gm...>  20140302 13:14:16

(%i1) ode1:'diff(f(x),x)='diff(g(x),x)+sin(x)$ ode2:'diff(g(x),x,2)='diff(f(x),x)cos(x)$ (%i3) atvalue(f(x),x=0,1)$ atvalue(g(x),x=0,1)$ atvalue('diff(g(x),x),x=0,a)$ Solutions: (%i6) soln:desolve([ode1,ode2],[f(x),g(x)]); (%o6) [f(x)=a*%e^xa+1,g(x)=cos(x)+a*%e^xa] Cheking solutions: (%i7) check:ev([ode1,ode2],soln,diff); apply("and", %); (%o7) [a*%e^x=a*%e^x,a*%e^xcos(x)=a*%e^xcos(x)] (%o8) true 2 method (%i9) subst(ode1,ode2); (%o9) 'diff(g(x),x,2)='diff(g(x),x,1)+sin(x)cos(x) (%i10) ode2(%,g(x),x); (%o10) g(x)=cos(x)+%k1*%e^x+%k2 (%i11) sol_g:ic2(%, x=0, g(x)=1, diff(g(x),x)=a); (%o11) g(x)=cos(x)+a*%e^xa (%i12) subst(sol_g,ode1); (%o12) 'diff(f(x),x,1)='diff((cos(x)+a*%e^xa),x,1)+sin(x) (%i13) ev(%, nouns); (%o13) 'diff(f(x),x,1)=a*%e^x (%i14) ode2(%,f(x),x); (%o14) f(x)=a*%e^x+%c (%i15) sol_f:ic1(%, x=0, f(x)=1); (%o15) f(x)=a*%e^xa+1 (%i16) soln:[sol_f,sol_g]; (%o16) [f(x)=a*%e^xa+1,g(x)=cos(x)+a*%e^xa] best Aleksas D 
From: Erich Neuwirth <erich.neuwirth@un...>  20140302 11:55:25

Are there any chances of getting an OSX binary for the latest version any time soon now? 
From: Thomas D. Dean <tomdean@wa...>  20140302 07:50:39

kill(all); ode1:'diff(f(x),x)='diff(g(x),x)+sin(x); ode2:'diff(g(x),x,2)='diff(f(x),x)cos(x); atvalue('diff(g(x),x),x=0,a); atvalue(f(x),x=0,1); atvalue(g(x),x=0,1); soln:desolve([ode1,ode2],[f(x),g(x)]); ev([ode1,ode2],soln,diff); /* using the results from maple */ soln:[f(x) = exp(x), g(x) = cos(x) + exp(x)  1]; check:ev([ode1,ode2],soln,diff); x:map(is,check); This has to be simple, but, x is [true, true]. How do I convert this to true, without using x[1]=x[2] ? Tom Dean 
From: Thomas D. Dean <tomdean@wa...>  20140302 06:58:56

(%i1) build_info(); (%o1) Maxima version: "5.32.1" Maxima build date: "20140131 19:45:26" Host type: "x86_64unknownlinuxgnu" Lisp implementation type: "GNU Common Lisp (GCL)" Lisp implementation version: "GCL 2.6.10" (%i2) kill(all); (%o0) done (%i1) 'diff(f(x),x)='diff(g(x),x)+sin(x); d d (%o1)  (f(x)) =  (g(x)) + sin(x) dx dx (%i2) 'diff(g(x),x,2)='diff(f(x),x)cos(x); 2 d d (%o2)  (g(x)) =  (f(x))  cos(x) 2 dx dx (%i3) atvalue('diff(g(x),x),x=0,a); (%o3) a (%i4) atvalue(f(x),x=0,1); (%o4) 1 (%i5) desolve([%o1,%o2],[f(x),g(x)]); d d (%o5) desolve([ (f(x)) =  (g(x)) + sin(x), dx dx The example is from ??desolve. It does not produce the results indicated in ??desolve Also, I believe the line (%i6) [%o1,%o2],%o5,diff; should be (%i6) ev([%o1,%o2],%o5,diff); From maple 15, I get the solution: { f(x) = exp(x) a  a + 1, g(x) = cos(x) + exp(x) a + _C3 } If _C3 = g(0)a1, this agrees with maxima ??desolve The maple code is: > ode1:=Diff(f(x),x)=sin(x)+Diff(g(x),x); > ode2:=Diff(g(x),x,x)=Diff(f(x),x)cos(x); > ics:=D(g)(0)=a,f(0)=1; > dsolve({ode1,ode2,ics}); Am I doing something wrong? Tom Dean 
From: dan <djones_cas@ou...>  20140302 04:27:46

Leo Butler <l_butler <at> users.sourceforge.net> writes: > I am not sure why you don't use the info files supplied with Maxima to > do this, since describe is just emitting fragments of those info > files. > > Anyhow, if you want to use Maxima to supply input to your Java > program, you could consider using customized delimiters. E.g. > > (%i1) my_describe(f) := block([os:make_string_output_stream()], > with_stdout(os,apply('describe,[f])), > printf(true,"^L~%~a~%^L~%",get_output_stream_string(os)))$ > > (%i2) my_describe(sin); > ^L > >  Function: sin (<x>) > >  Sine. > > There are also some inexact matches for `sin'. > Try `?? sin' to see them. > > ^L Thank you for the suggestion. I will try your 'my_describe' approach. What got me into this 'rabbithole' is the inconsistency between different versions of maxima (OS X) I have observed. I consider such inconsistency bugs and would still like to see it gets fixed. I can not do it myself since I have very limited programming ability (I only know that (car '(A B C)) will return A :) 
From: Mario Rodriguez <biomates@te...>  20140301 16:47:03

El 01/03/14 11:09, Jan Hendrik Mueller escribió: > My Maxima Version ist 5.28.0. I am using it on a MacBook with OSX10.9.1. with Gnuplot (4.2) via X11 (2.7.5). Maybe I should update Gnuplot… Sure, this is a very old version. Many features were introduced later. > You will find the two files attached… With them I get a very nice zaxis ranging from 0 to 10, without the segment on the negative part. > Gracias por tu ayuda! Bitte, ich habe gern geholfen :) Herzliche Grüsse!  Mario 
From: Leo Butler <l_butler@us...>  20140301 15:17:10

> > On 20140228, Dan <djones_cas <at> outlook.com> wrote: > > > > > The output is obtained from > > > > > > maxima veryquiet<maxt.mac >xxx > > > > > The goal here is to get the output of 'describe' to > > > build a corpus of maxima document. I am not sure why you don't use the info files supplied with Maxima to do this, since describe is just emitting fragments of those info files. Anyhow, if you want to use Maxima to supply input to your Java program, you could consider using customized delimiters. E.g. (%i1) my_describe(f) := block([os:make_string_output_stream()], with_stdout(os,apply('describe,[f])), printf(true,"^L~%~a~%^L~%",get_output_stream_string(os)))$ (%i2) my_describe(sin); ^L  Function: sin (<x>)  Sine. There are also some inexact matches for `sin'. Try `?? sin' to see them. ^L Of course, the delimiters may just be the needed number of EOLs to get your screenscraper working again. Btw, I was playing around writing a Lisp info reader in December, and I noticed that the info files produced by makeinfo version 4.x and 5.x differ in subtle ways, including the number and location of EOLs inf different parts of the info document. I wonder if you are not witnessing the effects of this. Leo 
From: 本田康晃 <yasuaki.honda@gm...>  20140301 12:55:05

diff git a/interfaces/emacs/imaxima/imaxima.lisp b/interfaces/emacs/imaxima/imaxima.lisp index e037aed..083fb19 100644  a/interfaces/emacs/imaxima/imaxima.lisp +++ b/interfaces/emacs/imaxima/imaxima.lisp @@ 198,7 +198,6 @@ nor Gnuplot is not recognized by maxima")))) (setq str (unquote%internal str #\%)) (setq str (unquote%internal str #\&)) (setq str (unquote%internal str #\_))  (setq str (unquote%internal str #\#)) str) (defun texstring (x) diff git a/src/mactex.lisp b/src/mactex.lisp index 5daf575..df05826 100644  a/src/mactex.lisp +++ b/src/mactex.lisp @@ 114,17 +114,14 @@ ) (t (apply 'tex1 args))))) (defun quotechars (sym chstr) +(defun quote% (sym) (let* ((strsym (string sym))  (pos (positionif #'(lambda (c) (find c chstr)) strsym))) + (pos (positionif #'(lambda (c) (find c "$%&_")) strsym))) (if pos (concatenate 'string (subseq strsym 0 pos) "\\" (subseq strsym pos (1+ pos))  (quotechars (subseq strsym (1+ pos)) chstr)) + (quote% (subseq strsym (1+ pos)))) strsym))) (defun quote% (sym)  (quotechars sym "$%&_"))  (defun tex1 (mexplabel &optional filenameorstream) ;; mexplabel, and optional filename or stream (prog (mexp texport x y itsalabel needtoclosetexport) (resetccol) @@ 254,12 +251,8 @@ (texstring (quote% (if $stringdisp (concatenate 'string "``" x "''") x)))) ((characterp x) (texchar x)) ((not ($mapatom x))  (let ((x (if (member (marraytype x) '(array hashtable $functional))  ($sconcat x)  (format nil "~A" x))))  (texstring (quotechars (if $stringdisp (concatenate 'string "``" x "''") x)  "#$%&_"))))  + (let ((x ($sconcat x))) + (texstring (quote% (if $stringdisp (concatenate 'string "``" x "''") x))))) (t (texstripdollar (or (get x 'reversealias) x))))) r)) diff git a/tests/rtest_tex.mac b/tests/rtest_tex.mac index 6901ac5..d39b5a0 100644  a/tests/rtest_tex.mac +++ b/tests/rtest_tex.mac @@ 47,10 +47,6 @@ with_stdout ("tmprtest1.tex", * tex (?\*lisp\symbol\2\*), */  tex_text ("\\subsection*{Lisp pointers}"),  tex(make_array(fixnum,5)),  tex(gf_set_data(3,x^4+x+1)),  tex_text ("\\subsection*{Strings}"), tex ("riff"), tex ("Riff Raff"), 
From: 本田康晃 <yasuaki.honda@gm...>  20140301 12:52:59

Dear Maxima List, I have added two simple tests to rtest_tex.mac: tex(make_array(fixnum,5)); and tex(gf_set_data(2,x^3+1)); and found that these two tests did not pass. This was due to my mistake on the treatment of character quoting for tex output. I fixed the issue and resulted the attached patch file. The issue was that character #\# needs to be quoted when used as an output of tex(). However, the function quote% does not quote the char. In addition, the simple fix of making quote% quotes #\# introduces an incompatibility with the existing maxima programs that uses tex() function. My fix in this patch avoids such incompatibility passes all the regression tests and rtest_tex.mac test. I welcome any comments on this patch. Thanks and best regards, Yasuaki Honda, Chiba, Japan 20140220 0:46 GMT+09:00 本田康晃 <yasuaki.honda@...>: > Dear list, > > As I have not seen any additional comments, I have git push the changes to > the master branch of the git source tree. I will separately add some test > cases in rtest_tex.mac within couple of days. > > Thanks and best regards, > Yasuaki Honda, Chiba, Japan > > 20140216 16:00 GMT+09:00 本田康晃 <yasuaki.honda@...>: > > Dear Robert san, John san, >> >> I recently encountered a similar issue as originally pointed out by John >> san. Before doing a fix, I searched and found this thread. >> >> My issue is a maxima error on performing gf_set_data(2,x^4+x+1). This >> command returns a lisp defstruct object and causes the same error as >> make_array(fixnum, 2) in imaxima or Maxima on Android. This error can be >> reproducible on standard maxima with calling tex(gf_set_data(...)). >> >> I saw the latest source tree of maxima, but the patch proposed by John >> san has not been applied. Also examining the proposed patch, I found the >> use of verbquote wrong. It is designed to be used in combination with >> texstring defined in imaxima.lisp. >> >> All considered, I have created a new patch. Basic policy is the same as >> John san. For texatom() defined in mactex.lisp, If texatom(x) is given a >> lisp object x, ($sconcat x) is performed to convert x to a string. Then I >> give the string to texstring() for further processing if any. >> >> I also modified imaxima.lisp since there is no more need to redefine >> texatom in imaxima.lisp. Things get much simpler and easier to maintain in >> imaxima.lisp. >> >> If none oppose, I will apply the attached patch to the git source tree. >> Also, I will add some test cases for tex() function giving lisp objects. >> >> I welcome any comments, as usual. >> >> Thanks and best regards, >> Yasuaki Honda, Chiba, Japan >> >> >> 20130925 1:04 GMT+09:00 John Lapeyre <lapeyre.math122a@...>: >> >> Hi, >>> >>> Here is a patch for tex(). It modifies src/mactex.lisp. >>> I tested it by starting maxima 5.31.0, loading the modified >>> source file, then running the entire testsuite. This is >>> with sbcl/linux. >>> >>> There is a lot of room for improvement, but this is >>> a good stopgap. >>> >>> I could not really see where to put an rtest. But this is >>> what it does. >>> >>> (%i2) tex(make_array('fixnum,2)); >>> $$"{Lisp Array: #(0 0)}"$$ >>> >>> instead of >>> >>> (%i1) tex(make_array('fixnum,2)); >>> >>> $$ >>> Maxima encountered a Lisp error: >>> >>> The value #(0 0) is not of type SYMBOL. >>> >>> Automatically continuing. >>> To enable the Lisp debugger set *debuggerhook* to nil. >>> >>> HTH, >>> John >>> >>> >>> On 09/22/2013 09:05 PM, Robert Dodier wrote: >>> > On 20130922, John Lapeyre <lapeyre.math122a@...><lapeyre.math122a@...>wrote: >>> > >>> >> (%i1) tex(make_array(fixnum,2)); >>> >> $$ >>> >> Maxima encountered a Lisp error: >>> >> >>> >> The value #(0 0) is not of type SYMBOL. >>> > >>> > OK, well, that's a bug. We can certainly do better. >>> > >>> >> One solution is to change texatom in src/mactex.lisp >>> >> and add a function from imaxima.lisp (which may have been >>> >> borrowed from somewhere else.): >>> > >>> > Can you present the proposed solution as a diff with respect to the >>> > version which was used to build whatever binary you are executing? >>> > It will help others understand exactly what is being changed. >>> > >>> > If you are working with Git, then git diff shows the change. If you are >>> > modifying some source code and reloading it or something like that, >>> then >>> > keep the original in some file and use commandline diff as: >>> > >>> > diff u foo.lisp foo.lisporiginal >>> > >>> > or whatever. 'diff' is usually present in Unixlike systems. If you are >>> > working on MS Windows, you can get 'diff' as part of Cygwin or MinGW. >>> > Nota bene: My experience with Cygwin has been pretty painful as it >>> tries >>> > to redefine a bunch of stuff to make your Windows environment >>> Unixlike, >>> > which inevitably fails, leading to a randomly messed up environment. >>> > I don't really have a recommendation, except to switch to something >>> other >>> > than Windows if you can. As ever, YMMV. >>> > >>> > best >>> > >>> > Robert Dodier >>> > >>> > _______________________________________________ >>> > Maxima mailing list >>> > Maxima@... >>> > http://www.math.utexas.edu/mailman/listinfo/maxima >>> >>> >>> >>> _______________________________________________ >>> Maxima mailing list >>> Maxima@... >>> http://www.math.utexas.edu/mailman/listinfo/maxima >>> >>> >> > 
From: Barton Willis <willisb@un...>  20140301 12:40:54

>> Substituting a lambda form for a function has been called my favorite trick. It is. >Thank you very much! I will try to understand this trick. Maybe I shouldn't call it a tricksubstitution of one function for another is a fairly natural operation. Often it is convenient for the substituted function to be a lambda form (anonymous function), but it doesn't have to be. If the substituted function isn't a lambda form, it might be necessary to call ev on the result: (%i36) f(x,y) := max(x,y)$ (%i37) subst(g = f, g(2,4)); (%o37) f(2,4) (%i38) ev(%); (%o38) 4 When substituting a lambda form for a function, the lambda form is automatically evaluated. This is inconsistentmaybe soon this behavior will be changed. To substitute for +, *, ^, ^^, enclose the operator in double quotes; for example to convert from noncommutative multiplication to commutative multiplication, use (%i49) subst("." = "*",a.b.a); (%o49) a^2*b Internally, ab is a + (1 * b), so substitution for "" might not work as expected: (%i54) subst("" = f,ab); (%o54) ab (%i55) subst("+" = f,ab); (%o55) f(a,b) One thing that consistently trips me up is substitution for noun form. Substitution for integrate doesn't seem to work (%i67) subst('integrate = lambda([e,x,a,b], quad_qag(e,x,a,b,6)), integrate(x^x,x,0,1)); (%o67) integrate(x^x,x,0,1) But substitution for the noun form of integrate does (%i68) subst(nounify('integrate) = lambda([e,x,a,b], quad_qag(e,x,a,b,6)), integrate(x^x,x,0,1)); (%o68) [0.78343051069213,2.1976896391359236*10^9,549,0] Barton 
From: Jan Hendrik Mueller <jan.mueller@ma...>  20140301 10:09:37

My Maxima Version ist 5.28.0. I am using it on a MacBook with OSX10.9.1. with Gnuplot (4.2) via X11 (2.7.5). Maybe I should update Gnuplot… You will find the two files attached… Gracias por tu ayuda! 
From: Saleh <sabmab@ms...>  20140301 08:35:15

Robert Dodier <robert.dodier <at> gmail.com> writes: > Hmm. I tried Maxima 5.31.3 + TeXmacs 1.0.7.20 on Linux and it works OK. > There was a patch to MYPRINC but it appeared in 5.31.1 so you should > have it. I don't know how to find out more about the error (presumably > the business about INTERNALPROGRAMERROR is triggered by something > else). > > Sorry I can't be more helpful, > > Robert Dodier > Hello I go back i releases I found the last version that works is 5.28.0 on windows. I hope those information help you to fin the error. regards 