Mathc complexes/a163
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)] ={
-3,-7, -6,-5, +4,-2, +6,+1, +1,-9, +1,-9,
-3,-7, -6,-5, +4,-2, +0,+1, +1,-0, -8,+7,
-3,-7, -6,-5, +4,-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, S6,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 :
-3.00 -7.00i -6.00 -5.00i +4.00 -2.00i
-3.00 -7.00i -6.00 -5.00i +4.00 -2.00i
-3.00 -7.00i -6.00 -5.00i +4.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.9138-0.4655i +0.0345+0.5862i
-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.4310+0.6724i +1.0345+0.5862i +1.0345+0.5862i
-6.0000-0.0000i +0.0000+9.0000i -9.0000+16.0000i
-10.0000-1.0000i -1.0000+6.0000i -1.0000+6.0000i
Press return to continue.