Mathc complexes/a284
Installer et compiler ces fichiers dans votre répertoire de travail.
c00a.c |
---|
/* ------------------------------------ */
/* Save as : c00a.c */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
void fun(int r)
{
double **A = r_mZ(i_mZ(r,r),9.);
double **Adjoint = i_mZ(r,r);
clrscrn();
printf(" A :");
p_mZ(A,S5,P0, S3,P0, C6);
printf(" Adjoint :");
p_mZ(adjoint_mZ(A,Adjoint), S6,P0, S6,P0, C6);
f_mZ(A);
f_mZ(Adjoint);
}
/* ------------------------------------ */
int main(void)
{
time_t t;
srand(time(&t));
do
{
fun(rp_I(RC4)+RC1);
} while(stop_w());
return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */
On construit l'adjoint qui est la transposé de la matrice des cofacteurs. Exemple de sortie écran :
A :
+6 +4i +5 -4i +2 -7i
-8 +7i -4 +7i -1 -7i
+9 -9i +8 +8i -3 +2i
Adjoint :
-50 +35i +79 -62i -74 -73i
-82 -17i +19 +81i +11 +116i
-147 -107i -7 -161i -40 -41i
Press return to continue
Press X return to stop