funmake_no_simp
- Subject: funmake_no_simp
- From: Barton Willis
- Date: Fri, 31 Oct 2008 06:17:38 -0500
A guess:
(defun $funmake_no_simp (f l)
(if ($listp l) `((,(getopr f) simp) ,@(cdr l))
(merror "The second argument to 'funmake_no_simp' must be a list")))
Examples:
(%i2) funmake_no_simp("^",[0,0]);
(%o2) 0^0
(%i3) funmake_no_simp('sin,[a,b,c,d]);
(%o3) sin(a,b,c,d)
(%i4) funmake_no_simp("^",[0,-1]);
(%o4) 1/0
Possible usage:
(%i9) tellsimp(''(funmake_no_simp('log,[0])),'infinity);
(%o9) [logrule1,simpln]
(%i10) log(0);
(%o10) infinity
Barton
-----maxima-bounces at math.utexas.edu wrote: -----
>To:?"Maxima?-?list"?<maxima at math.utexas.edu>
>From:?"Andrej?Vodopivec"?<andrej.vodopivec at gmail.com>
>Sent?by:?maxima-bounces at math.utexas.edu
>Date:?10/29/2008?10:05AM
>Subject:?[Maxima]?funmake_no_simp
>
>There?is?a?feature?request?at?the?wxmaxima?project?for?the?Macsyma
>function?funmake_no_simp.
>
>https://sourceforge.net/tracker2/?func=detail&aid=2121132&group_id=126731&;
>atid=707631
>
>Maybe?someone?who?knows?how?funmake_no_simp?works?and?how?to?implement
>it?can?post?a?comment.
>
>--
>Andrej
>_______________________________________________
>Maxima?mailing?list
>Maxima at math.utexas.edu
>http://www.math.utexas.edu/mailman/listinfo/maxima