Mathc matrices/h07a

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

	`c00b.c`

/* ------------------------------------ */
/*  Save as :   c00b.c                  */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
/* ------------------------------------ */
void fun(int r,int c)
{
double **A     =   r_mR(i_mR(r,   c),99.);
double **B     =        i_mR(r+R2,c);
double **C     =        i_mR(r+R2,r+C2);

  clrscrn(); 
  
  printf(" A :");
  p_mR(A,S5,P0,C10);   
    
  printf(" B : c_mR(A,B);");
  c_mR(A,B);
  p_mR(B,S5,P0,C10); 

  printf(" C  : c_mR(A,C);");
  c_mR(A,C );
  p_mR(C ,S5,P0,C10);  

  f_mR(A);
  f_mR(B); 
  f_mR(C); 
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));

int i;

do
{
  i = rp_I(R3)+R1;
  
  fun(i,i+C1);

} while(stop_w());

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

  Copier une matrice A dans une matrice B. A et B sont de tailles différentes :


Exemple de sortie écran :

/* ------------------------------------ */
 A :
  +49   +43    +4   -17 
  -11   +42   -11   -36 
  -64   -55   +77   -18 

 B : c_mR(A,B);
  +49   +43    +4   -17 
  -11   +42   -11   -36 
  -64   -55   +77   -18 
   +0    +0    +0    +0 
   +0    +0    +0    +0 

 C  : c_mR(A,C);
  +49   +43    +4   -17    +0 
  -11   +42   -11   -36    +0 
  -64   -55   +77   -18    +0 
   +0    +0    +0    +1    +0 
   +0    +0    +0    +0    +1 


 Press return to continue
 Press X      to stop