Mathc matrices/c05i

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 c05i.c
'
/* ------------------------------------ */
/*  Save as :   c05i.c                   */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
void fun(int r)
{
double **u  = r_mR(i_mR(r,C1),9.);
double **v  = r_mR(i_mR(r,C1),9.);

  clrscrn();
  printf(" u :");
  p_mR(u,S3,P0,C6);
  printf(" v :");
  p_mR(v,S3,P0,C6);;
  
  printf("    d(u,v) = ||u-v|| = (<u-v,u-v>)^1/2  \n\n");
  printf("    d(u,v) = %.3f   \n", dist_uv_R(u,v));
  printf("    d(v,u) = %.3f \n\n", dist_uv_R(v,u));

  f_mR(u);
  f_mR(v);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));
  
do
{
  fun(rp_I(R3)+R2);

} while(stop_w());

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


Nous calulons la distance entre deux vecteurs : distuv_R(u,v);



Exemple de sortie écran :
 u :
 +6 
 +6 
 +2 
 +2 
 +8 

 v :
 +8 
 +2 
 +8 
 +4 
 +8 

    d(u,v) = ||u-v|| = (<u-v,u-v>)^1/2  

    d(u,v) = 7.746   
    d(v,u) = 7.746 


 Press return to continue
 Press X      to stop