Mathc matrices/c05h

Un livre de Wikilivres.
Aller à la navigation Aller à la recherche


Sommaire


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

Crystal Clear mimetype source c.png c05h.c
'
/* ------------------------------------ */
/*  Save as :   c05h.c                   */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
void fun(int r)
{
double **u    = r_mR(i_mR(r,C1),9.);
double **n_u  =      i_mR(r,C1);

  clrscrn();
  printf(" u :");
  p_mR(u,S3,P0,C6);
            
  smul_mR(1./norm_uv_R(u),u,n_u);              
  printf("     n_u = (1/||u||) u :");
  p_mR(n_u,S3,P6,C6);            

  printf(" ||n_u|| = %.10f \n\n", norm_uv_R(n_u));
            
  f_mR(u);
  f_mR(n_u);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));

do
{
  fun(rp_I(R3)+R2);

} while(stop_w());

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


Nous normalisons un vecteur colonne : smul_mR(1./normuv_R(u),u,n_u);



Exemple de sortie écran :
 u :
 +6 
 -9 
 -3 
 -9 
 -5 

     n_u = (1/||u||) u :
+0.393919 
-0.590879 
-0.196960 
-0.590879 
-0.328266 

 ||n_u|| = 1.0000000000 


 Press return to continue
 Press X      to stop