Mathc matrices/05v

Étude du code

Installer et compiler ce fichier dans votre répertoire de travail.

	p01d.c

/* ------------------------------------ */
/*  Save as :   p01d.c                  */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */
void p4_mR(
double **A,
int er,
int dr
)
{
int r;
int c;

 	for     (r = R1; r < A[R_SIZE][C0]; r++)
 	   {
 	    for (c = C1; c < A[C_SIZE][C0]; c++)

            printf("%+*.*f ",er,dr,A[r][c]);
            
         printf("\n");
        }          
}
/* ------------------------------------ */
void fun(int r,int c)
{
double **A     = r_mR(i_mR(r,c),9);

  clrscrn();

  printf(" A[R%d,C%d] : \n",rsize_R(A),csize_R(A));
  p_mR(A,S8,P0,C8);

  p4_mR(A,S8,P2);

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

  srand(time(&t));
  
   do 
        fun(rp_I(R4),rp_I(C8));
        
    while(stop_w());
        
  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */

La fonction p_mR(); existant déjà dans la bibliothèque je l'ai ici renommé p4_mR();

Exemple de sortie écran :

 A[R4,C3] : 

      -6       -7       -5 
      -6       +5       -9 
      +1       +1       +3 
      +9       -4       +6 

   -6.00    -7.00    -5.00 
   -6.00    +5.00    -9.00 
   +1.00    +1.00    +3.00 
   +9.00    -4.00    +6.00 

 Press   return to continue
 Press X return to stop