[Maxima-bugs] [ maxima-Bugs-903935 ] mul2* doesn't handle floats/FIX

[SourceForge.net <no...@so...>]

Bugs item #903935, was opened at 2004-02-24 23:03
Message generated for change (Comment added) made by willisbl
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=903935&group_id=4933

Category: None
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Stavros Macrakis (macrakis)
Assigned to: Nobody/Anonymous (nobody)
Summary: mul2* doesn't handle floats/FIX

Initial Comment:
mul2* is the two-argument non-simplifying symbolic 
multiplication function (defined in opers.lisp).

I think it is incorrect that if its args are numbers, it uses 
fixnum multiplication (f*) rather than general 
multiplication (*), though I can't find any cases where it 
matters.

All the other XXX, XXX*, XXX2 and XXX2* operations in 
opers use general Lisp arithmetic, not fixnum.


----------------------------------------------------------------------

>Comment By: Barton Willis (willisbl)
Date: 2004-08-09 19:46

Message:
Logged In: YES 
user_id=895922

This bug has been fixed; see bug 988701 and its 
resolution.  (The Maxima list has a further discussion 
of this bug.) I suggest that bug 903935 be closed.

Barton

----------------------------------------------------------------------

Comment By: Stavros Macrakis (macrakis)
Date: 2004-02-25 14:05

Message:
Logged In: YES 
user_id=588346


(defmfun mul2* (x y)
  (cond
    #+cl ((and (numberp x) (numberp y)) (* x y))
;;;;;;;;;;;;; used to be (f* x y)
    ((=1 x) (simplifya y nil))
	((=1 y) (simplifya x nil))
	(t (simplifya `((mtimes) ,x ,y) nil))))


----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=104933&aid=903935&group_id=4933