Mathc complexes/Fichiers c : mul c

Un livre de Wikilivres.
Sauter à la navigation Sauter à la recherche


Installer et compiler ce fichier dans votre répertoire de travail.

Crystal Clear mimetype source c.png mul_c.c
'
/* ------------------------------------ */
/*  Save as :   mulc.c                 */
/* ------------------------------------ */
#include "w_a.h"

/* ------------------------------------ */
int main(void)
{
double a[R3*(C3*C2)] ={  1,1,   2,1,   3,1,
                         1,1,   2,1,   3,1,
                         1,1,   2,1,   3,1};
                     
double **A = ca_A_mZ(a,i_mZ(R3,C3));

nb_Z z = i_Z(10,0);

int c = C2;

 clrscrn();
 
 printf(" A : \n");
 p_mZ(A, 5,0, 3,0, C6);

 printf(" multiply column C%d by ",c); 
 p_Z(z, 1,0, 1,0); 
 printf("\n\n\n");
 
 printf(" A : \n");
 p_mZ(mulC_mZ(A,z,c), 5,0, 3,0, C6);

 f_mZ(A);

 stop();

 return 0;
}


La fonction mulC_mZ(); multiplie la colonne c par un complexe z.


Exemple de sortie écran :

 A : 

   +1 +1i    +2 +1i    +3 +1i 
   +1 +1i    +2 +1i    +3 +1i 
   +1 +1i    +2 +1i    +3 +1i 

 multiply column C2 by +10+0i 


 A : 

   +1 +1i   +20+10i    +3 +1i 
   +1 +1i   +20+10i    +3 +1i 
   +1 +1i   +20+10i    +3 +1i 

 Press return to continue.