Mathc matrices/a103

Application

Installer et compiler ce fichier dans votre répertoire de travail.

	c00a.c

/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "v_a.h" 
/* ------------------------------------ */
/* ------------------------------------ */
#define  TAB  C3
/* ------------------------------------ */
#define   RU  R3
#define   CU  C1
/* ------------------------------------ */
/* ------------------------------------ */
void fun(void)
{

double u[TAB][RU]={{+2,+2,+6},
	               {+1,+5,+3},
	               {+4,+3,+2}};
double **U[TAB];

double **B  = i_mR(RU,RU);

double v[RU] = {+1,+0,+0};
double **V   = ca_A_mR(v,i_mR(RU,C1));

int c;

  clrscrn();
  
  for(c=C0; c<TAB; c++)
     {
       U[c] = ca_A_mR( u[c],i_mR(RU,C1));
       c_c_mR(U[c],C1, B,c+C1);
      }
      
  printf(" Three U vectors in the Standard Basis \n\n"  
         "    U[0]   U[1]   U[2] :");	     
  p_mR(B,S6,P0,C10);
  

  printf(" The V vector in the base U : ");      
  p_mR(V,S6,P0,C10);  
  
  stop();
  
  for(c=C0; c<TAB; c++)
  
       f_mR(U[c]);
  
  f_mR(B);   
  f_mR(V);  
}
/* ------------------------------------ */
int main(void)
{
  fun();

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

Introduction du vecteur V.

Exemple de sortie écran :

 ------------------------
 Three U vectors in the Standard Basis 

    U[0]   U[1]   U[2] :
    +2     +1     +4 
    +2     +5     +3 
    +6     +3     +2 

 The V vector in the base U : 
    +1 
    +0 
    +0 

 Press return to continue.