Mathc complexes/a166
Installer et compiler ces fichiers dans votre répertoire de travail.
|
c00a.c |
|---|
/* ------------------------------------ */
/* Save as : c00a.c */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
#define RAb R3
#define CA C3
#define Cb C3
/* ------------------------------------ */
/* ------------------------------------ */
void fun(void)
{
double ab[RAb*((CA+Cb)*C2)] ={
-4,-2, -1,-2, +3,-2, +6,+1, +1,-9, +1,-9,
-8,-4, -2,-4, +6,-4, +0,+1, +1,-0, -8,+7,
-4,-2, -1,-2, +3,-2, -4,-0, +0,-3, +0,-3 };
double **Ab = ca_A_mZ(ab,i_Abr_Ac_bc_mZ(RAb,CA,Cb));
clrscrn();
printf(" Ab :");
p_mZ(Ab, S8,P2, S6,P2, CA);
stop();
clrscrn();
printf(" zx zx zx \n"
" 0 0 0 \n"
" 0 0 0 \n\n"
" zx*B zx*C zx \n"
" z1*B z2*C z3 \n"
" z1*B z2*C z3 \n\n"
" z1*B + z2*C + z3 != 0\n\n"
" The system is not compatible :");
p_mZ(gj_PP_mZ(Ab), S10,P4, S8,P4, CA);
stop();
f_mZ(Ab);
}
/* ------------------------------------ */
int main(void)
{
fun();
return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */
Vérifions que le système est incompatible.
Exemple de sortie écran :
------------------------------------
Ab :
-4.00 -2.00i -1.00 -2.00i +3.00 -2.00i
-8.00 -4.00i -2.00 -4.00i +6.00 -4.00i
-4.00 -2.00i -1.00 -2.00i +3.00 -2.00i
+6.00 +1.00i +1.00 -9.00i +1.00 -9.00i
+0.00 +1.00i +1.00 +0.00i -8.00 +7.00i
-4.00 +0.00i +0.00 -3.00i +0.00 -3.00i
Press return to continue.
------------------------------------
zx zx zx
0 0 0
0 0 0
zx*B zx*C zx
z1*B z2*C z3
z1*B z2*C z3
z1*B + z2*C + z3 != 0
The system is not compatible :
+1.0000 +0.0000i +0.4000 +0.3000i -0.4000 +0.7000i
+0.0000 +0.0000i +0.0000 +0.0000i -0.0000 +0.0000i
+0.0000 +0.0000i +0.0000 +0.0000i -0.0000 +0.0000i
-0.0500 -0.1000i -0.1000 +0.0500i +0.4500 -1.1000i
+6.0000 +0.5000i +0.5000 -9.0000i +5.0000-12.5000i
-4.0000 -0.5000i -0.5000 -3.0000i +4.0000 -6.5000i
Press return to continue.