mainGNU Common Lisp - Support: sr #103228, change algorithm for arithmetic...

 
 

sr #103228: change algorithm for arithmetic operations between t_complex and real or integer

Submitter:  None
Submitted:  Tue 27 Jul 2004 05:18:19 PM UTC
   
 
Category:  None Priority:  5 - Normal
Severity:  1 - Wish Status:  None
Privacy:  Public Assigned to:  None
Originator Email:  -email is unavailable- Open/Closed:  Open
Operating System:  None
* Mandatory Fields

Add a New Comment Rich Markup
   

Tue 27 Jul 2004 05:18:19 PM UTC, original submission:  

The actual code 'complexifies' real or 'integer' numbers instead of directly computing.
Example:

real(x) * complex(y) =>

x = number_to_complex(x);
y = number_to_complex(y);
z11 = number_times(x->cmp.cmp_real, y->cmp.cmp_real);
z12 = number_times(x->cmp.cmp_imag, y->cmp.cmp_imag);
z21 = number_times(x->cmp.cmp_imag, y->cmp.cmp_real);
z22 = number_times(x->cmp.cmp_real, y->cmp.cmp_imag);
z1 =  number_minus(z11, z12);
z2 =  number_plus(z21, z22);
vz = make_complex(z1, z2);
return(z);

Is it possible to use ? =>

z1 = number_times(x, y->cmp.cmp_real);
z2 = number_times(x, y->cmp.cmp_imag);
vz = make_complex(z1, );
return(vz);

Anonymous

 

(Note: upload size limit is set to 16384 kB, after insertion of the required escape characters.)

Attach Files:
   
   
Comment:
   

No files currently attached

 

Depends on the following items: None found

Items that depend on this one: None found

 

CC list is empty

 

There are 0 votes so far. Votes easily highlight which items people would like to see resolved in priority, independently of the priority of the item set by tracker managers.

Only logged-in users can vote.

 

No changes have been made to this item

Back to the top

Powered by Savane 3.13-cf05.
Corresponding source code