Mathc complexes/Fichiers h : vc m

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


Installer ce fichier dans votre répertoire de travail.

Crystal Clear mimetype source h.png wcm.h
'
/* ------------------------------------ */
/*  Save as :   wcm.h                   */
/* ------------------------------------ */
double **ca_A_mZ(
double  a[],
double  **A
)
{
int r;
int c;
int i=0;

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

            A[r][c] = a[i++];

return(A);
}
/* ------------------------------------ */
double **c_mZ(
double **A,
double **B
)
{
int c;
int r;

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

            B[r][c] = A[r][c];
            
return(B);
}


La fonction c_mZ(); permet de copier la matrice A dans la matrice B. Elle ne vérifie pas la taille des matrices. Le fait d'avoir conservé cette possibilité m'a rendu de grand service.

La deuxième fonction copie un tableau de nombre dans une matrice.