Mathc complexes/a1165

Application

Installer et compiler ces fichiers dans votre répertoire de travail.

	c00a.c

/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */  
#define RAb          R4  
#define CA           R4
#define Cb           R2
/* ------------------------------------ */
/* ------------------------------------ */
void fun(void)
{
double ab[RAb*((CA+Cb)*C2)] ={   
  +1,+8,   +2,-7,   +1,+1,   -9,-6,   -8,-4,   -6,-5, 
  +1,+8,   +2,-7,   +1,+1,   -9,-6,   -4,+1,   -1,+9, 
  -7,+4,   +1,+3,   +5,-6,   -2,+5,   +6,+6,   -4,-9, 
  -8,+2,   -5,-7,   -7,+8,   -1,+5,   +7,-3,   -7,+3 };
                          
double **Ab = ca_A_mZ(ab,i_Abr_Ac_bc_mZ(RAb,CA,Cb));

int c = TheCorrect_C(CA+C1);

nb_Z B =  div_Z(sym_Z(i_Z(-5,-14)), i_Z(-4,-5));

  clrscrn();
  
  mulC_mZ(Ab,B,c);
  
  printf(" Ab :");
  p_mZ(Ab, S8,P2, S6,P2, CA); 
  stop();

  clrscrn();
  printf(" With  B = -z2/z1 = "); p_Z(B,S3,P4,S3,P4); printf("\n");   
  printf(" The system is compatible :\n\n");   
  p_mZ(gj_PP_mZ(Ab), S9,P4, S8,P4, CA); 
  stop();
  
  f_mZ(Ab);
}
/* ------------------------------------ */
int main(void)
{

  fun();

  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */

 Calculer la valeur de B pour que le système soit compatible.

Exemple de sortie écran :

 ------------------------------------ 
 Ab :
   +1.00 +8.00i    +2.00 -7.00i    +1.00 +1.00i    -9.00 -6.00i 
   +1.00 +8.00i    +2.00 -7.00i    +1.00 +1.00i    -9.00 -6.00i 
   -7.00 +4.00i    +1.00 +3.00i    +5.00 -6.00i    -2.00 +5.00i 
   -8.00 +2.00i    -5.00 -7.00i    -7.00 +8.00i    -1.00 +5.00i 

  +14.54+14.83i    -6.00 -5.00i 
   +9.54 +0.83i    -1.00 +9.00i 
   -8.63-17.71i    -4.00 -9.00i 
  -17.63 +1.29i    -7.00 +3.00i 

 Press return to continue. 


 ------------------------------------ 
 With  B = -z2/z1 = -2.1951-0.7561i 
 The system is compatible :


  +1.0000 +0.0000i   +0.3824 +0.9706i   +1.0588 -0.7353i   +0.2647 -0.5588i 
  +0.0000 +0.0000i   +1.0000 +0.0000i   +0.0884 -0.6139i   -0.2170 -1.0607i 
  +0.0000 +0.0000i   +0.0000 +0.0000i   +1.0000 +0.0000i   -1.0194 -0.4975i 
  +0.0000 +0.0000i   +0.0000 +0.0000i   +0.0000 +0.0000i   -0.0000 +0.0000i 

  +2.1126 +0.3666i   +0.9118 -0.1471i 
  +1.3281 -0.1908i   -0.2357 -0.0795i 
  +2.5092 -1.1636i   +0.9520 -0.0550i 
  +5.0000+14.0000i   -5.0000-14.0000i 

 Press return to continue.