adjoint


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


c00a.c
/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
void fun(int r)
{
double **A       = r_mZ(i_mZ(r,r),9.);
double **Adjoint =      i_mZ(r,r);

  clrscrn();
  printf(" A :");
  p_mZ(A,S5,P0, S3,P0, C6);

  printf(" Adjoint :");
  p_mZ(adjoint_mZ(A,Adjoint), S6,P0, S6,P0, C6);

  f_mZ(A);
  f_mZ(Adjoint);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));
do
{
  fun(rp_I(RC4)+RC1);

} while(stop_w());

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


On construit l'adjoint qui est la transposé de la matrice des cofacteurs.


Exemple de sortie écran :
 A :
   +6 +4i    +5 -4i    +2 -7i 
   -8 +7i    -4 +7i    -1 -7i 
   +9 -9i    +8 +8i    -3 +2i 

 Adjoint :
   -50   +35i    +79   -62i    -74   -73i 
   -82   -17i    +19   +81i    +11  +116i 
  -147  -107i     -7  -161i    -40   -41i 


 Press   return to continue
 Press X return to stop