Mathc matrices/b0a4c

Application

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

	c00a.c

/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
/* ------------------------------------ */
double **X_c_r1r2_mR(
double **A,
int r1,
int r2)
{
int c;

    for ( c=C1; c<A[C_SIZE][C0]; c++)

             A[r2][c] = A[r1][c];

  return(A);
}
/* ------------------------------------ */
/* ------------------------------------ */
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 = R4;
  
  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:
  -12   -96   +38   -87   +76 
  -11   +14   +67   -78   +88 
  -83   -11   +18   +71   -16 
  +47   -25   +41   -98   +86 

 A: c_r1r2_mR(A,R1,R2);
  -12   -96   +38   -87   +76 
  -12   -96   +38   -87   +76 
  -83   -11   +18   +71   -16 
  +47   -25   +41   -98   +86 


 Press   return to continue
 Press X return to stop