Mathc matrices/b0a4c

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

	`c00d.c`

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

  clrscrn(); 
  
  printf(" A :");
  p_mR(A,S5,P0,C10);   
    
  printf(" A : c_r1r2_mR(A,R1,R2);");
  p_mR(c_r1r2_mR(A,R1,R2),S5,P0,C10);
  
  f_mR(A);
}
/* ------------------------------------ */
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 colonne R1 dans la colonne R2 d'une matrice :
 
 
Exemple de sortie écran :

 ------------------------------------ 
 A :
  -73   +88   -96   -74   -39 
  +43   -67   +59   +59   +68 
  +90   -58   -69   -41   +67 
  +87   -43   -83   +23   -63 

 A : c_r1r2_mR(A,R1,R2);
  -73   +88   -96   -74   -39 
  -73   +88   -96   -74   -39 
  +90   -58   -69   -41   +67 
  +87   -43   -83   +23   -63 


 Press return to continue
 Press X      to stop