Mathc matrices/c20w

Application

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

	c00d.c

/* ------------------------------------ */
/*  Save as :   c00d.c                  */
/* ------------------------------------ */
#include      "v_a.h"
#include "dot_trac.h"
/* ------------------------------------ */
void fun(void)
{
double a[R2*C2]={ 1,2,
                  3,4};                 
              
double **A = ca_A_mR(a,i_mR(R2,C2));

  clrscrn();
  printf(" A :");
  p_mR(A,S3,P0,C6);
  
  printf(" <A,A>^(1/2) = %.4f   \n", pow(dot_TR_R(A,A),(1./2.)));
  printf("       ||A|| = %.4f \n\n",    norm_TR_R(A));
  
  f_mR(A);
}
/* ------------------------------------ */
int main(void)
{

  fun();
  
  stop();

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

Exemple de sortie écran :

 ------------------------------------ 
 A :
 +1  +2 
 +3  +4 

 <A,A>^(1/2) = 5.4772   
       ||A|| = 5.4772 

 Press return to continue.