Mathc matrices/c12b13

Quelques propriétés des valeurs propres.

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

	c01b.c

/* ------------------------------------ */
/*  Save as :  c01b.c                   */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
#define   RCA R3
/* ------------------------------------ */
int main(void)
{
double a[RCA*RCA]={
+966,+98,+864,
+98,+692,+214,
+864,+214,+376
};

double **A            = ca_A_mR(a,i_mR(RCA,RCA));
double **EigsValue =              i_mR(RCA,C1);

double s = 0;
int    i = 0;

  clrscrn();

  printf(" A :");
  p_mR(A,S4,P0,C6);
       
  printf(" EigsValue :");
  p_mR(eigs_mR(A,EigsValue),S13, P6, C1);   
  
  for(i=R1;i<=RCA;i++)
  
      s += EigsValue[i][C1];
        
  printf(" Sum of the eigenvalues of A : %.3f    \n",          s); 
  printf(" Trace of A                  : %.3f\n\n\n", trace_R(A));
  
  stop();
   
  f_mR(A);
  f_mR(EigsValue);

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

La somme des valeurs propres de A est égale à la trace de A :



Exemple de sortie écran :

 A :
+966  +98 +864 
 +98 +692 +214 
+864 +214 +376 

 EigsValue :
 +1628.835762 
  +661.931131 
  -256.766893 

 Sum of the eigenvalues of A : 2034.000    
 Trace of A                  : 2034.000


 Press return to continue.