Aller au contenu

Mathc matrices/c24m

Un livre de Wikilivres.


Application


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


c00a.c
/* ------------------------------------ */
/*  Save as :  c00a.c                   */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
/* ------------------------------------ */
#define   RA R2
#define   CA C2

#define   RX R2
#define   CX C1
/* ------------------------------------ */
/* ------------------------------------ */
int main(void)
{
double a[RA*CA]={
    +3, -2,  
    +2, -2
};

double x_S[RX*CX]={
  +10.00, 
  +13.00, 

};

double **A    = ca_A_mR(a,   i_mR(RA,CA));
double **X_S  = ca_A_mR(x_S, i_mR(RX,CX));
double **AX_S =              i_mR(RA,CX) ;

  clrscrn();
  printf(" In the Standard basis\n\n"
         " Find the linear application T(x_S) = A*x_S \n\n"
         " A :  ");
  p_mR(A,S6,P2,C7);
  printf(" x_S ");
  p_mR(X_S,S6,P2,C7);
  printf(" T(x_S) = A*x_S");
  p_mR(mul_mR(A,X_S,AX_S),S7,P2,C7);
  stop();


  f_mR(A);
  f_mR(X_S);
  f_mR(AX_S);
  
  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */
  Calculons T([x]) = A*[x] en base standard.
Exemple de sortie écran :
 In the Standard basis

 Find the linear application T(x_S) = A*x_S 

 A :  
 +3.00  -2.00 
 +2.00  -2.00 

 x_S 
+10.00 
+13.00 

 T(x_S) = A*x_S
  +4.00 
  -6.00 

 Press return to continue.