Mathc complexes/Fichiers c : c01d

Un livre de Wikilivres.

Application

Installer et compiler ces fichiers dans votre répertoire de travail.

c00c.c
/* ------------------------------------ */
/*  Save as :  c00c.c                   */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
void AplsB(int r,int c)
{
double **A[C3];

     A[C0] = i_mZ(r,c);
     A[C1] = i_mZ(r,c);
     A[C2] = i_mZ(r,c);

  rs_mZ(A,C2,9);                

  clrscrn();

  printf(" A0 : ");
  p_mZ(A[C0],S5,P0, S3,P0, C6);         
                         
  printf(" A1 : ");
  p_mZ(A[C1],S5,P0, S3,P0, C6);        

  printf(" A2 : rs_mZ(A,C2,9); ? ");
  p_mZ(A[C2],S5,P0, S3,P0, C6);
  
  printf(" A2 : A0plsA1 : ");
  p_mZ(add_mZ(A[C0],A[C1],A[C2]),S5,P0, S3,P0, C6);

  f_mZ(A[C0]);
  f_mZ(A[C1]);
  f_mZ(A[C2]);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));
  
  do{
        AplsB(R3,C3);
        
  }while(stop_w());

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

...


Exemple de sortie écran :

 A0 : 
   +9 +5i    +5 +4i    +8 -5i 
   +6 +3i    -7 +7i    -9 -9i 
   -7 -5i    +8 -7i    +2 +1i 

 A1 : 
   +1 +6i    +2 +4i    +1 +5i 
   -3 -9i    +1 +6i    -1 +6i 
   -2 -3i    -2 +4i    +3 +7i 

 A2 : rs_mZ(A,C2,9); ? 
   +0 +0i    +0 +0i    +0 +0i 
   +0 +0i    +0 +0i    +0 +0i 
   +0 +0i    +0 +0i    +0 +0i 

 A2 : A0plsA1 : 
  +10+11i    +7 +8i    +9 +0i 
   +3 -6i    -6+13i   -10 -3i 
   -9 -8i    +6 -3i    +5 +8i 


 Press return to continue
 Press X      to stop