Mathc matrices/02i

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

	`c00a.c`

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

  clrscrn();
  printf(" A : centro symmetric matrix");
  p_mR(A, S5,P0,C7);   
   
  f_mR(A);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));

do
{
 fun( rp_I(RC3)*2 + RC1);

} while(stop_w());

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

Exemple de sortie écran :

 A : centro symmetric matrix
  -62  -221  +830  -421  +969  +773   +21 
 +948  -389  -908  +384  -879  +760  -908 
 -637  -770  -483  -498  -473  -836  -957 
 -476  -205  +937  +671  +937  -205  -476 
 -957  -836  -473  -498  -483  -770  -637 
 -908  +760  -879  +384  -908  -389  +948 
  +21  +773  +969  -421  +830  -221   -62 


 Press   return to continue
 Press X return to stop