Mathc matrices/Fichiers c :canImul

Un livre de Wikilivres.
Sauter à la navigation Sauter à la recherche


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

Crystal Clear mimetype source c.png canImul.c
Vérification d'erreurs
/* ------------------------------------ */
/*  Save as :   canImul.c               */
/* ------------------------------------ */
#include "v_a.h"
/* ------------------------------------ */   
void xcanImul_mR(
double **A,
double **B,
double **AB,
char function[],
char matrices[]
)
{
  if (         ( A[C_SIZE][C0] != B[R_SIZE][C0] )
                               ||
               ( A[R_SIZE][C0] != AB[R_SIZE][C0] )
                               ||
               ( B[C_SIZE][C0] != AB[C_SIZE][C0] ) )
    {
     printf("\n Error : %s\n",function);
     printf("\n Verify the size of the matrices. %s \n",matrices);
     printf("\n Press return to continue.\n");
     fflush(stdout);
     getchar();
     exit(EXIT_FAILURE);
    }
}
/* ------------------------------------ */
int main(void)
{  
double **A     = i_mR(R2,R4);
double **B     = i_mR(R4,R3);
double **AB    = i_mR(R3,R3);

  clrscrn();
  
  printf(" A[R%d,C%d] : \n",rsize_mR(A),csize_mR(A));
  p_mR(A,4,0,C6);

  printf(" B[R%d,C%d] : \n",rsize_mR(B),csize_mR(B));
  p_mR(B,4,0,C6);

  printf(" AB[R%d,C%d] : \n",rsize_mR(AB),csize_mR(AB));
  p_mR(AB,4,0,C6);
   
  xcanImul_mR(A,B,AB,"mul_mR();","(A or B or AB)");
  
  f_mR(A);
  f_mR(B);
  f_mR(AB);
        
  return 0;
}


La fonction canImul_mR(); existant déjà dans la librairie je l'ai ici renommé canImul_mR();


Exemple de sortie écran :

 A[R2,C4] : 

  +0   +0   +0   +0 
  +0   +0   +0   +0 

 B[R4,C3] : 

  +0   +0   +0 
  +0   +0   +0 
  +0   +0   +0 
  +0   +0   +0 

 AB[R3,C3] : 

  +0   +0   +0 
  +0   +0   +0 
  +0   +0   +0 


 Error : mul_mR();

 Verify the size of the matrices. (A or B or AB) 

 Press return to continue.


Les matrices n'étant pas de taille compatible, la fonction d'erreur arrête le programme.


Vous pouvez essayer un autre exemple en changeant les valeurs ci-dessous :

double **A     = i_mR(R2,R4);
double **B     = i_mR(R4,R3);
double **AB    = i_mR(R2,R3);


 A[R2,C4] : 

  +0   +0   +0   +0 
  +0   +0   +0   +0 

 B[R4,C3] : 

  +0   +0   +0 
  +0   +0   +0 
  +0   +0   +0 
  +0   +0   +0 

 AB[R2,C3] : 

  +0   +0   +0 
  +0   +0   +0 



------------------
(program exited with code: 0)
Press return to continue

Cette fois-ci la fonction d'erreur n'arrête plus le programme.