Routine de calcul bas-niveau
eng - fr


cmplxa_c - routine de calcul addtion complexe

Librairie

Paramètres

Description

Add here a paragraph of the function description.

Contenu du fichier


/* cmplxa_c subroutine
 * complex addition computation
 * IRCOM GROUP - Author : A.Layec
 */
 
/* REVISION HISTORY :
 * $Log$
 */
 
#include "mod_num_lib.h"

/* cmplxa_c routine de calcul d'addition-soustraction de vecteurs complexes
 *
 * n           : la taille des vecteurs
 * sig         : signe de l'opération
 * [z1_r;z1_i] : adresses de départ du vecteur complexe 1
 * [z2_r;z2_i] : adresses de départ du vecteur complexe 2
 * [y_r;y_i]   : adresses de départ du vecteur complexe résultat
 *
 * rmq : doit exister en version BLAS(!?)
 */
 
void cmplxa_c(int *n,int *sig,double *z1_r,double *z1_i,double *z2_r,double *z2_i,double *y_r,double *y_i)
{
 /*déclaration des variables*/
 int i;

 /*réalise multiplication complex*/
 for(i=0;i<(*n);i++)
 {
  y_r[i]=z1_r[i]+(*sig)*z2_r[i];
  y_i[i]=z1_i[i]+(*sig)*z2_i[i];
 }

 return;
}

Auteurs

IRCOM Group Alan Layec