« Mathc matrices/Fichiers h : vbm » : différence entre les versions
Contenu supprimé Contenu ajouté
Aucun résumé des modifications |
m petit modification |
||
Ligne 94 :
return(sA);
}
/* ------------------------------------ */
double **sqrt_mR(
double **A,
double **sqrtA
)
{
int r;
int c;
dif_sizes_mR(A,sqrtA,"sqrt_mR();","(A or sqrtA)");
for ( r=R1; r<A[R_SIZE][C0]; r++)
for ( c=C1; c<A[C_SIZE][C0]; c++)
sqrtA[r][c] = sqrt(A[r][c]);
return(sqrtA);
}
/* ------------------------------------ */
|