Mathc complexes/a179

Application

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

	c00b.c

/* ------------------------------------ */
/*  Save as :   c00b.c                  */
/* ------------------------------------ */
#include "w_a.h" 
/* ------------------------------------ */
#define  ARRAY  C3
/* ------------------------------------ */
#define   RA  R5
#define   CA  C1
#define   CB  C3
/* ------------------------------------ */
void fun(void)
{
double **A[ARRAY];
double **B = i_mZ(RA,CB);
int c;

  for(c=C0; c<ARRAY; c++)
 
      A[c] = r_mZ(i_mZ(RA,CA),9);           
  
  clrscrn();
  
    add_mZ(A[0],A[1],A[2]);
  
    for(c=A0; c<ARRAY; c++)
  
	  c_c_mZ(A[c],C1,B,c+C1);
	  
  printf(" A solution :\n\n");  
  
  printf("       A[0]    +     A[1]    =     A[2] :");	     
  p_mZ(B,S8,P0,S4,P0,C10);

  for(c=A0; c<ARRAY; c++)
  
       f_mZ(A[c]); 
       
  f_mZ(B);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));

do
{
  fun();

} while(stop_w());

  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */

Additionner deux vecteurs:

Remarque : Les tableaux de matrices commencent par la matrice A0. Les colonnes d'une matrice commencent par la colonne C1. Dans cette exemple la boucle "for" commence avec :

* c_c_mZ(A[ c],C1,  B, c+C1);
* c_c_mZ(A[A0],C1,  B,A0+C1);
* c_c_mZ(A[A0],C1,  B,   C1);

    for(c=A0; c<ARRAY; c++)   
  
	  c_c_mZ(A[c],C1, B,c+C1);

Exemple de sortie écran :

 A solution :

       A[0]    +     A[1]    =     A[1] :
      +3  +7i       -5  +8i       -2 +15i 
      -7  +5i       +1  -1i       -6  +4i 
      -3  -4i       -6  -4i       -9  -8i 
      -2  +5i       -9  -9i      -11  -4i 
      +9  +1i       -6  +9i       +3 +10i 


 Press   return to continue
 Press X return to stop